Bouton afficher/masquer des colonnes

Résolu/Fermé

wikimel Messages postés 23 Date d'inscription dimanche 5 juillet 2015 Statut Membre Dernière intervention 3 janvier 2017 - 22 juil. 2015 à 13:36
wikimel Messages postés 23 Date d'inscription dimanche 5 juillet 2015 Statut Membre Dernière intervention 3 janvier 2017 - 22 juil. 2015 à 21:28

Bonjour,

Avant toute chose, merci de prendre le temps de lire ce post.

Ma question est la suivante:

Je souhaite créer un bouton "Afficher/Masquer les colonnes"

Un clic et les colonnes C, I, O, U et Z sont masquées. Un autre clic et elles reviennent. C'est possible?

J'ai essayé d'enregistrer une macros mais impossible d'avoir les 2 commandes et d'appliquer les 2 macros au bouton

En VBA je suppose qu'il doit y avoir moyen d'indiquer les 2 directives...malheureusement mes connaissances ne vont pas aussi loin.

Merci de votre aide

Wikimel

A voir également:

Excel afficher masquer colonne bouton + -
Déplacer une colonne excel - Guide
Formule somme excel colonne - Guide
Trier colonne excel - Guide
Liste déroulante excel - Guide
Figer colonne excel - Guide

1 réponse

Réponse 1 / 1

ThauTheme Messages postés 1442 Date d'inscription mardi 21 octobre 2014 Statut Membre Dernière intervention 29 juillet 2022 160
22 juil. 2015 à 15:45

Bonjour Wikimel,

Tu places dans l'onglet un CommandButton issu des contrôles ActiveX. Tu modifie sa propriété [Caption] pour que "Masquer" soit le texte initial du bouton et tu lui colles le code ci-dessous :

Private Sub CommandButton1_Click()
ActiveCell.Select 'enève le focus au bouton
Select Case Me.CommandButton1.Caption 'agit en fonction du texte du bouton
    Case "Masquer" 'cas "Masquer"
        Me.CommandButton1.Caption = "Afficher" 'modifie le texte du bouton
        Range("C1,I1,O1,U1,Z1").EntireColumn.Hidden = True 'masque les colonne C, I, O, U et Z
    Case "Afficher" 'cas "Afficher"
        Me.CommandButton1.Caption = "Masquer" 'modifie le texte du bouton
        Range("C1,I1,O1,U1,Z1").EntireColumn.Hidden = False 'masque les colonne C, I, O, U et Z
End Select 'fin de l'action en fonction du texte du bouton
End Sub

Tu peux aussi utiliser un ToggleButton (Bouton Bascule comme un interrupteur)... Mais je ne l'aime pas ce contrôle...

wikimel Messages postés 23 Date d'inscription dimanche 5 juillet 2015 Statut Membre Dernière intervention 3 janvier 2017
22 juil. 2015 à 21:28

Super! C'est encore mieux que ce que j'avais imaginé avec le nom qui change dans le bouton.

Merci mille fois

Discussions similaires

xbox 360 avec voyant rouge fixe

bonsoir!
ns avons acheté une xbox 3660 d'occase à notre fils depuis quelques temps le voyant était rouge mais au bout d'un moment ça revenez vert et là plus rien tjrs voyant rouge et sur la téle il est marqué E 71 HELP s'il vous plaît...

Configuration: Windows / Mozilla 11.0

Bouton pour arrêter l'ordinateur a disparu

Bonjour,

Problème au moment d'arrêter l'ordinateur.
Le bouton "arret" a disparu.
J'ai utilisé malware sans obtenir un signalement.
J'effectue le nettoyage avec AVG, aucune menace.
Que faire ?
Comment récupérer ce bouton arrêt ?

Merci de m'aider.
Windows 7

j'ai cassé mon bouton pour monter ou baisser le volume

Bonjour/bonsoir à tous!

Je voudrais savoir comment je peux faire des screenshots malgré que j'ai casser mon bouton du son.
Depuis quelque jours je cherche des applications pour faire des screenshots en secouant le téléphone mais je trouve absolument rien!!! Pouvez-vous m'aider à trouver une solution a refaire des screenshots ou bien de me donner des application pour faire des screenshots en secouant le téléphone. J'en es vraiment besoin car je faisais plus de cent screenshot part semaine pour mon travail etc..
Help!!

Merci à tout ceux qui m'auront aider.

Ps: mon téléphone c'est un wiko sunset

Remettre au paramètres d usine une tablette mpman.

Bonjour. Je possède une mpman mpw100 sous Windows 8.1. Je désire la vendre mais je ne souhaite que l acheteur puisse accéder à mon ancien profil et à toute les donnée enregistrer sur cette dernière. Je ne sais comment la remettre d origine...à savoir comme neuve. Merci d avance pour votre aide

Menu Démarrer ne s'ouvre pas

Bonjour,
J'ai téléchargé la version finale de Windows 10 et le Menu Démarrer ne s'ouvre pas, ceci même en redémarrant l'ordinateur, j'aimerais savoir si ça vous est arrivé et si vous avez une solution, merci d'avance!

le bouton marche arret de ma telecommande LG ne fontionne plus

Bonjour depuis 2 jours j'ai énormément du mal a éteindre et allumer mon téléviseur LG avec sa télécommande. J'ai beau appuyer sur le bouton M/A rien n'y fait enfin parfois au bout d'1 minute sa réagis enfin. J'ai évidemment changer les piles rien n'y fait (d'ailleurs j'ai le même problème sur un TV toshiba avec la télécommande) est ce un virus ? (rire) que doit je faire est ce la télécommande ou le téléviseur ?? merci de vos réponses