Bonjour,
j'ai malheureusement téléchargé une macro complémentaire pour " rétablir le
point du pavé numérique" je l'ai lancé plusieurs fois sans en connaitre le
résultat. Je me retrouve maintenant avec 8 fois le fonction dans la barre de
défillement! Je ne peu plus l'efface car le non du classeur est introuvable
(Classheures.xlt). Comment puis supprimer cette macro?
Merci
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.516 / Virus Database: 313 - Release Date: 01/09/03
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
Xoco
qu est ce que tu appelles barre de defilement?
si c tes barres d outils, tout ce que tu veux savoir et plus encore se trouve sur cette page
http://www.excelabo.net/xl/barres.php
si c tes menus defilants, pour ajouter un menu, et ses sous menus, c : With CommandBars(1).Controls.Add(msoControlPopup, before:=5) .Caption = "Nom du menu" With .Controls.Add(msoControlButton) .Caption = "Tri croissant" .FaceId = 210 .BeginGroup = True .OnAction = "Affiche" End With With .Controls.Add(msoControlButton) .Caption = "Tri décroissant" .FaceId = 211 .BeginGroup = False .OnAction = "Affiche" End With End With
et pout supprimer c :
CommandBars(1).Controls("Nom du menu").Delete
Dans ton cas, fait : dim ctrl as control For each ctrl in commandsbars(1) msgbox(ctrl.name) next ctrl afin de savoir tous les elements qui sont dans ton menu, et si tu arrive a identifier le bon grace a son nom J espere avoir repondu a ta question Bonne nuit Xoco
-----Message d'origine----- Bonjour, j'ai malheureusement téléchargé une macro complémentaire pour " rétablir le
point du pavé numérique" je l'ai lancé plusieurs fois sans en connaitre le
résultat. Je me retrouve maintenant avec 8 fois le fonction dans la barre de
défillement! Je ne peu plus l'efface car le non du classeur est introuvable
(Classheures.xlt). Comment puis supprimer cette macro? Merci
--- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.516 / Virus Database: 313 - Release Date: 01/09/03
.
qu est ce que tu appelles barre de defilement?
si c tes barres d outils, tout ce que tu veux savoir et
plus encore se trouve sur cette page
http://www.excelabo.net/xl/barres.php
si c tes menus defilants,
pour ajouter un menu, et ses sous menus, c :
With CommandBars(1).Controls.Add(msoControlPopup,
before:=5)
.Caption = "Nom du menu"
With .Controls.Add(msoControlButton)
.Caption = "Tri croissant"
.FaceId = 210
.BeginGroup = True
.OnAction = "Affiche"
End With
With .Controls.Add(msoControlButton)
.Caption = "Tri décroissant"
.FaceId = 211
.BeginGroup = False
.OnAction = "Affiche"
End With
End With
et pout supprimer c :
CommandBars(1).Controls("Nom du menu").Delete
Dans ton cas, fait :
dim ctrl as control
For each ctrl in commandsbars(1)
msgbox(ctrl.name)
next ctrl
afin de savoir tous les elements qui sont dans ton menu,
et si tu arrive a identifier le bon grace a son nom
J espere avoir repondu a ta question
Bonne nuit
Xoco
-----Message d'origine-----
Bonjour,
j'ai malheureusement téléchargé une macro complémentaire
pour " rétablir le
point du pavé numérique" je l'ai lancé plusieurs fois
sans en connaitre le
résultat. Je me retrouve maintenant avec 8 fois le
fonction dans la barre de
défillement! Je ne peu plus l'efface car le non du
classeur est introuvable
(Classheures.xlt). Comment puis supprimer cette macro?
Merci
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.516 / Virus Database: 313 - Release Date:
01/09/03
si c tes barres d outils, tout ce que tu veux savoir et plus encore se trouve sur cette page
http://www.excelabo.net/xl/barres.php
si c tes menus defilants, pour ajouter un menu, et ses sous menus, c : With CommandBars(1).Controls.Add(msoControlPopup, before:=5) .Caption = "Nom du menu" With .Controls.Add(msoControlButton) .Caption = "Tri croissant" .FaceId = 210 .BeginGroup = True .OnAction = "Affiche" End With With .Controls.Add(msoControlButton) .Caption = "Tri décroissant" .FaceId = 211 .BeginGroup = False .OnAction = "Affiche" End With End With
et pout supprimer c :
CommandBars(1).Controls("Nom du menu").Delete
Dans ton cas, fait : dim ctrl as control For each ctrl in commandsbars(1) msgbox(ctrl.name) next ctrl afin de savoir tous les elements qui sont dans ton menu, et si tu arrive a identifier le bon grace a son nom J espere avoir repondu a ta question Bonne nuit Xoco
-----Message d'origine----- Bonjour, j'ai malheureusement téléchargé une macro complémentaire pour " rétablir le
point du pavé numérique" je l'ai lancé plusieurs fois sans en connaitre le
résultat. Je me retrouve maintenant avec 8 fois le fonction dans la barre de
défillement! Je ne peu plus l'efface car le non du classeur est introuvable
(Classheures.xlt). Comment puis supprimer cette macro? Merci
--- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.516 / Virus Database: 313 - Release Date: 01/09/03