Efface une ligne partielle

[Cougar]

Bonjour le forum,

Je ne trouve plus le code pour effacer une ligne partielle du type :

Range(1, 5).Select
Selection.Delete Shift:=xlUp

Simple mais je ne trouve pas.

Merci

 

[soenda]

Re : Efface une ligne partielle

Bonjour cougar

vois avec

Range("A1:E1").Select
    Selection.Delete shift:=xlUp

A plus

 

[soenda]

Re : Efface une ligne partielle

Re

ou

Range([B][COLOR=DarkRed]"A1:A5"[/COLOR][/B])

A plus

 

[Cougar]

Re : Efface une ligne partielle

Bonjour à vous tous,

Il ne faut pas qu'il y ait de référence aux colonnes car je dois effacer la ligne 1 , ensuite peut-être la ligne 5, 7, 12 etc. selon certaines conditions.

Merci

 

[soenda]

Re : Efface une ligne partielle

Re

pour effacer les lignes 1 et 5

Range("1:1,5:5").Select
...

A plus

 

[soenda]

Re : Efface une ligne partielle

Re

En complément, pour effacer:

la ligne 1

Range("1:1").Select
...

Les lignes de 2 à 5

 Range("2:2", "5:5").Select
 ...

A plus