Skjul mange kolonner

Jeg byttede om på False og True, så viser den de kolonner der har en bestemt værdi i række 2, med den værdi jeg har i B2, men hvordan får jeg den til at vise mellem f.eks. uge 28 til 30?
eller den viser kolonner der har en værdig >= værdien i celle B2
hvad skal jeg skrive mellem
>= Range("B2").Value og <= Range("B4").Value for at det virker?

Sub VisValgteKolonner()
    For x = 5 To 265 'kolonnenumre, som skal testes
    If Cells(2, x) = Range("B2").Value Then
    Cells(2, x).EntireColumn.Hidden = False
        Else
    Cells(2, x).EntireColumn.Hidden = True
    End If
Next
End Sub

Din makro virker OK, bortset fra at du har skrevet 265 i stedet for 365. Egentlig burde der vel stå 369 da du ikke har noget i de første 4 kolonner.
Hvis du vil vise dagene med ferie i stedet for dem uden ferie, skal du blot bytte om på True og False

Hej Jens48
Jeg vil gerne have den til at vise uge 28, 29 og 30, hvordan får jeg den til det?
Som det er nu kan den kun vise en uge

Lad mig lige forstå det rigtigt. Vil du have at der skal stå 4 i række 2, hvis kolonnen ligger i uge 28 til 30? Hvis der gør det, virker makroen OK.
Vil du have at makroen indsætter 4 i række 2 hvis du har startuge og slutuge i bestemte celler?

Godmorgen jens48
I B2 står der 28 i B3 står der 30, nu vil jeg gerne have makroen til at vise alle kolonner hvor der står 28, 29 eller 30.

Jeg har løst det ved at sætte en ekstra linje ind, hvor den kikker på ugenr og sættet et X, hvis ugenr. ikke er => og <= tallene i B2 og B3