Keep user from moving across sheet

[mikewild2000]

I am trying to add code to stop the user from moving beyond column "M"
Can it be done?

Thanks in advanc

 

[Bob Phillips]

Mike,

something like

If Activecell.Column>13 Then
Cells(Activecell.Row,13).Select
End If

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

 

[Roger Govier]

Hi Mike

You could use something like
ThisWorkbook.Worksheets("Sheet1").ScrollArea = "A1:M5000"

 

[mikewild2000]

thank you chaps - it works a treat