kskinne
Well-known Member
- Joined
- Feb 17, 2002
- Messages
- 1,267
- Office Version
- 365
- Platform
- Windows
I have a bit of VBA code that works fine on my w2k machine using office 2000, but will not work on an NT4 machine using office 97. the code is:
Sub Autpen()
If Application.UserName<> "miiiy" Then End
Application.ScreenUpdating = False
ChDir "S:TREND ANALYSIS"
Workbooks.Open Filename:="S:TREND ANALYSISLINEAR TREND-ALL.XLS", UpdateLinks:=3
Workbooks.Open Filename:="S:TREND ANALYSISStatistics - condensed for Board-2002.xls", UpdateLinks:=3
Workbooks("customer activity 2002.xls").Activate
Range("A1").Select
Application.ScreenUpdating = True
End Sub
any idea as to why this code would work in one but not in the other?
thanks
kevin
This message was edited by kskinne on 2002-10-22 16:39
This message was edited by kskinne on 2002-10-22 16:59
This message was edited by kskinne on 2002-10-22 17:00
This message was edited by kskinne on 2002-10-29 09:57
Sub Autpen()
If Application.UserName<> "miiiy" Then End
Application.ScreenUpdating = False
ChDir "S:TREND ANALYSIS"
Workbooks.Open Filename:="S:TREND ANALYSISLINEAR TREND-ALL.XLS", UpdateLinks:=3
Workbooks.Open Filename:="S:TREND ANALYSISStatistics - condensed for Board-2002.xls", UpdateLinks:=3
Workbooks("customer activity 2002.xls").Activate
Range("A1").Select
Application.ScreenUpdating = True
End Sub
any idea as to why this code would work in one but not in the other?
thanks
kevin
This message was edited by kskinne on 2002-10-22 16:39
This message was edited by kskinne on 2002-10-22 16:59
This message was edited by kskinne on 2002-10-22 17:00
This message was edited by kskinne on 2002-10-29 09:57