VBA afficher un message au démarrage

  • Initiateur de la discussion Initiateur de la discussion pajude
  • 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 !

P

pajude

Guest
Bonjour à tous,
J'aurai besoin de quelque chose que j'estime simple, mais compliqué, 😕,pour moi qui ne connait pas grand chose en VBA.
J'ai un tableau et dans la cellule A1, le saint du jour s'affiche et il change chaque jour selon le calendrier.
Je voudrais qu'à l'ouverture de mon tableau, le saint du jour s'affiche dans un pop up ou msg box ou useform.
Merci à tous
Pajude
 
Re : VBA afficher un message au démarrage

bonsoir Pajude le forum,
si ta feuillle s'appelle Feuil1 autrement tu change là ou c'est en rouge
oui j'ai oublié tu mets cela dans le Thisworkbook, si tu n'y arrives pas tu joins ton fichier
a+
papou 🙂
Code:
msgbox [COLOR=Red][COLOR=Black]"Aujourd'hui c'est la Saint "[/COLOR] &feuil1[/COLOR].cells(1,1)
 
Re : VBA afficher un message au démarrage

Bonsoir, salut Papou

A ce moment-là, en reprenant le code de papou, je pense qu'il faut utiliser l'événement Open

A+

Bonjour à tous les deux !
Merci beaucoup,
Je savais ce qui peut sembler impossible à une personne, peut etre moins compliqué, voire simple à d'autre.
Cette formule ne vient pas d'un quelconque Philosophe, mais tout simplement ma façon de dire les choses.
je souhaite à toute la communauté une bonne continuation.
Merci du service rendu
Pajude😉
 
Re : VBA afficher un message au démarrage

bonjour tous. avec une petite tempo pour fermer cela peut être sympa!!!

Code:
Private Sub Workbook_Open()
CreateObject("Wscript.shell").Popup "Aujourd'hui c'est la Saint " _
 & Feuil1.Cells(1, 1), 2, "pour info!!", vbInformation
End Sub
 
- 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
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

A
Réponses
11
Affichages
2 K
A
T
  • Résolu(e)
Microsoft 365 Worksheet.saveas
Réponses
1
Affichages
991
V
Réponses
0
Affichages
2 K
V
M
Réponses
3
Affichages
2 K
M
Z
Réponses
12
Affichages
5 K
zorglubxp
Z
M
Réponses
2
Affichages
2 K
martin01
M
Retour