B
brwilson
Below is the code I am trying to exicute.
Range(Cells(6, ActiveCell.Column), Cells(325
ActiveCell.Column)).Select
Selection.Copy
Sheets("Master Inventory").Activate
Range("G3").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlSubtract
SkipBlanks _
:=False, Transpose:=False
Range("O1").Select
Sheets("Sales History").Select
Range("H3").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlAdd
SkipBlanks:= _
False, Transpose:=False
Range("A3").Select
Sheets("Trucks").Select
Range("A9").Select
Application.CutCopyMode = False
I get error message indicating a problem with "range("g3").select
any suggestions?
Thank
Range(Cells(6, ActiveCell.Column), Cells(325
ActiveCell.Column)).Select
Selection.Copy
Sheets("Master Inventory").Activate
Range("G3").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlSubtract
SkipBlanks _
:=False, Transpose:=False
Range("O1").Select
Sheets("Sales History").Select
Range("H3").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlAdd
SkipBlanks:= _
False, Transpose:=False
Range("A3").Select
Sheets("Trucks").Select
Range("A9").Select
Application.CutCopyMode = False
I get error message indicating a problem with "range("g3").select
any suggestions?
Thank