msg au changement de feuille

[pascal21]

bonsoir les "forumeurs"
je cherche le moyen d'avoir un msg au changement de feuille du genre"vous êtes sur la feuille de "nom de l'onglet""
ce message si possible ne devrait resté visible que quelques secondes (2 ou 3)
ceci afin d'eviter (limiter)des saisies sur le mauvais onglet
est-ce possible?
merci

 

[Staple1600]

Re : msg au changement de feuille

Bonjour

EDITION: a mettre dans ThisWorkBook

Issue de l'aide Excel (F1)

SheetActivate, événement - Exemple
Cet exemple montre comment afficher le nom de chaque feuille activée.

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
MsgBox Sh.Name
End Sub

Tu peux modifier ainsi

MsgBox "Vous êtes sur l'onglet : " & Sh.Name

 

[Compte Supprimé 979]

Re : msg au changement de feuille

Salut Pascal21, Staple1600

Pascal21, voilà un fichier avec un petit USF non modal qui t'affiche ton message et disparait tout seul

A+

 

[Staple1600]

Re : msg au changement de feuille

Re, bonjour BrunoM45


Le code de l'aide modifé:

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Dim x
x = MsgBox("Vous êtes sur la feuille : " & Sh.Name & Chr(13) & "Etes-vous sûr de votre choix?", vbYesNoCancel + vbQuestion, "Avertissement")
Select Case x
Case vbYes
MsgBox "Vous pouvez commencer votre saisie"
Case vbNo
If Sh.Index <> 1 Then Sheets(Sh.Index - 1).Select
Case Else
Cancel = True
End Select
End Sub

pascal21 :A l'usage, cela se révèle pénible non ?

 

[pascal21]

Re : msg au changement de feuille

bonsoir bruno stapple
j'ai utilisé le code de stapple car il correspondait polus à ce que je cherchais
un msg sans clic pour valider
merci à vous deux

 

[Compte Supprimé 979]

Re : msg au changement de feuille

Re,
Je n'ai pas du tout comprendre
Ta demande :

je cherche le moyen d'avoir un msg au changement de feuille du genre"vous êtes sur la feuille de "nom de l'onglet""
ce message si possible ne devrait resté visible que quelques secondes (2 ou 3)

Donc avec la solution de staple1600, tu es obligé de cliquer sur OUI/NON/Annuler

Alors que d'après ce que tu demandes tu ne voulais pas le faire!?

M'enfin faudrait savoir ...

 

[pascal21]

Re : msg au changement de feuille

bonjour
oui autant pour moi il s'agit de ta solution bruno que j'ai choisi en fait
ça correspondait tellement pile poil que je n'ai eu qu'a recopier le code sans y apporter de retouche si ce n'est les dimensions de l'userform et du label
l'heure tardive certainement!!!! lol