XL 2016 Problème de macro

[chinel]

Bonjour j'ai un fichier que j'ai réalisé mais j'ai un problème avec une macro , besoin d'aide, merci

 

[sylvanu]

Bonjour Chinel,
Un essai en PJ avec :

Sub Masquer_Jour()
Dim Num_Col As Long
    Application.ScreenUpdating = False
   For Num_Col = 32 To 34     ' Boucle sur les cellules des jours 29, 30 et 31
      If Month(Cells(6, Num_Col)) <> Month(Cells(6, "D")) Then
         Columns(Num_Col).Hidden = True
      Else
         Columns(Num_Col).Hidden = False
     End If
   Next
End Sub

J'ai aussi changé la formule en Feuil2 K2 :

=CNUM("1 "&INDEX(G:G;F6)&" "&INDEX(H:H;F1))

 

[chinel]

Super boulot

Bonjour Chinel,
Un essai en PJ avec :

Sub Masquer_Jour()
Dim Num_Col As Long
    Application.ScreenUpdating = False
   For Num_Col = 32 To 34     ' Boucle sur les cellules des jours 29, 30 et 31
      If Month(Cells(6, Num_Col)) <> Month(Cells(6, "D")) Then
         Columns(Num_Col).Hidden = True
      Else
         Columns(Num_Col).Hidden = False
     End If
   Next
End Sub

J'ai aussi changé la formule en Feuil2 K2 :

=CNUM("1 "&INDEX(G:G;F6)&" "&INDEX(H:H;F1))

Super boulot, merci !

 

[chinel]

Peut-on maintenant récupérer les données des cellules C7 à AH15 avec les dates ? Les gens vont cocher les dates ou ceux-ci sont libres et moi en feuille 3 je pourrai avoir un récapitulatif de toutes leurs dates sur l'année, et puis on vide si on change le mois ou l'année. Merci

 

[sylvanu]

Bonjour Chinel,
Ouvrez un nouveau post, ce point n' rien à voir avec le titre de celui ci.
Donnez un fichier test en montrant ce que vous voulez faire.
Je suppose qu'il y a des X dans les cellules et vous voulez récupérer les noms et dates correspondant à ces X et les mettre dans une autre feuille ?

 

[chinel]

Bonjour Chinel,
Ouvrez un nouveau post, ce point n' rien à voir avec le titre de celui ci.
Donnez un fichier test en montrant ce que vous voulez faire.
Je suppose qu'il y a des X dans les cellules et vous voulez récupérer les noms et dates correspondant à ces X et les mettre dans une autre feuille ?

oui c'est bien ça