OVH Cloud OVH Cloud

Selections multiples

5 réponses
Avatar
Simnet
Bonjour =E0 tous !

J'ai un petit probl=E8me.
Je d=E9veloppe une petite appli Excel et pour =E7a, j'ai besoin
de pouvoir r=E9aliser de mani=E8re automatique une selection de
diff=E9rentes lignes.
En clair, je dois pouvoir, en fonction de leur contenu,=20
selectionner par exemple la ligne 2 puis ajouter =E0 la=20
selection la ligne 5 puis la 7 etc... Pour finalement=20
avoir une selection de plusieurs lignes.
La selection de la premi=E8re ligne, pas de pbs (Range
("1:1").Select), mais comment "ajouter" d'autres lignes =E0=20
cette selection ?

Si quelqu'un a un =E9l=E9ment de r=E9ponse, je suis preneur ;) !

Simnet.

5 réponses

Avatar
garnote
Salut Simnet,

Un exemple de sélection multiple :
Sub SélectionneLignes()
Range("1:1,5:5,9:9").Select
End Sub
qui pourra peut-être t'aider.

Serge

"Simnet" a écrit dans le message de
news: 33b301c4291e$03435ac0$
Bonjour à tous !

J'ai un petit problème.
Je développe une petite appli Excel et pour ça, j'ai besoin
de pouvoir réaliser de manière automatique une selection de
différentes lignes.
En clair, je dois pouvoir, en fonction de leur contenu,
selectionner par exemple la ligne 2 puis ajouter à la
selection la ligne 5 puis la 7 etc... Pour finalement
avoir une selection de plusieurs lignes.
La selection de la première ligne, pas de pbs (Range
("1:1").Select), mais comment "ajouter" d'autres lignes à
cette selection ?

Si quelqu'un a un élément de réponse, je suis preneur ;) !

Simnet.
Avatar
Simnet
Merci Serge

Malheureusement, ce que je voudrais c'est faire qqchose du
style :
MaSelection = Range("1:1,5:5,9:9").Select
puis
MaSelection = MaSelection + Range("12:12").Select
par exemple...

Alors bien évidement, ceci ne marche pas, mais c'est ce
que je cherche à faire...

Mais merci quand même ;)

Simnet.

-----Message d'origine-----
Salut Simnet,

Un exemple de sélection multiple :
Sub SélectionneLignes()
Range("1:1,5:5,9:9").Select
End Sub
qui pourra peut-être t'aider.

Serge

"Simnet" a écrit
dans le message de

news: 33b301c4291e$03435ac0$
Bonjour à tous !

J'ai un petit problème.
Je développe une petite appli Excel et pour ça, j'ai
besoin

de pouvoir réaliser de manière automatique une selection
de

différentes lignes.
En clair, je dois pouvoir, en fonction de leur contenu,
selectionner par exemple la ligne 2 puis ajouter à la
selection la ligne 5 puis la 7 etc... Pour finalement
avoir une selection de plusieurs lignes.
La selection de la première ligne, pas de pbs (Range
("1:1").Select), mais comment "ajouter" d'autres lignes à
cette selection ?

Si quelqu'un a un élément de réponse, je suis preneur ;) !

Simnet.


.



Avatar
garnote
Alors, quelque chose du genre :

Sub SélectionneLignes()
Set Maselection = Range("1:1,5:5,9:9")
Set Maselection = Union(Maselection, Range("12:12"))
Maselection.Select
End Sub

???

Serge


"Simnet" a écrit dans le message de
news: 340701c42921$5944d7c0$
Merci Serge

Malheureusement, ce que je voudrais c'est faire qqchose du
style :
MaSelection = Range("1:1,5:5,9:9").Select
puis
MaSelection = MaSelection + Range("12:12").Select
par exemple...

Alors bien évidement, ceci ne marche pas, mais c'est ce
que je cherche à faire...

Mais merci quand même ;)

Simnet.

-----Message d'origine-----
Salut Simnet,

Un exemple de sélection multiple :
Sub SélectionneLignes()
Range("1:1,5:5,9:9").Select
End Sub
qui pourra peut-être t'aider.

Serge

"Simnet" a écrit
dans le message de

news: 33b301c4291e$03435ac0$
Bonjour à tous !

J'ai un petit problème.
Je développe une petite appli Excel et pour ça, j'ai
besoin

de pouvoir réaliser de manière automatique une selection
de

