Correction automatique

Bonjour

Vous comprendrai vite que je suis débutante dans Excel !

Voici ma question :

Dans une colonne d'Excel j'ai a ajouté ".jpg" a un nombre

En sélectionnant ma colonne ... je sais que dans Format de formule/Personnalisée ... standard".jpg" ça fonctionne très bien

mais j'ai aussi a inscrire ce genre de chiffre .. 350-1.jpg

c'est ici que j'ignore quoi inscrire dans Format de formule

Quelqu'un peut m'aider SVP

grand merci

Bonsoir DanielleM

Pour ce que tu souhaites, via le format, il faut choisir "Personnalisé" et mettre : 000-0

Mon avis personnel, à moins d'être vraiment obligé de passer par cette méthode,

Je saisirai tout directement dans la cellule : 0001.jpg, 350-1.jpg, etc...

A+

ce que j'aimerais .. ce que le .jpg s'ajoute automatiquement dans ma colonne

que j'écrive

15

148

158-7

258-9

c'est jamais dans l'ordre les chiffres

quand c'est un chiffre sans - c'est ok

mais avec un tiret ça marche pas

merci

Re,

Pour moi une seule solution... passer par la programmation en VBA

Bonjour DanielleM, (BrunoM45)

BrunoM45 en disant

BrunoM45 a écrit :

Pour moi une seule solution... passer par la programmation en VBA

"nombre-nombre" à ".jpg"

Bonjour DanielleM (BrunoM45)

un truc comme ça peut-être ?

merci Andrea pour ton aide

mais avec ton fichier ça ne fait pas ce que j'aimerais avoir comme résultat ... le .jpg ne s'ajoute pas

Dans une colonne

j'écris :

125-2 et le .jpg s'ajoute automatiquement en faisant enter

125-2.jpg

ça ne se fait peut-etre pas

si trop compliqué on oubli ça

(re)

Ou bien je suis bête ou alors je n'ai rien compris à ta demande

DanielleM a écrit :

mais avec ton fichier ça ne fait pas ce que j'aimerais avoir comme résultat ... le .jpg ne s'ajoute pas

DanielleM a écrit :

Dans une colonne j'écris :125-2 et le .jpg s'ajoute automatiquement en faisant enter 125-2.jpg

as-tu pris le temps de lire la remarque

BrunoM45 a écrit :

Pour moi une seule solution... passer par la programmation en VBA

Ha si qqun est bête ici c'est bien moi hihihihi !

ton fichier je l'ai ouvert dans Excel .. et j'ai inscris dans la colonne B ... des chiffres comme 258-1 et le .jpg ne s'ajoute pas

c'est sur que je ne fais pas ce qu'il faut

désolée

mais tu as assez perdu de temps avec moi, un grand merci pour ton aide

(re)

Attention il y a des macro-cmdes dans le fichier donc à l'ouverture il faut accepter les macro-cmdes !!! sinon effectivement il ne se passe rien !!!

Je viens d'essayer avec le fichier que j'ai posté : ça fonctionne très bien !!!

EN effet ça fonctionne très bien

Merciiiiii beaucoup

Bonjour DanielleM

DanielleM a écrit :

EN effet ça fonctionne très bien

DanielleM a écrit :

Merciiiiii beaucoup

Bon me voilà encore !

J'ose demander .. c'est certain que si je ne demande pas je n'aurai jamais de réponse

ça fonctionne très bien en effet sauf que ..

si j'écris les premiers chiffres en bas de 100 soit ... 99-9 ça donne une date 1999-09-01.jpg

et aussi j'aimerais savoir comment modifier afin d'avoir les colonnes de 8 à 18 (h à r)

c'est possible ?

grand merci à l'avance

Bonjour DanielleM

Pour répondre à

DanielleM a écrit :

J'ose demander .. c'est certain que si je ne demande pas je n'aurai jamais de réponse

Pour répondre à

DanielleM a écrit :

si j'écris les premiers chiffres en bas de 100 soit ... 99-9 ça donne une date 1999-09-01.jpg

Pour répondre à

DanielleM a écrit :

et aussi j'aimerais savoir comment modifier afin d'avoir les colonnes de 8 à 18 (h à r)

Dans le code VBA (accès par Alt-F11) tu as dans le module de la Feuil1 une procédure comme ça...

Private Sub Worksheet_Change(ByVal Target As Range)
Dim lig, col

    lig = Target.Row
    col = Target.Column
    Application.EnableEvents = False
    If col = 2 Then ' COLONNE supposée être celle des nombre.jpg
        If Not IsEmpty(Cells(lig, col)) Then
            On Error Resume Next
            Cells(lig, col) = Str(Cells(lig, col))
            On Error GoTo 0
            Cells(lig, col) = Cells(lig, col) & IIf(Right(Cells(lig, col), 4) = ".jpg", "", ".jpg")
        End If
    End If

    Application.EnableEvents = True
End Sub

Il faut corriger la ligne

   If col = 2 Then ' COLONNE supposée être celle des nombre.jpg

en

   If (col = 2) Or (col = 8) Or (col = 9) Then ' COLONNE supposée être celle des nombre.jpg

avec autant de Or (col = x) que tu veux utiliser ce format ".JPG"

Ok je comprends le principe !

Pour les dates .. ma colonne est bien en format Standard mais ça change rien en bas de 100-0 ça met une date

et dès que j'ajoute des colonnes ça fonctionne bien pour la colonne 2 mais dès que j'écris dans la colonne 8 mon Excel cesse de fonctionner !! Après modification du code VBA je fais FICHIER / fermer et retourner à Excel

merci

Private Sub Worksheet_Change(ByVal Target As Range)

Dim lig, col

lig = Target.Row

col = Target.Column

Application.EnableEvents = False

If (col = 2) Or (col = 8) Or (col = 9) Then ' COLONNE supposée être celle des nombre.jpg

If Not IsEmpty(Cells(lig, col)) Then

On Error Resume Next

Cells(lig, col) = Str(Cells(lig, col))

On Error GoTo 0

Cells(lig, col) = Cells(lig, col) & IIf(Right(Cells(lig, col), 4) = ".jpg", "", ".jpg")

End If

End If

Application.EnableEvents = True

End Sub

(re)

Effectivement pour le test Or (col = x) ça ne fonctionne pas et j'avoue que là je sèche...

Pour ce qui est des > 100 en fait Excel prend en compte ton - (tiret du 6) comme un séparateur de date donc si tu tapes une série de chiffres qui peuvent représenter une date Excel corrige automatiquement

Fais le test avec 25-2 par exemple, tu verras. Alors que 89-1 fonctionne parce ce "nombre" ne peut pas représenter une date

Donc une question... quel est le but réel de cette manœuvre ?

Ça sera pas faute d'avoir essayé !

grand merci pour ta patience

Bonjour DanielleM

Désolé mais je ne peux pas faire plus...

D'ailleurs je rejoins la réflexion de BrunoM45 "quand il dit que ce n'est pas un bonne idée"