Deleting data in 7 different sheets before I update workbook.

Closed
haharrison2
Posts
10
Registration date
Friday January 6, 2017
Status
Member
Last seen
February 7, 2017
- Jan 30, 2017 at 09:03 PM
haharrison2
Posts
10
Registration date
Friday January 6, 2017
Status
Member
Last seen
February 7, 2017
- Feb 7, 2017 at 02:06 PM
Sub Delete()
'
' Macro4 Macro
' Delete contents in attorney tabs
'
' Keyboard Shortcut: Option+Cmd+Shift+D
'
Dim lRow As Long
Dim i As Long


lRow = Range("A" & Rows.Count).End(xlUp).Row

Range("AAV, DMC, MWW, OCT, RSB, TCR, WJC, UNKN").Select
Range("A3").Select
ActiveWindow.ScrollDown = UBound() 'THIS ROW GIVES ME A SYNTAX ERROR.
Range("A3:UBound").Select 'DO YOU KNOW A FIX FOR THIS.
Selection.ClearContents 'I have a Mac

End Sub

1 reply

haharrison2
Posts
10
Registration date
Friday January 6, 2017
Status
Member
Last seen
February 7, 2017

Feb 7, 2017 at 02:06 PM
I have resolved this problem and am no longer need of help. Thank you.
0