Simple ou Double Click sur Plusieurs Plages

[roby]

Bonsoir le Forum

une petite question,

peut-on attribuer par un simple click ou double click dans une Zone1 une macro1 sans pour autant que celle-ci se declanche sur toute les feuilles?

exemple de code dans ThisWorkBook:
Private Sub Workbook_SheetBeforeDoubleClick(ByVal Sh As Object, ByVal Zone1 As Range, Cancel As Boolean)
'Double Click - Zone Heures / Poste
'----------------------------------
If Not Application.Intersect(Zone1, Range("Plan!E16:M46")) Is Nothing Then UsfHeures.Show
If Not Application.Intersect(Zone1, Range("Plan:O16:O46")) Is Nothing Then UsfPostes.Show
End Sub

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Zone2 As Range)
'Simple Click - Zone Heures / Poste
'----------------------------------
If Not Application.Intersect(Zone2, Range("Plan!E16:M46")) Is Nothing Then UsfHeures.Show
If Not Application.Intersect(Zone2, Range("Plan!O16:O46")) Is Nothing Then UsfPostes.Show


ou bien dans la feuille Plan ajouter:

Private Sub Worksheet_BeforeDoubleClick(ByVal Zone As Range, Cancel As Boolean)
'Double Click - Ticket
'---------------------
If Not Intersect([X16:X46], Zone) Is Nothing Then Zone.Value = IIf(Zone.Value = "", "T", "")
'Double Click - Régularisation Paie
'----------------------------------
If Not Intersect([Y16:Y46], Zone) Is Nothing Then Zone.Value = IIf(Zone.Value = "", "R", "")
End Sub


merci d'avance Roby

 

[jeanpierre]

Re : Simple ou Double Click sur Plusieurs Plages

Bonsoir Roby, le forum,

Dans une procédure événementielle avec les clics, ont ne peut mettre que deux possibilités, plus deux... (me semble-t'il)

Clic droit, double clic droit
Clic gauche, double clic gauche

Sachant aussi que cela réduit la possiblité de travailler sur la feuille à la souris.

Sinon, je ne sais pas, je n'ai pas essayer autre chose à ce jour....

Curieux, j'attends comme toi une réponse différente.

Bonne soirée,
Bon muguet,

Jean-Pierre

 

[roby]

Re : Simple ou Double Click sur Plusieurs Plages

Bonsoir JeanPierre, le Forum,

merci de ta réponse, je ne savais pas qu'il y avait que 2 possibilités.

peut etre que quelcun connait une astuce qui contourneraitce probleme.


bonne soirée à toi


Roby

 

[jeanpierre]

Re : Simple ou Double Click sur Plusieurs Plages

Re Roby,

J'ai dit deux, mais deux fois deux...... (mon petit calcul = 4, mais pas comme mon percepteur qui trouve 2 et 2 = 5, voire 2 * 2 = 5 😱 😡 )

Le clic, le double clic....

Le gauche, le droit,

C'est-à-dire une possibilité clic droit, une autre, double clic droit et aussi, clic gauche et double clic gauche....

Après, je ne sais...

Re à toi...

Jean-Pierre

 

[roby]

Re : Simple ou Double Click sur Plusieurs Plages

re,

j'avais bien compris pour 2 de chaques lol

A+ Roby

 

[jeanpierre]

Re : Simple ou Double Click sur Plusieurs Plages

Re,

Je penses aussi que tu avait bien compris... mais des fois et dans d'autres circonstances, c'est pas toujours sûr. alors....