ChDir "C:\502"
Workbooks.OpenText Filename:="C:\502\SALES.XLS", Origin:=xlWindows, _
StartRow:=1, DataType:=xlDelimited, TextQualifier:= _
xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, Semicolon _
:=False, Comma:=True, Space:=False, Other:=False, FieldInfo _
:=Array(Array(1, 1), Array(2, 1), Array(3, 1), Array(4, 1), Array(5, 9))
Columns("C:D").Select
Selection.Style = "Comma"
Range("A2:D42").Select
Selection.Copy
Windows("POSITOUCH-TEMPLATE.xlt").Activate
ActiveWindow.ScrollWorkbookTabs Position:=xlFirst
Sheets("BAILEYS").Select
Range("A5").Select
ActiveSheet.Paste
Windows("POSITOUCH-TEMPLATE.xlt").Activate
ActiveWindow.ScrollWorkbookTabs Position:=xlFirst
Application.Goto Reference:="date"
ActiveCell.FormulaR1C1 = "=+R[2]C-1"
Range("B34").Select
Windows("SALES.xls").Activate
Application.DisplayAlerts = False
ActiveWindow.Close
I've attempted to replace the activate with some of the updated vba info on MSDN but the only thing way I can get the macro to run is with a .open command which is really slow and opens a ton of workbooks instead of working inside of just the one. I've tried using the .Activate as well with the format changes that I've seen on MSDN as well. No luck. This macro was originally written in 1998 and has just been passed down to me. Is this a situation in which I'm going to have to completely rewrite the macros if I want them to run through Python?
Thanks,
Ben