Générer un message d'erreur en ouvrant un onglet

Hébewan Kenoby -  
eriiic Messages postés 25847 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

J'ai créé un onglet Excel qui n'est composé que de formules qui copient les autres onglets (pour une synthèse)

Comme je ne suis pas le seul à travailler avec, et que certains utilisateurs ne le verront pas, je voudrait faire apparaître un message d'erreur dès l'ouverture de l'onglet, comme
"/!\ cet onglet se met à jour automatiquement, merci de modifier les tableaux d'origine"

Mais je ne sais plus du tout comment faire (plus entendu parlé de macro depuis 5 ans, c'est loin!)

Comment faire?
Merci :-D
Benoit
A voir également:

3 réponses

Gyrus Messages postés 3360 Statut Membre 526
 
Bonjour,

Tu peux copier cette procédure dans le module de la feuille concernée :
Private Sub Worksheet_Activate()
MsgBox "ATTENTION ! cet onglet se met à jour automatiquement" & Chr(10) & "Merci de modifier les tableaux d'origine.", vbExclamation + vbOKOnly
End Sub

A+
1
Hébewan Kenoby
 
Merci Gyrus!! c'est parfait.
J'ai même compris le code. Bon pas jusqu'à le reproduire mais c'est déjà ça^^
0
eriiic Messages postés 25847 Date d'inscription   Statut Contributeur Dernière intervention   7 279
 
Bonjour,

Dans VBE tu peux aussi mettre la propriété Visible de la feuille à xlSheetVeryHidden (F4 pour faire apparaitre la fenêtre des propriétés).
Elle n'apparaitra plus dans les feuilles à afficher. Et on peut supposer que celui qui ira au même endroit pour la réafficher connait suffisamment excel pour ne pas faire de bêtises.

eric
1
Hébewan Kenoby
 
Mais alors personne ne vera le feuille en question? c'est pas le but
Ou alors j'ai pas compris. j'essaie pour voir^^
0
eriiic Messages postés 25847 Date d'inscription   Statut Contributeur Dernière intervention   7 279
 
Ok, j'ai mal compris.
Je pensais que c'était une feuille intermédiaire de calcul qui ne servait pas à la visualisation.
Dans ce cas pourquoi ne pas protéger ta feuille (sans mot de passe, on l'oublie toujours...)?
Plus personne ne pourra écrire dedans par inadvertance. Tu peux déverrouiller certaines cellules si des saisies sont nécessaires à certains endroits.

eric
0
Hébewan Kenoby
 
Dans EnableSelection>1-XlUnlockCells?
ça a l'air bien comme solution. Je ne saurais pas débloquer une cellule mais c'est bien comme ça
0
eriiic Messages postés 25847 Date d'inscription   Statut Contributeur Dernière intervention   7 279
 
Non, tout ça peut se faire hors vbe.
Pour déverrouiller des cellules les sélectionner, clic-droit dessus, 'Format de cellule / Protection', décocher 'Verrouillée'.
Tu peux aussi cocher 'Masquée' si tu ne veux pas qu'on voit les formules.
Ensuite protéger la feuille par un clic-droit sur le nom d'onglet.

eric
0
cs_Le Pivert Messages postés 8437 Statut Contributeur 729
 
Bonjour,

Faire Alt F11 pour accéder à l'éditeur, ensuite en haut à gauche sélectionner la feuille concernée et mettre ce code:

Option Explicit

Private Sub Worksheet_Activate()
MsgBox "/!\ cet onglet se met à jour automatiquement, merci de modifier les tableaux d'origine"
End Sub


0