About Us

Rob[_4_]

Thanks Dave.

Rob

"Dave Peterson" wrote in message
...
Change this:
For Each r In Selection
to
For Each r In activesheet.range("a5:g200").cells

Rob wrote:

Thanks again and that is useful, but could you please provide code that
will
do a predefined range, such as A5:G200

Rob

"Gary''s Student" wrote in
message
...
Sub rob()
For Each r In Selection
If r.Locked Then
Else
r.ClearContents
End If
Next
End Sub

In this version, just Select the area you wish to clear before running
the
macro.
--
Gary''s Student - gsnu200714

"Rob" wrote:

Thankyou so much. Worked perfectly.

As an alternative for another application I have, could you also
provide
me
with the code to have cells only cleared from a specified range
instead
of
the whole sheet?

Rob

"Gary''s Student" wrote in
message
...
Sub rob()
For Each r In ActiveSheet.UsedRange
If r.Locked Then
Else
r.ClearContents
End If
Next
End Sub
--
Gary''s Student - gsnu200713

"Rob" wrote:

Could someone please provide some VBA code that will delete all
cell
contents for all the unlocked cells in a sheet?

Rob

--

Dave Peterson

Thread Tools	Search this Thread
Show Printable Version	Search this Thread: Advanced Search
Display Modes
Switch to Linear Mode Switch to Hybrid Mode Threaded Mode

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
If you delete the contents of a cell in a worksheet in a group, w	jmfadg5	Excel Discussion (Misc queries)	1	May 29th 06 06:32 AM
copy paste delete cell contents	Garry	Excel Discussion (Misc queries)	0	March 27th 06 08:26 PM
Delete all contents of cell but one word	Hayette Hasham	Excel Discussion (Misc queries)	5	January 18th 06 08:20 AM
Delete row based on contents of cell	AndyG	Excel Discussion (Misc queries)	6	November 17th 05 10:08 PM
Delete cell contents with input to adjacent cell	Ashley Frank	Excel Discussion (Misc queries)	1	October 5th 05 04:28 PM

Menu

About Us