Macro Vba affiche colonnes

keriatsu Messages postés 11 Date d'inscription Statut Membre Dernière intervention -
Utilisateur anonyme - 30 avril 2009 à 14:05

Salutation,

Pour créer un fichier excel de compta qui soit lisible, j'ai besoin d'une macro.

Voilà le but de la macro :
Je veux que :
dès un clique sur une certaine cellule, des colonnes de mon tableau disparaissent.
Dès un second clique sur cette cellule, les colonnes disparues réapparaissent.

Exemple :

Si je clique sur la cellule B3
les colonne C D E F disparaissent.

Si je clique une seconde fois sur B3 , les colonnes C D E F réapparaissent.

Quelqu'un peut-il m'aider à trouver des fonctions Vba qui puisse faire ca.

Merci

A voir également:

Macro Vba affiche colonnes
Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
Comment faire des colonnes sur word - Guide
Classer par ordre alphabétique excel plusieurs colonnes - Guide
Jitbit macro recorder - Télécharger - Confidentialité
Télécharger macro convertir chiffre en lettre excel - Télécharger - Tableur

1 réponse

Réponse 1 / 1

Utilisateur anonyme

Bonjour,

À placer derrière la feuille :

Option Explicit

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    
    Dim Plage As Range, Cible As Range
    
    Set Cible = Range("B3")
    
    Set Plage = Application.Intersect(Cible, Target)
    
    If (Not (Plage Is Nothing)) Then
        If (Columns("C:C").Hidden = True) Then
            Columns("C:F").Hidden = False
        Else
            Columns("C:F").Hidden = True
        End If
        Application.EnableEvents = False
        Target.Offset(1, 0).Select
        Application.EnableEvents = True
    End If
    
End Sub
'

Lupin

Discussions similaires

"L'indice n'appartient à la sélection" + VBA

Transformer un chiffre en lettres dans excel sans macro

Erreur d'exécution 13 Incompatibilité de type

Votre réponse

Discussions similaires