Cells(I, 1).ClearContents .....

[Evelynetfrancois]

bonjour à tous
j ai un petit soucis de syntaxe????

Dans une de mes macro, j ai ces deux lignes qui se suivent

Cells(I, 1).ClearContents
Cells(I, 2).ClearContents

Ma Q
Est il possible pour être plus “” propre “” de regrouper en une seule commande ces deux lignes ?

merci et bonne journée a tous

E et F

 

[gilbert_RGI]

Re : Cells(I, 1).ClearContents .....

bonjour à tous
j ai un petit soucis de syntaxe????

Dans une de mes macro, j ai ces deux lignes qui se suivent

Cells(I, 1).ClearContents
Cells(I, 2).ClearContents

Ma Q
Est il possible pour être plus “” propre “” de regrouper en une seule commande ces deux lignes ?

merci et bonne journée a tous

E et F

bonjour

Comme ceci peut-être

Sub test()
i = 1
    For j = 1 To 2
        With Cells(i, j)
            .ClearContents
        End With
    Next
End Sub

🙄

 

[Pierrot93]

Re : Cells(I, 1).ClearContents .....

Bonjour à tous

une autre solution :

 Cells(I, 1).Resize(, 2).ClearContents

bonne journée
@+

 

[Evelynetfrancois]

Re : Cells(I, 1).ClearContents .....

Bonjour
gilbert_RGI , Jean-Marcel

J'avais bien tenté
Cells(I, 1).Cells(I, 2).ClearContents
et
Cells((I, 1).Cells(I, 2)).ClearContents
sans résultat.......

Mais la proposition de Jean-Marcel
Range(cells(I,1),cells(I,2)).clearcontents
marche et me convient parfaitement , j'adopte ……
je vous REMERCIE sincèrement tous les deux et vous souhaite une bonne fin de semaine
Au plaisir de vous lire
E et F

 

[JCGL]

Re : Cells(I, 1).ClearContents .....

Bonjour à tous,

Tu peux essayer aussi :

Union(Cells(i, 1), Cells(i, 2)).ClearContents

A+ à tous

 

[Fo_rum]

Re : Cells(I, 1).ClearContents .....

Salut

ou encore :

Range("A" & I & ":B" & I).ClearContents

 

[Evelynetfrancois]

Re : Cells(I, 1).ClearContents .....

Oups , je vous pris de m'excuser , mais je n'avais pas vu toutes les réponses proposées..........merci !!!!
J'ai bien fait de revenir aux nouvelles !!!

Comme je souhaite (maintenant) supprimer 3 ranges , la version proposée par JCGL
Union(Cells(i, 1),Cells(i, 2), Cells(i, 3)).Clear
me va à merveilles , ce qui n'enlève pas l interet des autres !.
merci à tous
bon dimanche
E et F

 

[Evelynetfrancois]

Re : Cells(I, 1).ClearContents .....

Mais oui Jean-Marcel après essais de ta proposition
ça va impeccable!!! Super
Bonne journée à toi et encore merci pour toutes vos aides si précieuses
E et F