OVH Cloud OVH Cloud

VBA syntaxe de sellections de lignes

4 réponses
Avatar
Domi
Bonjour à tous,

Qui pourrait me donner la syntaxe pour selectionner une plage de lignes.
Toutes les lignes sous la dernière ligne pleine de la colonne A ( à partir
de la ligne 15)

Range("A15").End(xlDown).Offset(1, 0).EntireRow.Select ' (pour la
première...)

La dernière etant la ligne A65536
Je suis pas loin du resultat mais j'y suis pas !

Merci
Domi

4 réponses

Avatar
AV
Une :
Rows([A65536].End(3).Row + 1 & ":65536").Select

AV

"Domi" a écrit dans le message news:

Bonjour à tous,

Qui pourrait me donner la syntaxe pour selectionner une plage de lignes.
Toutes les lignes sous la dernière ligne pleine de la colonne A ( à partir
de la ligne 15)

Range("A15").End(xlDown).Offset(1, 0).EntireRow.Select ' (pour la
première...)

La dernière etant la ligne A65536
Je suis pas loin du resultat mais j'y suis pas !

Merci
Domi




Avatar
Ellimac
Bonjour,

Sub Toto()
der = Range("A1").End(xlDown).Offset(1, 0).Row
Range("a" & der & ":a65536").EntireRow.Select
End Sub

Camille

-----Message d'origine-----
Bonjour à tous,

Qui pourrait me donner la syntaxe pour selectionner une
plage de lignes.

Toutes les lignes sous la dernière ligne pleine de la
colonne A ( à partir

de la ligne 15)

Range("A15").End(xlDown).Offset(1, 0).EntireRow.Select '
(pour la

première...)

La dernière etant la ligne A65536
Je suis pas loin du resultat mais j'y suis pas !

Merci
Domi


.



Avatar
Patrick Loury
Bonjour,
comme tu dis, tu y étais presque :

Range("A15").End(xlDown).Offset(1, 0).EntireRow.Select
'pour la 1
Range(Selection, Selection.End(xlDown)).Select
'pour aller de la 1 à la fin

à+

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

Bonjour à tous,

Qui pourrait me donner la syntaxe pour selectionner une plage
de lignes.

Toutes les lignes sous la dernière ligne pleine de la colonne
A ( à partir

de la ligne 15)

Range("A15").End(xlDown).Offset(1, 0).EntireRow.Select ' (pour
la

première...)

La dernière etant la ligne A65536
Je suis pas loin du resultat mais j'y suis pas !

Merci
Domi




Avatar
Dédé
Salut Domi !

Peut-être un bout ...
Range([A65536].End(xlUp)(2), [A65536]).Select

Si je trouve pour les lignes, je te redis ;-))

Salutations
Dédé

--
Pour répondre, enlever le NOSPAM
"Domi" a écrit dans le message de
news:
Bonjour à tous,

Qui pourrait me donner la syntaxe pour selectionner une plage de lignes.
Toutes les lignes sous la dernière ligne pleine de la colonne A ( à
partir

de la ligne 15)

Range("A15").End(xlDown).Offset(1, 0).EntireRow.Select ' (pour la
première...)

La dernière etant la ligne A65536
Je suis pas loin du resultat mais j'y suis pas !

Merci
Domi