With End using multiple ranges

[Guest]

Is it possibe to use With End stmts on muliple ranges. Below I am adjsuting
the properties of one range. If I want to do this to two separate ranges,
can I append the With part of the statement to also take the second range
("SecondCell"). Thanks

With Range("FirstCell")
.Interior.Pattern = xlGray50
.Locked = True
.FormulaHidden = False
.Validation.InCellDropdown = False
End With

 

[Nick Hodge]

Try

With Range("FirstCell, SecondCell")
'do something here
End With

--
HTH
Nick Hodge
Microsoft MVP - Excel
Southampton, England
www.nickhodge.co.uk
(e-mail address removed)

 

[Guest]

Perfect, thanks.

Try

With Range("FirstCell, SecondCell")
'do something here
End With

--
HTH
Nick Hodge
Microsoft MVP - Excel
Southampton, England
www.nickhodge.co.uk
(e-mail address removed)