=Date() not working & 1 other

  • Thread starter Thread starter Gavin
  • Start date Start date
G

Gavin

hello all.

Recently, I have been working on a DB and my PC at work
needed to be reimaged. Before the reimage, everything was
working fine on the DB. Now, I am getting two errors:
1) I have a textbox that uses =Date() but when the form
loads it shows up as: #Name
2) I created a splash screen for when the DB opens. I am
using the following code:

Private Sub Form_Activate ()

If Time() < 0.5 Then
[lblMorning].Visible = True
[lblAfternoon].Visible = False
[lblEvening].Visible = False

ElseIf Time() > 0.5 And Time() < 0.75 Then
[lblMorning].Visible = False
[lblAfternoon].Visible = True
[lblEvening].Visible = False

ElseIf Time() > 0.75 Then
[lblMorning].Visible = False
[lblAfternoon].Visible = False
[lblEvening].Visible = True
End If
End Sub

It highlights the Private Sub Form_Activate () in yellow
and selects the word Time within that module.

Any help is appriciated...Like I said above, I know it
worked before I have to reimage my PC.

Thank you,
Gavin
 
Hi Gavin,

you're probable have a missing reference. Open any module and go to menu
Tools > References to see which one is missing.

[]
Luiz Cláudio C. V. Rocha
São Paulo - Brazil
MVP Office
 
Back
Top