Intersect with row dynamically

Question

I am trying to intersect a target range with some row, changing dynamically: I was using this :

If Not intersect ([1:7],target) Is Nothing Then

And it works, but :

Dim n as Integer : n = 7
If Not intersect ([1:n],target) Is Nothing Then

Returns Error 424

Answer 1

[] does not allow variables you will need to spell it out:

Dim n as Integer : n = 7
If Not intersect (Range("1:" & n),target) Is Nothing Then