changing sheets

[jram]

Hi, I really struggle with changing sheets with ranges. I am completely rubbish at this - if you could help, I would be really grateful.

'This bit works
If ActiveCell = "£ Mark-up" Then
Set RNG = Cells(ActiveCell.Row, ActiveCell.Column)
Range(RNG.Offset(0, 1), RNG.Offset(0, 40)).Select
Selection.NumberFormat = "£0.0"

Then I want to change the sheet and format 2 other range - this doesn't work
Set RNG = Sheets("Base").RNG
Range(RNG.Offset(-20, 1), RNG.Offset(-20, 40)).Select
Selection.NumberFormat = "£0.0"

Set RNG = Sheets("Year0").RNG
Range(RNG.Offset(-20, 1), RNG.Offset(-20, 40)).Select
Selection.NumberFormat = "£0.0"

Thanks
James

[mudraker]

Your post does not comply with Rule 3 of our Forum RULES. Use code tags around code. Posting code without them makes your code hard to read and difficult to be copied for testing. Highlight your code and click the # at the top of your post window. For more information about these and other tags, found here