Hi everyone,
I'm hoping I can get some help in optimizing my macro. It essentially:
1. Copies a row from one sheet ("Update")
2. Inserts a row into another sheet ("Overall") which has the master table.
3. Copies the row from the Update sheet into the inserted row of the master table.
It doesn't have any logic beyond that, so I'm confused as to why it's moving so slowly - it takes around 5-6 seconds to run now, compared to the almost-instant speed at first.
I'm hoping I can get some help in optimizing my macro. It essentially:
1. Copies a row from one sheet ("Update")
2. Inserts a row into another sheet ("Overall") which has the master table.
3. Copies the row from the Update sheet into the inserted row of the master table.
It doesn't have any logic beyond that, so I'm confused as to why it's moving so slowly - it takes around 5-6 seconds to run now, compared to the almost-instant speed at first.
VBA Code:
Sub UpdateWithoutSort()
'
' UpdateWithoutSort Macro
''
Application.Calculation = xlCalculationManual
Application.ScreenUpdating = False
Application.DisplayStatusBar = False
Sheets(“Overall”).Select
Range(“B6:O6").Select
Selection.ListObject.ListRows.Add (1)
Sheets(“Update”).Select
Range(“B15:M15").Select
Selection.Copy
Sheets(“Overall”).Select
Range(“B6").Select
Selection.PasteSpecial Paste:=xlPasteValuesAndNumberFormats, Operation:= _
xlNone, SkipBlanks:=False, Transpose:=False
Application.Calculation = xlCalculationAutomatic
Application.ScreenUpdating = True
Application.DisplayStatusBar = True
End Sub