Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Exécution macro

H

Han

Guest
Bonjour,

Comment excéuter une macro VBA automatiquement à l'ouverture d'un fichier xls?

Merci
 
N

nono

Guest
Bonjour à tous,

Dans ton fichier xls, tu vas sous visual basic dans thisworbook.

Private Sub Workbook_Open()
Ici, tu mets ta macro
End Sub

Dès que tu ouvrira ton dossier, ta macro s'accomplira

Bruno
 
H

Han

Guest
Merci Bruno,

J'ai déjà des instructions dans le Workbook_Open(), mais je veux y ajouter les commandes suivantes pour personnaliser le menu bar:

Set myMenuBar = CommandBars.ActiveMenuBar
Set newMenu = myMenuBar.Controls.Add(Type:=msoControlPopup, _
Temporary:=True)
newMenu.Caption = "Mon Appliaction"
Set ctrl1 = newMenu.Controls _
.Add(Type:=msoControlButton, ID:=1)
ctrl1.Caption = "Run Application"
ctrl1.TooltipText = "Run Application"
ctrl1.Style = msoButtonCaption

With ctrl1
.FaceId = 2
.OnAction = "Introduction"
End With etc ....


Mais j'obtiens un message d'erreur. ça marche dans un module indépendant et non dans le workbook???
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…