Passer au contenu

Comment créer un objet Balloon sans boutons en langage VBA ?

Solution : en exploitant le paramètre msoButtonSetNone.

Lorsqu’il ne pose pas la question Qu’aimeriez vous faire ?, le Compagnon Office reste silencieux. Vous pouvez profiter de ce moment de répit dans sa logorrhée pour ajouter un texte de votre cru. Recopiez et étudiez le listing ci-dessous, il ajoute deux phrases dans la bulle d’aide. Exécutez cette macro dès l’ouverture de Word. Vous pouvez également la transformer afin de l’intégrer dans la macro automatique AutoOpen() du modèle Normal.dot. L’assistant reviendra systématiquement à la charge avec votre texte dès qu’il aura un moment de répit.

Pour supprimer cet objet Balloon, il suffit de fermer Word (à condition, bien sûr, quil ne soit pas enregistré dans Normal.dot.). Sinon, vous pouvez toujours cliquer sur le Compagnon avec le bouton droit de la souris et choisir la commande Masquer du menu contextuel.Listing :
Sub SansBoutons()
With Assistant.NewBalloon
.BalloonType = msoBalloonTypeButtons
.Icon = msoIconAlertInfo
.Button = msoButtonSetNone
.Heading = “Filigrane Press”
.Text = “Vous avez un planning chargé.” + Chr(13) + “Alors, au travail !”
.Mode = msoModeModeless
.Show
End With
End Sub

🔴 Pour ne manquer aucune actualité de 01net, suivez-nous sur Google Actualités et WhatsApp.


Filigrane Press