module du genre Worksheet_Change INACTIFS

  • Initiateur de la discussion Initiateur de la discussion jhofman
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

jhofman

XLDnaute Occasionnel
Bonjour,


Je n'arrive plus à activer les fonctions liées aux feuilles comme

Code:
Workbook_SheetBeforeDoubleClick
Workbook_SheetChange
Worksheet_Change

😕
Merci de votre aide
 

Pièces jointes

Dernière édition:
Re : module du genre Worksheet_Change INACTIFS

Bonjour jhofman,

C'est normal, tu as, dans le code de la feuille (sur ton fichier exemple), 2 fois : Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range). De toutes façons celui restant est inopérant.

Suppriime l'un ou l'autre et cela va fonctionner.

Bonne journée.

Jean-Pierre
 
Dernière édition:
Re : module du genre Worksheet_Change INACTIFS

Bonjour jhhofman, Jean-Pierre🙂

pour fonctionner, ton code devrait être positionné dans le module "thisworkbook" :

Code:
Private Sub [B][COLOR="Red"]Workbook[/COLOR][/B]_SheetChange(ByVal Sh As Object, ByVal Target As Range)

Mais, à priori dans ton exemple, comme il ne s'applique qu'à une seule feuille, tu peux le placer dans le module de la feuille, en le modifiant ainsi :

Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
MsgBox "test2"
Cells(1, 1) = Time
End Sub

bonne journée
@+
 
Re : module du genre Worksheet_Change INACTIFS

Merci jeanpierre & Pierrot93

j'ai cru un peu vite qu'il suffisait de déplacer une fonction de thisworkbook à feuill1 et inversement pour voir le champs d'application modifier.
ce n'est pas aussi simple merci de ce rappel.🙂
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
9
Affichages
509
  • Question Question
Réponses
7
Affichages
512
Réponses
1
Affichages
134
Réponses
6
Affichages
345
Réponses
1
Affichages
163
Réponses
15
Affichages
648
W
Réponses
1
Affichages
398
Réponses
4
Affichages
233
Réponses
4
Affichages
525
  • Question Question
Microsoft 365 worksheet_change
Réponses
29
Affichages
1 K
Retour