FROGGER24
Well-known Member
- Joined
- May 22, 2004
- Messages
- 704
- Office Version
- 2013
- 2010
- Platform
- Windows
my macro is loacted here ; \\BTRNAS001AC11\abc$\Sync\Inspection Companies\Demurrage Macro for Inspectors. I have added a button to the ribbon and that part works, when I activate the button it calls the macro, but I get subscript of of range. I download a report from SAP and would like to run code on it.
this is my attempt
Sub Demurrage_Inspector_Delays_072021()
Dim lr As Long, i As Long, j As Long
Application.ScreenUpdating = False
Workbooks("'Vessel Data Extracts.xls'").Activate
Application.Calculation = xlCalculationManual
Dim wsd As Worksheet 'Vessel Data Extracts
Dim WSR As Worksheet 'New worksheet
Set wsd = Worksheets("Vessel Data Extracts")
Set WSR = Worksheets.Add(after:=Worksheets("Vessel Data Extracts"))
lr = wsd.Cells(Rows.Count, 5).End(xlUp).Row
this is my attempt
Sub Demurrage_Inspector_Delays_072021()
Dim lr As Long, i As Long, j As Long
Application.ScreenUpdating = False
Workbooks("'Vessel Data Extracts.xls'").Activate
Application.Calculation = xlCalculationManual
Dim wsd As Worksheet 'Vessel Data Extracts
Dim WSR As Worksheet 'New worksheet
Set wsd = Worksheets("Vessel Data Extracts")
Set WSR = Worksheets.Add(after:=Worksheets("Vessel Data Extracts"))
lr = wsd.Cells(Rows.Count, 5).End(xlUp).Row