Bonjour,
J'ai un tableau avec des infos séparément entrées dans des cellules.
Je soughaiterais concaténer ces infos dans une autre cellule.
Or il y a une info qui est une date au format "mmm-yy" et je souhaiterais la concatener ainsi "(mmm-yy)".
Lorsque je lance mon code, j'obtiens ceci "(mmm-19)"
Voici la partie du code qui concerne la concaténation :
Pouvez-vous m'aider à résoudre ce soucis.
Je pense que ça vient directement du format de la date qui ne doit pas être pris en compte de la même façon en VBA et sur le tableur mais je ne suis certain de rien.
J'ai un tableau avec des infos séparément entrées dans des cellules.
Je soughaiterais concaténer ces infos dans une autre cellule.
Or il y a une info qui est une date au format "mmm-yy" et je souhaiterais la concatener ainsi "(mmm-yy)".
Lorsque je lance mon code, j'obtiens ceci "(mmm-19)"
| Colonne 1 |
|
|
|
|
| |||||
| 2"7/8 | Tbg | J55 | EU | avr-10 |
|
Voici la partie du code qui concerne la concaténation :
VB:
Set Data = Range("A1:E302")
For ligne = 1 To max
For colonne = 1 To 5
nom = Data.Cells(ligne, colonne).Text
If colonne <= 4 Then
info = info & " " & nom
Else
info = info & " (" & Format(nom, "mmm-yy") & ")"
End If
Next colonne
Sheets("Schéma").Cells(ligne + 1, 1) = info
info = ""
Next lignePouvez-vous m'aider à résoudre ce soucis.
Je pense que ça vient directement du format de la date qui ne doit pas être pris en compte de la même façon en VBA et sur le tableur mais je ne suis certain de rien.