Rationaliser module macro bouton et clic sur cellule

Dranreb

XLDnaute Barbatruc

• 15 Janvier 2017

• #2

Bonsoir.
Vous avez l'évènement Workbook_SheetSelectionChange dans ThisWorkbook pour réagir à la sélection d'une cellule dans toutes les feuilles.

 

Vote positif 0 Vote négatif

M

mfb

XLDnaute Occasionnel

• 15 Janvier 2017

• #3

Re,
Merci Barbatruc
J'ai "bricolé"mais pas crrectement dans This woorkbook car j'ai un message erreur la déclaration ne correspond pas à l'événement.
Où est l'erreur ?

 

Vote positif 0 Vote négatif

M

mfb

XLDnaute Occasionnel

• 15 Janvier 2017

• #4

Re, merci Barbatruc.
J'ai "bricolé" dans This WoorkBook. Pas correctement sans doute car j'ai un message d'erreur la déclaration de procédure ne correspond pas à l'événement.
Où est l'erreur ?
Daniel

 

Pièces jointes

• Module commun.xlsm

  20 KB · Affichages: 20

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 15 Janvier 2017

• #5

L'erreur c'est d'avoir tapé cette instruction Sub.
Il ne faut jamais le faire pour les procédures de prise en charge d'évènements.
Il faut toujours utiliser pour cela les liste déroulantes surmontant la fenêtre de code.
Sélectionnez Workbook dans la "Objet", celle de gauche, et SheetSelectionChange dans la "Procédure", celle de droite.
Ça met en fait :

VB:

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)

 

Vote positif 0 Vote négatif

M

mfb

XLDnaute Occasionnel

• 15 Janvier 2017

• #6

Re,
Super Barbatruc.
Merci pour cette leçon. J'ai, hé oui ! réussi à la mettre en oeuvre.
Alors bonne soirée.
Daniel

 

Vote positif 0 Vote négatif