Discussion :

[scoubi10]

Bonjour,

Je souhaite sélectionner une plage d'un tableau qui peut être variante.

J'ai d'abord détecté ma fin de plage :

Code :

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

1
2
3
4
5
Range("A1").Select
Selection.End(xlDown).Select
Selection.Copy
Range("L1").Select
ActiveSheet.Paste

Puis j'ai nommé la case qui renvoi ma dernière ligne :

Code :

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

fin_plage = Sheets("feuil1").Range("L1").Value

et ensuite j'ai voulu sélectionner ma plage :

Code :

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

Range("R1C1:R" + Str$(fin_plage)+" C2).Select

Mais ça marche pas.

Merci de votre aide

[JPierreM]

Bonjour,

Je ne comprends pas ce que vous voulez faire
votre code

Code :

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

1
2
3
4
5
Range("A1").Select
Selection.End(xlDown).Select
Selection.Copy
Range("L1").Select
ActiveSheet.Paste

peut se remplacer par

Code :

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

Range("L1") = Range("A1").End(xlDown)

Que cherchez-vous à faire?

[stmastma]

Bonjour,
je pense qu'il veut sélectionner la colonne jusqu'au dernier élément.

Code :

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

1
2
Range("A1").Select
Range(Selection, Selection.End(xlDown)).Select

[scoubi10]

En fait j'ai 3 colonnes :

A 1 a
B 2 b
C 3 c
. 4
. 5
F 6 f
. 7

La par exemple j'ai que 7 lignes, mais je peux aussi bien en avoir 100 le lendemain. Le problème est que la première colonne comporte des trous tandis que la deuxième est complète.

Donc je souhaite tout selectionné.

Donc je me suis servi de la 2ème colonne pour obtenir la dernière ligne. J'ai rapporté cette valeur dans une case vide.
Puis je voulais lui dire qu'il selectionne de la colonne 1 et la troisième colonne jusqu'à la ligne donc j'ai rapporté la valeur.

Par exemple ici la zone a définir serait : A1:C7
Mais je peux avoir le lendemain : A1:C100

J'espère être un peu plus clair.

Merci de votre aide

[JPierreM]

Si rééllement il n'y a que 3 colonnes et que la seconde est toujours remplie sans cellule vide

Code :

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

1
2
3
sub sc
Range("B1").CurrentRegion.Select
end sub

sélectionnera la plage A1:C à la dernière ligne non vide de la colonne B

[scoubi10]

En fait il y en a 37 de colonnes et c'est la deuxième colonne qui ne comporte pas de vide.

Est-ce pareil ?

en tout cas merci pour votre aide.

Ha très bien ça marche.

Encore merci pour votre aide.

Bonne fin de journée