bigger312
11-18-2011, 06:53 AM
:banghead:
I have created an Excel data base in excel 2007 but have saved it as 1997 to 2003 .xls format. When saving I got warning based on table formatting only.
I burnt my project to disc and loaded onto PC operating the older 2003 excel .
But when I tried to run the user form I am getting a
Compile error stating "Can't find Project or Libery and the word Format is highlighted in the following line of code.
MultiPage1.Value = 0
Comdate.Text = Format(Now() + 1,"DD/MM/YYYY")
ComdateB.Text =Format(Now() + 1, "DD/MM/YYYY")
ComdateC.Text =Format(Now() + 1, "DD/MM/YYYY")
ComdateD.Text =Format(Now() + 1, "DD/MM/YYYY")
ComdateM.Text =Format(Now() + 1, "DD/MM/YYYY")
ComdateE.Text =Format(Now() + 1, "DD/MM/YYYY")
I deleted this code and the debugger went on to pick up
Private Sub CmdclearA_Click()
' Clear the Form
For Each Ctl In Me.Controls
IfTypeName(Ctl) = "TextBox" Or TypeName(Ctl) = "ComboBox"Then
Ctl.Value= ""
End If
Driving me nuts. Can any one suggest a solution. I have spent a long time putting the project together as I am new to VBA and had a steep learning curve.
Can I avoid starting from scratch and start building the project on the older excel program,
Gerry
Ireland
I have created an Excel data base in excel 2007 but have saved it as 1997 to 2003 .xls format. When saving I got warning based on table formatting only.
I burnt my project to disc and loaded onto PC operating the older 2003 excel .
But when I tried to run the user form I am getting a
Compile error stating "Can't find Project or Libery and the word Format is highlighted in the following line of code.
MultiPage1.Value = 0
Comdate.Text = Format(Now() + 1,"DD/MM/YYYY")
ComdateB.Text =Format(Now() + 1, "DD/MM/YYYY")
ComdateC.Text =Format(Now() + 1, "DD/MM/YYYY")
ComdateD.Text =Format(Now() + 1, "DD/MM/YYYY")
ComdateM.Text =Format(Now() + 1, "DD/MM/YYYY")
ComdateE.Text =Format(Now() + 1, "DD/MM/YYYY")
I deleted this code and the debugger went on to pick up
Private Sub CmdclearA_Click()
' Clear the Form
For Each Ctl In Me.Controls
IfTypeName(Ctl) = "TextBox" Or TypeName(Ctl) = "ComboBox"Then
Ctl.Value= ""
End If
Driving me nuts. Can any one suggest a solution. I have spent a long time putting the project together as I am new to VBA and had a steep learning curve.
Can I avoid starting from scratch and start building the project on the older excel program,
Gerry
Ireland