Masquer tous les colonnes à l'extérieur de l'intervalle

Bonjour à tous!!!

Voici ma question. Tel que présenté dans le fichier ci-joint, les cellules B2 et B3 représentent un intervalle de dates pour un projet. J'aimerais créer un code en VBA permettant de masquer toutes les colonnes à l'extérieur de l'intervalle de date. Un exemple du contenant des colonnes est représenté à la ligne 4. Les colonnes masquées doivent être modifiées en fonction du choix de l'utilisateur (l'intervale de date). Je suis nouveau dans la programmation VBA mais j'ai besoin de créer une telle manipulation pour un mandat.

Merci d'avance

12demande-vba.xlsx (9.50 Ko)

Bonjour,

à tester,

Sub MasquerColonne()
Dim dt1 As Integer, dt2 As Integer
dt1 = Application.Match(Range("B2"), Rows("$4:$4"), 0) + 1
dt2 = Application.Match(Range("B3"), Rows("$4:$4"), 0) - 1
Range(Cells(1, dt1), Cells(1, dt2)).EntireColumn.Hidden = True
End Sub
Rechercher des sujets similaires à "masquer tous colonnes exterieur intervalle"