Discussion :

[robynou]

Bonjour,

tout est dit dans l'intitulé. Voila je cherche l'equivalent du code suivant pour une ligne entiere :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Activecell.Delete

Merci bien !

[trblolo]

bonjour,

je pense à sa :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
Rows("1:1").Select ' selection de la ligne 1 compléte
Selection.Delete 'suppression des valeurs dans la ligne

sinon à sa :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Rows("1:1").Select ' selection de la ligne 1 compléte
Selection.Delete Shift:=xlUp 'suppression compléte de la ligne

Je pense que cela devrais te suffire

[djib29]

Une solution plus proche de l'exemple fourni:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ActiveCell.EntireRow.Delete

[Krovax]

trblolo un conseil dans tes code évite les select

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Rows("1:1").Select ' selection de la ligne 1 compléte
Selection.Delete Shift:=xlUp 'suppression compléte de la ligne

devient

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Rows("1:1").Delete Shift:=xlUp 'suppression complète de la ligne 1

Avoue que c'est plus court non?
Et c'est aussi beaucoup plus cours a exécuter

C'est relativement générale comme conseil, la quasi totalité des select peuvent être retiré des codes et ainsi gagné beaucoup de temps d'exécution

(on peut garder ceux en fin de macro pour mettre la sélection a un endroit précis par exemple)