PROBLEME DE MACRO

[ITSYOYO]

Bonjour à tous,

Je voudrais savoir ce qui cloche dans ma macro ci-dessous:

Sub Masquer_Jour()
Dim Num_Row As Long

For Num_Row = 40 To 42
' Compare la valeur du mois de la cellule AD6 Month(Cells(6, Num_Col)
' avec la valeur du mois sélectionné en A1 Cells(1, 1)
If Month(Cells(Num_Row, 1)) <> Cells(7, 2) Then
Rows(Num_Row).Hidden = True
Else
Rows(Num_Row).Hidden = False
End If
Next


End Sub

J'essaie de faire en sorte que les mois ou il y a 28,29,30 se masque automatiquement à partir du bouton menu déroulant que j'ai créée.

Merci par avance pour vos retours.

Belle journée

 

[M12]

Bonjour,

Au lieu de comparer avec le texte du mois en cellule (7,2), compare avec le mois de la cellule du 28 du mois en cellule (38,1)

Sub Masquer_Jour()
Dim Num_Row As Long
 
  For Num_Row = 40 To 42
    ' Compare la valeur du mois de la cellule AD6 Month(Cells(6, Num_Col)
    ' avec la valeur du mois sélectionné en A1 Cells(1, 1)
    If Month(Cells(Num_Row, 1)) <> Month(Cells(38, 1)) Then
      Rows(Num_Row).Hidden = True
    Else
      Rows(Num_Row).Hidden = False
    End If
  Next
End Sub

 

[ITSYOYO]

Merci pour le retour.

Je vais essayer.🙂

 

[ITSYOYO]

Ca fonctionne.

Génnnnniiiiiiiaaaallllll !!!!!!!

 

[ITSYOYO]

Hello M12,

J'ai été obligé de mettre en forme mon tableau à nouveau. De ce fait ma macro ne fonctionne plus.

Pourriez-vous m'aider sur cette macro ?

Voir fichier joint

 

[M12]

Re,

A tester,
Ton ancien montage ne peut pas fonctionner car tu as mis les dates sur deux colonnes, alors tu masques les deux colonnes

 

[ITSYOYO]

Et comment, je pourrais faire remonter que la partie sélectionnée dont j'ai besoin ?

Si tu n'as pas de solution je passerai par une mise en forme conditionnelle.

Merci pour tout.

 

[M12]

Re,

As-tu tester mon classeur ?

 

[ITSYOYO]

Pardon, vient de le faire c'est exactement ce que je voulais. Merci infiniment.

 

[M12]

Re,

Avec la MFC corrigé pour la 2ème colonne

 

[Staple1600]

Bonsoir

ITSYOYO
N'est-ce là la même question qu'ici?

MASQUER DES LIGNES

Bonjour, Je suis nouveau sur le forum. J'aurai besoins de vos trucs et astuces. J'ai crée un calendrier qui s'alimente automatiquement. Je voudrais créer une macro qui masque les jours en trop et qui laisse apparaître les 28 ou les 29 quand on est février ou lorsque l'on a des mois à 30...

www.excel-downloads.com

Pour laquelle je t'avais proposé une MFC
J'ai bien lu ton Merci 😉
Mais ne sais toujours pas si tu as réussi à faire fonctionner celle-ci...

Du coup, nous voilà avec deux fils doublons...

 

[ITSYOYO]

Bonsoir

ITSYOYO
N'est-ce là la même question qu'ici?

MASQUER DES LIGNES

Bonjour, Je suis nouveau sur le forum. J'aurai besoins de vos trucs et astuces. J'ai crée un calendrier qui s'alimente automatiquement. Je voudrais créer une macro qui masque les jours en trop et qui laisse apparaître les 28 ou les 29 quand on est février ou lorsque l'on a des mois à 30...

www.excel-downloads.com

Pour laquelle je t'avais proposé une MFC
J'ai bien lu ton Merci 😉
Mais ne sais toujours pas si tu as réussi à faire fonctionner celle-ci...

Du coup, nous voilà avec deux fils doublons...

Bonsoir

ITSYOYO
N'est-ce là la même question qu'ici?

MASQUER DES LIGNES

Bonjour, Je suis nouveau sur le forum. J'aurai besoins de vos trucs et astuces. J'ai crée un calendrier qui s'alimente automatiquement. Je voudrais créer une macro qui masque les jours en trop et qui laisse apparaître les 28 ou les 29 quand on est février ou lorsque l'on a des mois à 30...

www.excel-downloads.com

Pour laquelle je t'avais proposé une MFC
J'ai bien lu ton Merci 😉
Mais ne sais toujours pas si tu as réussi à faire fonctionner celle-ci...

Du coup, nous voilà avec deux fils doublons...