Discussion :

[stargates]

Bonjour,


Avec l'enregistreur de makro, pour sélectionner plusieurs plage
non contigues on obtient ceci

Code :

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

1
2
 
Range("A8:A21,F8:F21,G8:M21").Select

Mon souci c'est que le n°ligne n'est pas fixe

Comment puis-je remplacer ici dans mon exemple 21 par une variable(i)

Mon numéro de ligne est trouvé comme ceci

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
'Déclaration des variables
Dim i As Integer
'Initialisation de la variable (i) pour la
'recherche de la première cellule vide
i = 8
'Recherche de la première cellule vide
While ActiveSheet.Cells(i, 1) <> ""
    i = i + 1 'Inrémentation
Wend
Range("A8:A21,F8:F21,G8:M21").Select

J'ai essayé ceci mais en vain

Code :

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

1
2
 
Range("A8: A & i-1", "F8:F & i-1", "G8:M & i -1").Select

Une idée merci

[mercatog]

Code :

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

Range("A8:A" & i - 1 & ",F8:M" & i - 1).Select

pour la dernière ligne, regarde ici http://www.developpez.net/forums/d45...gnees-feuille/

edit, pour ton cas

[stargates]

une petite question


es-tu sure de tes guillements
+ manque une plage


Merci de ton aide

[laetitia]

bonjour stargates le forum
je vais me permettre de repondre a la place de l'ami mercatog vu qu' il est pas la. je le salue au passage

comme j' ai compris!!!

Code :

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

Range("A8" & ":A" & i & ",f8" & ":f" & i & ",g8" & ":m" & i).Select

a simplifier

[stargates]

ok c'est super merci

[mercatog]

es-tu sure de tes guillemets
+ manque une plage

Sélection F puis de G à M, ça reviendrait à sélectionner de F à M, non?
Oui je suis certain de mes guillemets, si tu as testé?

Code :

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

Range("A8:A" & i - 1 & ",F8:M" & i - 1).Select

Voilà, j'espère avoir bien répondu

Bonjour Laétitia, merci

[stargates]

Autant pour moi Mercatog


tu as raison



encore merci