[Résolu] Excel : problème de bouton

[benden]

Salut a tous

 

il m'arrive un "truc" que je ne comprend pas avec excel.

 

j'ai créer plusieur bouton sur une page, pour simplifier leur utilité, un cache des colonnes et en montre d'autre, le deuxieme fait le contraire....,le truc c'est que chaque fois que je clik sur un bouton, le texte ecrit sur le bouton reduit, je reclik il reréduit jusqu a devenir minuscule?????? et illisible...

entre chaque clik si je verifi la grosseur de la font dans les propriete "commandbutton", elles sont toujours a 12 ????

 

Que faire....

[korentin]

Bonsoir,

juste une idée en passant :

tu dis que ton bouton sert à masquer des colonnes.

est ce qu'il n'est pas à cheval sur ces colonnes?

 

je viens de faire le test, ça ne donne rien mais il me semble avoir déjà euce genre de petit désagrément...

[benden]

Je viens de tester ton idee Korentin...

 

le bouton est inferieur a la colonne.....j'ai tester les option, cacher avec, agrandi avec.....rien n'y fait......

[KewlCat]

Tu pourrais nous donner le code qui correspond au click() sur le bouton ?

La version d'Excel utilisée ?

[benden]

Excel 2003

 

Le premier bouton la fin du code VBA est:

 

Columns("a:e").Select

Selection.EntireColumn.Hidden = True

Columns("g:P").Select

Selection.EntireColumn.Hidden = False

ActiveWindow.View = xlPageBreakPreview

Range("g1").Select

ActiveSheet.Protect

 

La fin du VBA deuxieme bouton est :

 

ActiveSheet.Unprotect

ActiveWindow.View = xlNormalView

Columns("F:P").Select

Selection.EntireColumn.Hidden = True

Columns("a:e").Select

Selection.EntireColumn.Hidden = False

 

Range("A1").Select

ActiveSheet.Protect

Modifié le 6 janvier 2008 par benden

[benden]

******J'ai la réponse à mon probleme....

 

En utilisant la fonction, xlPageBreakPreview puis en la quittant puis en y revenant a chaque fois l'ecriture de mon bouton ce retréci.....

en otant cette fonction, mon probleme disparait.

 

Je contourne mon probleme, mais ne peut donc utiliser la vue "saut de page"......

 

 

J'apporte une correction en vous donnant la reponse que j'ai recu de MPi dans le forum de vbfrance:

 

------------------Change la propriété Autosize de tes boutons pour True. Ça va remettre ta police comme il faut.

 

Par contre, pour ce que tu cherches à faire, tu serais peut-être mieux d'utiliser les boutons de la barre Formulaire ou ceux de la barre de dessin. Ces contrôles ne sont pas des boutons comme tels. Ce sont des "Shapes". Il n'y a pas d'événement Click() ou autre relié à ceux-ci. Tu cliques droit sur ces contrôles et tu leur affectes une macro préalablement créée.

 

Je viens de faire un test avec un de mes programmes et les boutons demeurent à leur endroit même si je masque des colonnes sous ceux-ci. Personnellement, sur une feuille, je préfère utiliser les Shapes.----------------------------

 

MPi²

 

le resultat est excellent...

Si ca peut servir a d'autre ....

 

Salut

Modifié le 7 janvier 2008 par benden