XL 2016 VBA msgbox seulement lorsque la première macro est activé

Vero2782

XLDnaute Nouveau
Bonjour,
J'ai un fichier avec une quinzaine d'onglets.

Lors de l'ouverture de mon fichier j'ai un msgbox de "Bienvenu".

Puisque le fichier est inconnu de l'utilisateur, je voudrais ajouter un msgbox "d'explications". Je voudrais que ce message pop-up seulement la première fois qu'il active l'un des 6 bouton qui lui est accessible sur la page principale. (Les boutons servent seulement à le faire changer d'onglet automatiquement mais comme les onglets lui sont inaccessible (Cachés), c'est son seul moyen de naviger à travers le document).

Je cherche le code me permettant d'ouvrir le MsgBox seulement la première fois que l'utilisateur clique sur un des boutons.

Merci

Véro
 

Hieu

XLDnaute Impliqué
Salut,

Je créerai une variable booléenne initialement à false, qui devient true à la fin des macros
ex :
VB:
Dim var As Boolean
Sub mlk()
If var = False Then MsgBox ("Ceci est un exemple")
var = True
End Sub
 

Pièces jointes

  • exemple_v0.xlsm
    15.7 KB · Affichages: 34

Vero2782

XLDnaute Nouveau
Ça fonctionne très bien dans ton fichier. Dans le mien, la variable ne veut pas changer de statut (elle ne se met pas à true) Pourtant j'ai quasiement rien changé à ta macro...

Sub Report()
Dim var As Boolean

If var = False Then
Sheets("Report1").Select
MsgBox ("Ceci est un exemple")
var = True
Else
Sheets("Report1").Select
var = True
End If

End Sub
 

Discussions similaires

P
Réponses
2
Affichages
1 K
Philippe
P

Statistiques des forums

Discussions
312 497
Messages
2 088 992
Membres
104 000
dernier inscrit
dinelcia