Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Ajouter un bouton au menu Données

Ajouter un bouton au menu Données

4 réponses
Avatar
Régis
Bonjour,

Je souhaite ajouter un bouton de commande dans le menu=20
donn=E9es d'Xl sous la commande convertir. Comment d=E9clarer=20
celui-ci ?

D'avance merci
Signaler un problème avec ce contenu

4 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Eric
Bonjour

Outils/Personnaliser
Onglet Commandes & catégorie Macro

Eric




-----Message d'origine-----
Bonjour,

Je souhaite ajouter un bouton de commande dans le menu
données d'Xl sous la commande convertir. Comment déclarer
celui-ci ?

D'avance merci
.



Avatar
Régis
Bonjour Eric,

Je crains de m'être fort mal expliqué. JE souhaite ajouter
un bouton dans le menu Données mais en Vba sur
Workbook_open. Il s'agit de lier une macro dans ce menu
pour une feuille particulière. Suppression du bonton à la
fermeture dans le Before_close.

Merci toutefois pour ta réponse rapide.

Cordialement,
-----Message d'origine-----
Bonjour

Outils/Personnaliser
Onglet Commandes & catégorie Macro

Eric




-----Message d'origine-----
Bonjour,

Je souhaite ajouter un bouton de commande dans le menu
données d'Xl sous la commande convertir. Comment
déclarer


celui-ci ?

D'avance merci
.

.





Avatar
Eric
Voila qui devrait te convenir

Création du bonton à l'ouveture :
Private Sub Workbook_Open()
Set bouton = Application.CommandBars("Data").Controls.Add
(Type:=msoControlButton, ID:)50, Before:=8)
With bouton
.Caption = "Coucou"
.OnAction = "PERSO.XLS!CouCouTest"
End With
End Sub

Supression du bouton à la fermeture
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.CommandBars("Data").Controls(8).Delete
End Sub

Bon courage

Eric


-----Message d'origine-----
Bonjour Eric,

Je crains de m'être fort mal expliqué. JE souhaite
ajouter

un bouton dans le menu Données mais en Vba sur
Workbook_open. Il s'agit de lier une macro dans ce menu
pour une feuille particulière. Suppression du bonton à la
fermeture dans le Before_close.

Merci toutefois pour ta réponse rapide.

Cordialement,
-----Message d'origine-----
Bonjour

Outils/Personnaliser
Onglet Commandes & catégorie Macro

Eric




-----Message d'origine-----
Bonjour,

Je souhaite ajouter un bouton de commande dans le menu
données d'Xl sous la commande convertir. Comment
déclarer


celui-ci ?

D'avance merci
.

.


.






Avatar
Régis
Un tout grand merci Eric.

Ca fonction à merveille, je me coucherai moins inculte
qu'au levé.

Très cordialement,
-----Message d'origine-----
Voila qui devrait te convenir

Création du bonton à l'ouveture :
Private Sub Workbook_Open()
Set bouton = Application.CommandBars("Data").Controls.Add
(Type:=msoControlButton, ID:)50, Before:=8)
With bouton
..Caption = "Coucou"
..OnAction = "PERSO.XLS!CouCouTest"
End With
End Sub

Supression du bouton à la fermeture
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.CommandBars("Data").Controls(8).Delete
End Sub

Bon courage

Eric


-----Message d'origine-----
Bonjour Eric,

Je crains de m'être fort mal expliqué. JE souhaite
ajouter

un bouton dans le menu Données mais en Vba sur
Workbook_open. Il s'agit de lier une macro dans ce menu
pour une feuille particulière. Suppression du bonton à
la


fermeture dans le Before_close.

Merci toutefois pour ta réponse rapide.

Cordialement,
-----Message d'origine-----
Bonjour

Outils/Personnaliser
Onglet Commandes & catégorie Macro

Eric




-----Message d'origine-----
Bonjour,

Je souhaite ajouter un bouton de commande dans le menu
données d'Xl sous la commande convertir. Comment
déclarer


celui-ci ?

D'avance merci
.

.


.


.