Masquer la colonne H si la cellule (H,6)< aujourd'hui

Résolu
nihan -  
 nihan -
Bonjour,

Je voudrais masquer la colonne H si la cellule (H,6)< aujourd'hui à chaque fois j'ouvre mon fichier excel, j'ai essayé ce code mais ça ne marche pas.
(or i = 7 To 1000 Step 1
If Cells(h, 6) < "Date" Then Cells(h, 6).EntireColumn.Hidden = True
    
Next i)


Merci d'avance pour votre aide.

EDIT : Ajout des balises de code (la coloration syntaxique).
Explications disponibles ICI

Merci d'y penser dans tes prochains messages.


1 réponse

  1. Frenchie83 Messages postés 2254 Statut Membre 339
     
    Bonjour
    Ceci
    If Cells(6, "H") < Date Then Cells(6, "H").EntireColumn.Hidden = True

    Cdlt
    0
    1. nihan
       
      Bonjour,

      Je voudrais masquer automatiquement (une fois j'ouvre mon fichier excel) les colonnes quand la date des cellules de la ligne 6 est inférieur à la date d'aujourd'hui.
      alors pour le faire j'ai essayer ce code mais bon, ça n'a pas l'air de trop marché.
      Sub masquercol()
      For i = 8 To 1000 Step 1
      If Cells(6, "column") < Date Then Cells(6, "column").EntireColumn.Hidden = True

      Next i

      End Sub

      Merci pr vos réponses ;)
      0
    2. Frenchie83 Messages postés 2254 Statut Membre 339
       
      remplacez "Column" par i
      0
    3. nihan
       
      merciiiii ;)
      0