Magic_Doctor
XLDnaute Barbatruc
Bonsoir,
Sur la feuille il y a 5 CommandButtons et 5 tableaux. À chaque CommandButton correspond un tableau.
Quand on clique, par exemple, sur le 2ème CommandButton, la couleur du numéro qui lui est attribué (ici 2) passe du vert au rouge et vice versa si on clique de nouveau sur ce même CommandButton. Quand le numéro est vert, le tableau correspondant à ce CommandButton est visible ; quand le numéro est rouge, le tableau est occulté. Tout ça marche très bien.
La plage de cellules qui m'intéresse s'étend de A2 à J67. Pour limiter l'utilisation de la feuille, dans le module "ThisWorkBook", dans "Workbook_Open()", j'ai écrit
Si tous les tableaux sont affichés lors de l'ouverture du classeur, j'ai beau m'escrimer à aller, avec la molette de la souris, jusqu'au bas de la plage autorisée, je n'y parviens pas. Je suis bloqué en chemin. Pour y arriver, je suis obligé de cliquer sur le bas de la barre de défilement vertical. C'est pour le moins pas pratique.
Comment résoudre ce problème ?
Sur la feuille il y a 5 CommandButtons et 5 tableaux. À chaque CommandButton correspond un tableau.
Quand on clique, par exemple, sur le 2ème CommandButton, la couleur du numéro qui lui est attribué (ici 2) passe du vert au rouge et vice versa si on clique de nouveau sur ce même CommandButton. Quand le numéro est vert, le tableau correspondant à ce CommandButton est visible ; quand le numéro est rouge, le tableau est occulté. Tout ça marche très bien.
La plage de cellules qui m'intéresse s'étend de A2 à J67. Pour limiter l'utilisation de la feuille, dans le module "ThisWorkBook", dans "Workbook_Open()", j'ai écrit
VB:
Worksheets(1).ScrollArea = "A2:J67"
Comment résoudre ce problème ?
Pièces jointes
Dernière édition: