#1   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 16
Default Show Locked Cells

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.
  #2   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 11,058
Default Show Locked Cells

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

--
Gary''s Student - gsnu200810


"Evan Weiner" wrote:

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.

  #3   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 16
Default Show Locked Cells

Instructive! I merely added a MsgBox for the sheet protection mode. ...
Thanks!

"Gary''s Student" wrote:

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

--
Gary''s Student - gsnu200810


"Evan Weiner" wrote:

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.

Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
paste locked cells and unlocked cells in protected sheet Angeline Excel Worksheet Functions 15 November 1st 06 11:51 PM
locked cells rhwong via OfficeKB.com Excel Worksheet Functions 0 September 28th 06 05:38 PM
Locked cells show up in Apple Works uttster Excel Discussion (Misc queries) 0 August 17th 06 12:27 AM
show locked cells Stephen Excel Discussion (Misc queries) 1 June 10th 06 04:26 PM
Put comments on a locked spreadsheet even though cells not locked RDP Excel Worksheet Functions 1 September 11th 05 11:59 PM


All times are GMT +1. The time now is 08:00 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"