OVH Cloud OVH Cloud

Selection d'un range pour le clic souris

3 réponses
Avatar
Mike
bonjour =E0 toutes & tous

dans un classeur j'ai deux =E9v=E9nements souris que j'aimerai=20
limit=E9 =E0 certaines zones des feuilles
dans un premier cas les cellules sont c=F4te =E0 c=F4te par=20
exemple zone A1:B10
et dans l'autre cas non par exemple zone A1:A6 et D1:D6
comment puis je faire pour que l'=E9v=E9nement se produise que=20
lorsque je clique dans la zone souhait=E9e
merci pour votre aide.

3 réponses

Avatar
ru-th
Salut Mike

pas sûr d'avoir compris ce que tu souhaites
dans ton évenement (sheetChange ou sheetSelectionChange ?)
if intersect(target,range("a1:b10")) is nothing then exit sub
'le reste de ton code
--
a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo (à l'essai)

"Mike" a écrit dans le message de news:
01b901c38124$886c4ab0$
bonjour à toutes & tous

dans un classeur j'ai deux événements souris que j'aimerai
limité à certaines zones des feuilles
dans un premier cas les cellules sont côte à côte par
exemple zone A1:B10
et dans l'autre cas non par exemple zone A1:A6 et D1:D6
comment puis je faire pour que l'événement se produise que
lorsque je clique dans la zone souhaitée
merci pour votre aide.
Avatar
AV
Pour déclencher l'évènement sur des plages discontinues :

Private Sub Worksheet_SelectionChange(ByVal zz As Range)
If Not Intersect(zz, Union(Range("A1:A6"), Range("D1:D6"))) Is Nothing Then
MsgBox "zz"
End Sub

AV
Avatar
Vincent.
Salut !
Dans le code qui s'exéctent au click, tu peux utiliser le
code suivant :
if not isempty(intersect(target, range("A1:A6,D1:D6")))
then.......

C du pas tester du tout :-|


Vincent.

-----Message d'origine-----
bonjour à toutes & tous

dans un classeur j'ai deux événements souris que
j'aimerai

limité à certaines zones des feuilles
dans un premier cas les cellules sont côte à côte par
exemple zone A1:B10
et dans l'autre cas non par exemple zone A1:A6 et D1:D6
comment puis je faire pour que l'événement se produise
que

lorsque je clique dans la zone souhaitée
merci pour votre aide.

.