Not understanding VBA Columns reference?

[slam]

I have this piece of code to hide some rows which works perfectly:

If Not Intersect(Target, Range("B3")) Is Nothing And [B3] >= 1 And [B3] <= 40 Then
    With wsRecords
        .Unprotect "password"
        wsRecords.Rows("3:42").Hidden = True
        wsRecords.Rows("3:" & Target.Value + 2).Hidden = False
    End With
End If

I tried converting it to hide some columns on another worksheet and I'm getting a run time error 1004 application defined or object defined error on the bolded line

If Not Intersect(Target, Range("B3")) Is Nothing And [B3] >= 1 And [B3] <= 40 Then
    With wsDrivers
        .Unprotect "password"
[B]        wsDrivers.Columns("6:45").Hidden = True[/B]
        wsDrivers.Columns("6:" & Target.Value + 5).Hidden = False
    End With
End If

What am I doing wrong?

Thanks

 

[sericom]

wsDrivers.Columns("F:AS").Hidden = True

or using numbers

wsDrivers.Columns(6).Resize(, 40).Hidden = True

 

[slam]

[B]wsDrivers.Columns("F:AS").Hidden = True[/B]

Here I was thinking I had to do number references for columns..... letters is a lot easier!

However, if I change the next row to letter references, I get a type mismatch, but if I don't, it doesn't work.

 

[sericom]

That's why I gave you 2 examples, just change the 40 in Resize to your variable.

 

[slam]

That's why I gave you 2 examples, just change the 40 in Resize to your variable.

Thank you! Didn't see that you'd edited your post. This works perfectly, and is even simpler than before.

If Not Intersect(Target, Range("B3")) Is Nothing And [B3] >= 1 And [B3] <= 40 Then
    With wsDrivers
        .Unprotect "password"
        wsDrivers.Columns(6).Resize(, 40).Hidden = True
        wsDrivers.Columns(6).Resize(, Target.Value).Hidden = False
    End With
End If