E Evan Weiner Oct 30, 2008 #1 How can I figure out which cells on a sheet are locked? I'm to check an originator's locking before putting the workbook up.
How can I figure out which cells on a sheet are locked? I'm to check an originator's locking before putting the workbook up.
G Gary''s Student Oct 30, 2008 #2 Try this small macro: Sub findlocked() Dim rr As Range Set rr = Nothing For Each r In ActiveSheet.UsedRange If r.Locked = True Then If rr Is Nothing Then Set rr = r Else Set rr = Union(rr, r) End If End If Next If rr Is Nothing Then Else rr.Select End If End Sub
Try this small macro: Sub findlocked() Dim rr As Range Set rr = Nothing For Each r In ActiveSheet.UsedRange If r.Locked = True Then If rr Is Nothing Then Set rr = r Else Set rr = Union(rr, r) End If End If Next If rr Is Nothing Then Else rr.Select End If End Sub
E Evan Weiner Oct 30, 2008 #3 Instructive! I merely added a MsgBox for the sheet protection mode. ... Thanks!