OVH Cloud OVH Cloud

Sélection de lignes multiples

3 réponses
Avatar
ManBas
Bonsoir à tous,
S'il vous plait quel est le code qui commande: "sélectionne toutes les
lignes, de la ligne 2 à la dernière ligne dont la colonne A n'est pas vide"
?
Merci beaucoup du coup de pouce!

3 réponses

Avatar
Hervé
Bonsoir,

With ActiveSheet
.Range(.[A2], .[A65536].End(3)).EntireRow.Select
End With

Hervé.

"ManBas" a écrit dans le message de news:

Bonsoir à tous,
S'il vous plait quel est le code qui commande: "sélectionne toutes les
lignes, de la ligne 2 à la dernière ligne dont la colonne A n'est pas
vide" ?
Merci beaucoup du coup de pouce!



Avatar
ManBas
Ouais !!!
J'ai trouvé ça:
Range("a65536").End(xlUp).Offset(1, 0).Select
ligne = [A65536].End(xlUp).Offset(1, 0).Row
Rows("2:" & ligne).Select
Range("A2:A" & Range("A65536").End(xlUp).Row).Select

ça le fait.



"ManBas" a écrit dans le message de news:

Bonsoir à tous,
S'il vous plait quel est le code qui commande: "sélectionne toutes les
lignes, de la ligne 2 à la dernière ligne dont la colonne A n'est pas
vide" ?
Merci beaucoup du coup de pouce!



Avatar
ManBas
Merci beaucoup Hervé.
Entre-temps j'avais un truc approchant (mais moins class) qui n'est pas
encore publié au moment où je tape ces lignes.
A bientôt.


"Hervé" a écrit dans le message de news:
%
Bonsoir,

With ActiveSheet
.Range(.[A2], .[A65536].End(3)).EntireRow.Select
End With

Hervé.

"ManBas" a écrit dans le message de news:

Bonsoir à tous,
S'il vous plait quel est le code qui commande: "sélectionne toutes les
lignes, de la ligne 2 à la dernière ligne dont la colonne A n'est pas
vide" ?
Merci beaucoup du coup de pouce!