[VBA WORD] Macro pour faire apparaitre l'assistant
Macro pour faire apparaitre l'assistant [VBA WORD] - VB/VBA/VBS - Programmation
Marsh Posté le 03-02-2011 à 12:41:16
Bonjour,
Vérifier sur les autres postes si l'exécution des macro est autorisée:
Tools-> macro -> security: choisir le niveau adéquat: médium ou Low
fermer word et reouvrir
Après ca doit fonctionner
Mcdx
Message édité par mcdx le 03-02-2011 à 12:44:08
Marsh Posté le 03-02-2011 à 13:09:05
Salut,tout simplement les assistants n'ont peut-être pas été installés
Marsh Posté le 03-02-2011 à 16:36:16
En effet si le niveau de sécurité est surpérieur à moyen la macro ne marche pas!
+
Effectivement c'etait bien un problème d'installation de l'assistant
Je ne savais pas qu'il fallait installer ce module.
Merci pour vos réponses
Sujets relatifs:
- macro TCD: impossible lire propriété PivotTable de la classe WorkSheet
- Changer d'imprimante en VBA sous Access 2000
- Macro excel mise en forme conditionnelle > 3
- [VBA Excel] Afficher message lorsque ...
- [VBA Excel] Macro
- Ajouter un champ DE lors d'un envoi de mail en VBA ?
- Détection d'un séparateur de colonne quelconque (VBA Excel)
- [VBA WORD] Liste deroulante avec source Excel
Marsh Posté le 03-02-2011 à 07:35:36
Salut
J'ai trouvé le code pour faire apparaitre l'assistant à partir d'une macro
Cela marche très bien... mais que sur mon poste!
Pourquoi quand le fichier est ouvert sur un autre poste, l'assistant ne s'affiche pas?
Voici le code:
Private Sub Document_Open()
With Assistant.NewBalloon
.BalloonType = msoBalloonTypeNumbers
.Icon = msoIconTip
.Button = msoButtonSetOK
.Heading = "Avant de commencer..."
.Labels(1).Text = "blabla"
.Labels(2).Text = "blablablabla"
.Labels(3).Text = "blablablablablabla"
.Show
End With
Call Macro
End Sub
Merci