Salut a tous, desole pour les accents je suis aux US...
 
J'ai actuellement un fichier de comparables (lire une liste de boites dont les donnees financieres sont sont affichees verticalement)
 
J'aimerais me simplifier la vie (enormement), en selectionnant sur une feuille les compagnies que je veux comparer. En gros, si je coche Apple et Microsoft, j'aimerais que seuls les colonnes portant le titre Apple et Microsoft apparraissent sur ma feuille de comparables, les autres colonnes devenant invisibles.
 
Une petite idee de comment faire? Je touche un petit peu VBA mais j'aurais besoin d'aide pour la base...
 
Merci D'avance!!!

Bon j'ai un truc un peu bestial, que je dois faire pour chaque client... ( C4 a C30). Un peu long a coder.  
 
Sub HideColumn1()
 
Worksheets("Comps" ).Activate
Columns("B:ZZ" ).EntireColumn.Hidden = False
'Pour afficher toutes les colonnes quand la macro se lance
 
    If Range("C4" ).Value = "" Then
    'Premier client, si la case est vide il sera masque
    Worksheets("Comps" ).Activate
        Columns("B:D" ).EntireColumn.Hidden = True
    Else
        'La case n'est pas vide, donc on affiche les colonnes correspondantes
        Columns("B:D" ).EntireColumn.Hidden = False
 
    End If
 
End Sub