différentes lignes.
En clair, je dois pouvoir, en fonction de leur contenu,
selectionner par exemple la ligne 2 puis ajouter à la
selection la ligne 5 puis la 7 etc... Pour finalement
avoir une selection de plusieurs lignes.
La selection de la première ligne, pas de pbs (Range
("1:1").Select), mais comment "ajouter" d'autres lignes à
cette selection ?

Si quelqu'un a un élément de réponse, je suis preneur ;) !

Simnet.


.



Avatar
garnote
ou bien :

Sub SélectionneLignes()
Range("1:1,5:5,9:9").Select
MsgBox "Voici un ajout"
Set ajout = Range("12:12")
Union(Selection, ajout).Select
End Sub

Serge


"garnote" a écrit dans le message de news:
PK6ic.4745$
Alors, quelque chose du genre :

Sub SélectionneLignes()
Set Maselection = Range("1:1,5:5,9:9")
Set Maselection = Union(Maselection, Range("12:12"))
Maselection.Select
End Sub

???

Serge


"Simnet" a écrit dans le message de
news: 340701c42921$5944d7c0$
Merci Serge

Malheureusement, ce que je voudrais c'est faire qqchose du
style :
MaSelection = Range("1:1,5:5,9:9").Select
puis
MaSelection = MaSelection + Range("12:12").Select
par exemple...

Alors bien évidement, ceci ne marche pas, mais c'est ce
que je cherche à faire...

Mais merci quand même ;)

Simnet.

-----Message d'origine-----
Salut Simnet,

Un exemple de sélection multiple :
Sub SélectionneLignes()
Range("1:1,5:5,9:9").Select
End Sub
qui pourra peut-être t'aider.

Serge

"Simnet" a écrit
dans le message de

news: 33b301c4291e$03435ac0$
Bonjour à tous !

J'ai un petit problème.
Je développe une petite appli Excel et pour ça, j'ai
besoin

de pouvoir réaliser de manière automatique une selection
de

différentes lignes.
En clair, je dois pouvoir, en fonction de leur contenu,
selectionner par exemple la ligne 2 puis ajouter à la
selection la ligne 5 puis la 7 etc... Pour finalement
avoir une selection de plusieurs lignes.
La selection de la première ligne, pas de pbs (Range
("1:1").Select), mais comment "ajouter" d'autres lignes à
cette selection ?

Si quelqu'un a un élément de réponse, je suis preneur ;) !

Simnet.


.







Avatar
Simnet
Merci !

C'est parfait ! Exactement ce que je cherchais. Merci
beaucoup !

Simnet.
-----Message d'origine-----
ou bien :

Sub SélectionneLignes()
Range("1:1,5:5,9:9").Select
MsgBox "Voici un ajout"
Set ajout = Range("12:12")
Union(Selection, ajout).Select
End Sub

Serge


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

PK6ic.4745$
Alors, quelque chose du genre :

Sub SélectionneLignes()
Set Maselection = Range("1:1,5:5,9:9")
Set Maselection = Union(Maselection, Range("12:12"))
Maselection.Select
End Sub

???

Serge


"Simnet" a écrit
dans le message de


news: 340701c42921$5944d7c0$
Merci Serge

Malheureusement, ce que je voudrais c'est faire qqchose
du


style :
MaSelection = Range("1:1,5:5,9:9").Select
puis
MaSelection = MaSelection + Range("12:12").Select
par exemple...

Alors bien évidement, ceci ne marche pas, mais c'est ce
que je cherche à faire...

Mais merci quand même ;)

Simnet.

-----Message d'origine-----
Salut Simnet,

Un exemple de sélection multiple :
Sub SélectionneLignes()
Range("1:1,5:5,9:9").Select
End Sub
qui pourra peut-être t'aider.

Serge

"Simnet" a écrit
dans le message de

news: 33b301c4291e$03435ac0$
Bonjour à tous !

J'ai un petit problème.
Je développe une petite appli Excel et pour ça, j'ai
besoin

de pouvoir réaliser de manière automatique une
selection



de
différentes lignes.
En clair, je dois pouvoir, en fonction de leur contenu,
selectionner par exemple la ligne 2 puis ajouter à la
selection la ligne 5 puis la 7 etc... Pour finalement
avoir une selection de plusieurs lignes.
La selection de la première ligne, pas de pbs (Range
("1:1").Select), mais comment "ajouter" d'autres
lignes à



cette selection ?

Si quelqu'un a un élément de réponse, je suis
preneur ;) !




Simnet.


.







.