macro

[rafael2006]

bonjour je voudrais faire une macro

mettre un point virgule dans une colone (en debut)
colone A
LIGNE1 ;
ligne 2 ;
ect.......

 

[guitarde]

Je ne sais trop à quoi ca va servir mais tu n'as pas besoin de macro.

Juste à mettre un ; dans A1, faire copier
puis sélectionner l'entête de colonne (toute la colonne) et faire coller.


Salutations
Eric

 

[porcinet82]

Salut rafael2006, guitarde,

JE en vois pas non plus l'interet de la chose mais bon, tu voulais une macro la ou plutot les voila :

Si tu veux mettre le ; au debut de la chaine de caractères dans la cellule (ta question) :

Sub essai()
Dim i As Integer

For i = 1 To Range('A65536').End(xlUp).Row
    Cells(i, 1).Value = ';' & Cells(i, 1).Value
Next i
End Sub

Si tu veux mettre le ; a la fin de la chaine de caractères dans la cellule (ton exemple) :

Sub essai_2()
Dim i As Integer

For i = 1 To Range('A65536').End(xlUp).Row
    Cells(i, 1).Value = Cells(i, 1).Value & ';'
Next i
End Sub

@+

 

[rafael2006]

merci beaucoup porcinet82
trop bien