Hi
I was given this macro and tried to run it twice on 2 seperate commands in same macro and also tried a 2 seperate macros and it wont let me do it, Im trying to get it to run on a sheet called "WORLDLINEMACHINES" and another called "CUBIC"
Any Ideas?
I was given this macro and tried to run it twice on 2 seperate commands in same macro and also tried a 2 seperate macros and it wont let me do it, Im trying to get it to run on a sheet called "WORLDLINEMACHINES" and another called "CUBIC"
VBA Code:
Sheets("WORLDLINEMACHINES").Select
Dim c As Range, r As Range
For Each c In ActiveSheet.UsedRange
If c.Locked = False Then
If r Is Nothing Then
Set r = c
Else
Set r = Union(r, c)
End If
End If
Next
If r Is Nothing Then Exit Sub
r.ClearContents
End Sub
Any Ideas?