OVH Cloud OVH Cloud

MACROS UNIVERSELLES

2 réponses
Avatar
slimane62
Bonjour,
J'ai un fichier est en réseau et plusieurs intervenants peuvent le
modifier.
J'ai crée une barre d'outils personnalisée avec des boutons exécutant
des macros.Le pbm est que quand le fichier est changé(chaque mois),il
faut réattribuer chaque bouton de la barre d'outil au nouveau fichier
(et par ordinateur!!!).
TraditionnellementUn bouton macro est affecté à un seul fichier.Je
voudrais que la barre d'outil personnalisée soit configurée pour
n'importe quel fichier ouvert à partir d'un ordinateur(comme les
barres d'outils classiques d'Excel:Mise en forme,Dessin,Bordures...).

Merci de m'aider en me disant comment faire!
Slimane.

2 réponses

Avatar
FredO
Peut-être en enregistrant les modules de tes macros sur le
modèle de classeur ?
Je crois que cela fonctionne comme le normal.dot de Word.
Dans l'explorateur de projet de Visual Basic éditor, tu
peux voir tout en bas "VBAProject(PERSO.XLS). C'est celui-
là le modèle de classeur dont Excel se sert lorsque tu
crées un nouveau classeur ou lorsque tu ouvres Excel.
Essaye, on ne sait jamais !



-----Message d'origine-----
Bonjour,
J'ai un fichier est en réseau et plusieurs intervenants
peuvent le

modifier.
J'ai crée une barre d'outils personnalisée avec des
boutons exécutant

des macros.Le pbm est que quand le fichier est changé
(chaque mois),il

faut réattribuer chaque bouton de la barre d'outil au
nouveau fichier

(et par ordinateur!!!).
TraditionnellementUn bouton macro est affecté à un seul
fichier.Je

voudrais que la barre d'outil personnalisée soit
configurée pour

n'importe quel fichier ouvert à partir d'un ordinateur
(comme les

barres d'outils classiques d'Excel:Mise en
forme,Dessin,Bordures...).


Merci de m'aider en me disant comment faire!
Slimane.
.



Avatar
michdenis
Bonjour slimane

Au lieu d'utiliser des boutons dans tes feuilles de calcul, utilises plutôt des boutons dans une barre d'outils
personnalisé. Tu attaches cette barre d'outils à ton fichier et dans le ThisWorkbook de ton classeur tu copies ceci en
modifiant le nom que tu as donné à ta barre d'outils personnalisée

Pour attacher ta barre d'outils au classeur :

Barre des menus / affichage / barre d'outils / Personnaliser

Un clic sur le bouton "Attacher"
Tu sélectinnes dans la fenêtre de gauche, ta barre et tu la copies dans la section de droite.

Voilà.



'------------------------------
Private Sub Workbook_Activate()
VoirBarrePersonnalisée
End Sub
'------------------------------
Private Sub Workbook_Deactivate()
'------------------------------
With Application.CommandBars("Denis")
.Enabled = False
.Visible = False
End With
End Sub
'------------------------------
Private Sub Workbook_Open()
VoirBarrePersonnalisée
End Sub
'------------------------------
Sub VoirBarrePersonnalisée()

With Application.CommandBars("Denis")
.Enabled = True
.Visible = True
.Protection = msoBarNoCustomize
End With

End Sub
'------------------------------






"slimane" a écrit dans le message de news:
Bonjour,
J'ai un fichier est en réseau et plusieurs intervenants peuvent le
modifier.
J'ai crée une barre d'outils personnalisée avec des boutons exécutant
des macros.Le pbm est que quand le fichier est changé(chaque mois),il
faut réattribuer chaque bouton de la barre d'outil au nouveau fichier
(et par ordinateur!!!).
TraditionnellementUn bouton macro est affecté à un seul fichier.Je
voudrais que la barre d'outil personnalisée soit configurée pour
n'importe quel fichier ouvert à partir d'un ordinateur(comme les
barres d'outils classiques d'Excel:Mise en forme,Dessin,Bordures...).

Merci de m'aider en me disant comment faire!
Slimane.