Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Can Excel 2003 VBA work in Excel 2002?
Dear All
I undertook some programming in Excel 2003 but my new employer only uses Excel 2002 (10.6823.6817) SP3. The hyperlinks, drop-down menus and calcuations all seem to work fine but the program was written such that when it was opened a box appeared asking for a password so that only the "It Administrator" could get into it and amend it. This Userform no longer appears and I keep getting a "compile error" box coming up when I navigate between screens. The code for the box asking for the password is given below. Is there any way this will work in Excel 2002? Thanks ! Private Sub CommandButton1_Click() Unload UserForm14 Restart: Dim UserName As String Dim FirstSpace As Integer Do Until UserName < "" UserName = InputBox("Please enter your password: ", _ "IT Administrator Password") Loop FirstSpace = InStr(UserName, " ") If FirstSpace < 0 Then UserName = Left(UserName, FirstSpace - 1) End If If UserName = "keeppawsoff" Then Application.ScreenUpdating = False Worksheets("Setup").Activate Range("B50") = "False" Worksheets("Basic").Activate Worksheets("Setup").Activate Range("A1").Select Application.ScreenUpdating = True Exit Sub End If Ans = MsgBox("You have entered an incorrect password - Try again?", vbRetryCancel, "IT Administrator Password") Select Case Ans Case vbRetry UserName = "" GoTo Restart Case vbCancel UserForm14.Show End Select End Sub Private Sub CommandButton2_Click() Application.ScreenUpdating = False Worksheets("Setup").Activate Range("B50") = "TRUE" Unload UserForm14 Worksheets("Basic").Activate Worksheets("Setup").Activate Range("A1").Select Application.ScreenUpdating = True End Sub Private Sub UserForm_Click() End Sub -- Adrian C |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Can Excel 2003 VBA work in Excel 2002?
Adrian,
"This Userform no longer appears" Post the code that makes the Userform appear and identify where is it located. Are you using an add-in or a standard workbook? Are the worksheet names "identical" on all users machines? Like that user name. <g -- Jim Cone San Francisco, USA http://www.realezsites.com/bus/primitivesoftware ----- Original Message ----- From: "Adrian C" Newsgroups: microsoft.public.excel.programming Sent: Tuesday, January 16, 2007 2:00 AM Subject: Can Excel 2003 VBA work in Excel 2002? Dear All I undertook some programming in Excel 2003 but my new employer only uses Excel 2002 (10.6823.6817) SP3. The hyperlinks, drop-down menus and calcuations all seem to work fine but the program was written such that when it was opened a box appeared asking for a password so that only the "It Administrator" could get into it and amend it. This Userform no longer appears and I keep getting a "compile error" box coming up when I navigate between screens. The code for the box asking for the password is given below. Is there any way this will work in Excel 2002? Thanks ! Private Sub CommandButton1_Click() Unload UserForm14 Restart: Dim UserName As String Dim FirstSpace As Integer Do Until UserName < "" UserName = InputBox("Please enter your password: ", _ "IT Administrator Password") Loop FirstSpace = InStr(UserName, " ") If FirstSpace < 0 Then UserName = Left(UserName, FirstSpace - 1) End If If UserName = "keeppawsoff" Then Application.ScreenUpdating = False Worksheets("Setup").Activate Range("B50") = "False" Worksheets("Basic").Activate Worksheets("Setup").Activate Range("A1").Select Application.ScreenUpdating = True Exit Sub End If Ans = MsgBox("You have entered an incorrect password - Try again?", vbRetryCancel, "IT Administrator Password") Select Case Ans Case vbRetry UserName = "" GoTo Restart Case vbCancel UserForm14.Show End Select End Sub Private Sub CommandButton2_Click() Application.ScreenUpdating = False Worksheets("Setup").Activate Range("B50") = "TRUE" Unload UserForm14 Worksheets("Basic").Activate Worksheets("Setup").Activate Range("A1").Select Application.ScreenUpdating = True End Sub Private Sub UserForm_Click() End Sub -- Adrian C C |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Can Excel 2003 VBA work in Excel 2002?
I don't think the problem is in this code, this is code for the form, so the
problem seems to be in code that invokes the form, and/or worksheet activate code. -- HTH Bob Phillips (replace somewhere in email address with gmail if mailing direct) "Adrian C" wrote in message ... Dear All I undertook some programming in Excel 2003 but my new employer only uses Excel 2002 (10.6823.6817) SP3. The hyperlinks, drop-down menus and calcuations all seem to work fine but the program was written such that when it was opened a box appeared asking for a password so that only the "It Administrator" could get into it and amend it. This Userform no longer appears and I keep getting a "compile error" box coming up when I navigate between screens. The code for the box asking for the password is given below. Is there any way this will work in Excel 2002? Thanks ! Private Sub CommandButton1_Click() Unload UserForm14 Restart: Dim UserName As String Dim FirstSpace As Integer Do Until UserName < "" UserName = InputBox("Please enter your password: ", _ "IT Administrator Password") Loop FirstSpace = InStr(UserName, " ") If FirstSpace < 0 Then UserName = Left(UserName, FirstSpace - 1) End If If UserName = "keeppawsoff" Then Application.ScreenUpdating = False Worksheets("Setup").Activate Range("B50") = "False" Worksheets("Basic").Activate Worksheets("Setup").Activate Range("A1").Select Application.ScreenUpdating = True Exit Sub End If Ans = MsgBox("You have entered an incorrect password - Try again?", vbRetryCancel, "IT Administrator Password") Select Case Ans Case vbRetry UserName = "" GoTo Restart Case vbCancel UserForm14.Show End Select End Sub Private Sub CommandButton2_Click() Application.ScreenUpdating = False Worksheets("Setup").Activate Range("B50") = "TRUE" Unload UserForm14 Worksheets("Basic").Activate Worksheets("Setup").Activate Range("A1").Select Application.ScreenUpdating = True End Sub Private Sub UserForm_Click() End Sub -- Adrian C |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
macro which works in excel 2000 does not work in excel 2002 | Excel Programming | |||
Simple Macro, works in Excel 2002, 2003 but won't work in 2000 | Excel Programming | |||
Excel 2000 VBA App Now Works in Excel 2003, but not Excel 2002 | Excel Programming | |||
How do I update Excel 2000 macros to work in Excel 2002? | Excel Discussion (Misc queries) | |||
how do i work across workbooks in excel 2002? | Excel Discussion (Misc queries) |