Macro pour transformer format d'une colonne
M
Bonjour,
Je dispose de 6 colonnes (C D E F G et H) qui contiennent de réels. Je cherche à mettre les valeurs des colonnes D, F et H entre deux crochets
c.a.d
C D . . . . H ==>
0,5 0,3
0,6 0,9
0,3 0,8
0,9 0,3
. .
. .
. .
C D
0,5 [0,3]
0,6 [0,9]
0,3 [0,8]
0,9 [0,3]
. .
. .
. .
Merci d'avance
r
bonjour voici un essai:
Sub test()
Dim c As Range, plage As Range
'défini le numéro de la dernière ligne utilisée dans chaque colonne (D,F,H)
fin1 = Range("D" & Rows.Count).End(xlUp).Row
fin2 = Range("F" & Rows.Count).End(xlUp).Row
fin3 = Range("H" & Rows.Count).End(xlUp).Row
'défini la plage
Set plage = Union(Range("D1:D" & fin1), Range("F1:F" & fin2), Range("H1:H" & fin3))
'boucle sur chaque cellule de la plage et met son contenu entre crochet
For Each c In plage
c = "[" & c.Value & "]"
Next c
End Sub