Can you advise on my code please

[ipbr21054]

Hi,

Below is a section of my code.
Can you advise please how i can write the code in red correctly,basically i need to be B8 then down the page.
Reason being when i reach row 3000 i wont remember why its stopped working.

Thanks

    Range(Cells(Target.Row, myStartCol), Cells(Target.Row, myEndCol)).Interior.ColorIndex = 8
    Target.Interior.Color = vbGreen
    Range("B8:B3000").Font.Size = 12
    Application.ScreenUpdating = True


End Sub

 

[Sulprobil]

Are you after something like

Range(Range("B8"), Range("B8").End(xlDown)).Font.Size = 12

?

 

[ipbr21054]

Sorry but that didnt make any difference,i will keep looking but thanks