Macro pour enlever les erreurs (coins verts)

[rjcb]

Salut!

Je voudrais faire une macro permettant d'enlever les coins vert en haut à gaucge sur beaucoup de cellules. J'ai fais enregistrer une macro, cela fonctionne, mais juste pour une cellule.

Merci

 

[Pierrot93]

Re : Macro pour enlever les erreurs (coins verts)

Bonjour rjcb

essaye peut être le code ci dessous pour convertir colonne A :

Sub test()
    Columns("A:A").TextToColumns Destination:=Range("A1")
End Sub

attention tu as un alignement à gauche dans la cellule A1.

bonne fin d'après midi
@+

 

[rjcb]

Re : Macro pour enlever les erreurs (coins verts)

Ok merci, donc pour une colonne je fais:

Feuil1.Columns("X").TextToColumns.Select Destination:=Feuil1.Range("X")

Par contre la macro est sur la feuil2 et les données à traitées sont sur la feuil1 donc j'ai rajouté feuil1.

Par contre il aime pas trop ca, cela ne fonctionne pas.

Merci

 

[Pierrot93]

Re : Macro pour enlever les erreurs (coins verts)

Re

essaye comme ca alors :

Sheets("Feuil1").Columns("A:A").TextToColumns Destination:=Sheets("Feuil1").Range("A1")

@+