Discussion :

[Marianne Hbt]

Bonjour !

Petit problème avec un classeur :

- dans ThisWorkbook, j'ai une macro

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Sub Workbook_Open()

qui se lance automatiquement à l'ouverture de mon fichier (jusque là pas de soucis).

Dans Feuil 1, j'ai une autre macro

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Sub Worksheet_Change(ByVal Target As Range)

Je voudrais exécuter la macro Workbook_Open lorsque la valeur de la cellule B1 de ma feuille 1 change.

Je n'arrive pas à trouver une syntaxe qui voudrait dire :
*Je suis dans Feuil 1*

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Sub Worksheet_Change(ByVal Target As Range)
 
If Target.Address = Range("B1").Address Then
 
Call ThisWorkbook.Workbook_Open
 
End If
 
End Sub

Avez-vous la solution ?

[patricktoulon]

re
oui la solution est simple
tu met le code de ton workbook_open dans une sub nommé par exemple openWorkbook
dans le workbook_open tu l'apelle ainsi que ton autre sub

[Marianne Hbt]

Merci patricktoulon ça fonctionne parfaitement... Pourquoi faire simple quand on peut faire compliqué, je crois que la fatigue m’empêche de réfléchir parfois !

[patricktoulon]

re
Bonjour Marianne
ca fait parti des reflexes maquants quand on debute en VBA et autre language d'ailleurs
compartimenter le code par des sub/fonctions intermediaires te rendront la vie plus facile pour des eventuelles modifs ou corrections