Button not working

[Leslie Isaacs]

Hello All

I have a button with the following OnClick event:

If [Forms]![frm payments]![payment date].Value Is Null Then
[accounting month].ForeColor = vbRed
[accounting month].BackStyle = 1
[accounting month].BackColor = 65535
Else
[accounting month].ForeColor = 0
[accounting month].BackStyle = acNormal
[accounting month].BackColor = 16777215
End If

but each time I try to run this I get "Runtime error 424 - Object required",
with the first line of the condition (starting with "If") highlighted in
yellow.
I have tried with and without the [Forms]![frm payments]! in front of the
[payment date] part, and also with and without the .Value after [Payment
date], but always with the same result.

My VB skills are not great (obviously!) but I thought I was up to this.

I would be very grateful for any help.
Thanks
Les

 

[Rick B]

Why not simply use conditional formatting to have the value change in
appearance automatically? Why click a button to see if the value should be
highlighted?

 

[Sandra Daigle]

You have to use the IsNull function to test for the null value.

IF isnull([Forms]![frm payments]![payment date].Value) Then

The keyword "is" is used to compare to object variables - hence the error.

 

[Leslie Isaacs]

Rick
I was intending to use the code as the AfterUpdate event of the field: the
button was just a convenient way to test it first.
I wasn't sure I could use expressions with DLookup, etc., in conditional
formatting: how would I do that?
Thanks for your help.
Les

Why not simply use conditional formatting to have the value change in
appearance automatically? Why click a button to see if the value should
be highlighted?


--
Rick B

Hello All

I have a button with the following OnClick event:

If [Forms]![frm payments]![payment date].Value Is Null Then
[accounting month].ForeColor = vbRed
[accounting month].BackStyle = 1
[accounting month].BackColor = 65535
Else
[accounting month].ForeColor = 0
[accounting month].BackStyle = acNormal
[accounting month].BackColor = 16777215
End If

but each time I try to run this I get "Runtime error 424 - Object
required", with the first line of the condition (starting with "If")
highlighted in yellow.
I have tried with and without the [Forms]![frm payments]! in front of the
[payment date] part, and also with and without the .Value after [Payment
date], but always with the same result.

My VB skills are not great (obviously!) but I thought I was up to this.

I would be very grateful for any help.
Thanks
Les

 

[Leslie Isaacs]

Hello Sandra

Eurika! (if that's how you spell it) - IsNull is the answer!
Aren't these newsgroups great!

Many thanks
Les

You have to use the IsNull function to test for the null value.

IF isnull([Forms]![frm payments]![payment date].Value) Then

The keyword "is" is used to compare to object variables - hence the error.

--
Sandra Daigle [Microsoft Access MVP]
Please post all replies to the newsgroup.

Hello All

I have a button with the following OnClick event:

If [Forms]![frm payments]![payment date].Value Is Null Then
[accounting month].ForeColor = vbRed
[accounting month].BackStyle = 1
[accounting month].BackColor = 65535
Else
[accounting month].ForeColor = 0
[accounting month].BackStyle = acNormal
[accounting month].BackColor = 16777215
End If

but each time I try to run this I get "Runtime error 424 - Object
required", with the first line of the condition (starting with "If")
highlighted in yellow.
I have tried with and without the [Forms]![frm payments]! in front of
the [payment date] part, and also with and without the .Value after
[Payment date], but always with the same result.

My VB skills are not great (obviously!) but I thought I was up to
this.
I would be very grateful for any help.
Thanks
Les

 

[Rick B]

I don't see any Dlookup stuff in your code. Your code simply says "If
Payment Date is null, then make the Accounting month field red and bold."
That is easy to do in conditional formatting.

As posted in another response though, you need to use IsNull(....



--
Rick B

Rick
I was intending to use the code as the AfterUpdate event of the field: the
button was just a convenient way to test it first.
I wasn't sure I could use expressions with DLookup, etc., in conditional
formatting: how would I do that?
Thanks for your help.
Les

Why not simply use conditional formatting to have the value change in
appearance automatically? Why click a button to see if the value should
be highlighted?


--
Rick B

Hello All

I have a button with the following OnClick event:

If [Forms]![frm payments]![payment date].Value Is Null Then
[accounting month].ForeColor = vbRed
[accounting month].BackStyle = 1
[accounting month].BackColor = 65535
Else
[accounting month].ForeColor = 0
[accounting month].BackStyle = acNormal
[accounting month].BackColor = 16777215
End If

but each time I try to run this I get "Runtime error 424 - Object
required", with the first line of the condition (starting with "If")
highlighted in yellow.
I have tried with and without the [Forms]![frm payments]! in front of
the [payment date] part, and also with and without the .Value after
[Payment date], but always with the same result.

My VB skills are not great (obviously!) but I thought I was up to this.

I would be very grateful for any help.
Thanks
Les