VBA Multiple Condition IF statement

[Carmine]

I am trying to create a VBA “if “statement with more than one condition. The following statement works fine:



If DLookup("SynthD", "DensityT") = 0 Then MsgBox "SyntheticDensity = 0, is this correct?"


BUT I want to include a second condition to evaluate “SynthPC”. Therefore, in order for the message box to appear, “SynthD” must = 0 and “SynthPC” must be >0.

I tried the following which does not work:

If DLookup("SynthD", "DensityT") = 0 and if DLookup("SynthPC","MasterTable") > 0
then MsgBox "SyntheticDensity = 0, is this correct?"



So what am I doing wrong?



Thanks,
Carmine

[CJ_London]

What does ‘ does not work’ mean?

[xps35]

Skip the second if. So

If DLookup("SynthD", "DensityT") = 0 and DLookup("SynthPC","MasterTable") > 0

[June7]

DLookup will return Null if there is no match.

Why is there no WHERE argument criteria? Does DensityT have multiple records? What you have will probably always pull from the same record.

[Carmine]

Yes! Apparently al I had to do is remove the second "IF". It all works fine. Thank you all for your comments.

[Carmine]

What does ‘ does not work’ mean?

"Does not work" means it gave me a compile error.
Another participant suggested that I remove the second "IF".
I did so and it works.

Thank you for your response,

Carmine

[June7]

Did you read post 4?

[CJ_London]

suggested that I remove the second "IF".

changing the and to a then would also work. Your code does not look like it has been copy/pasted so the extra if could just be a typo.

Not using criteria in your dlookup implies each table only has, and will only ever have, one record. This may be the correct situation but if not it could return the wrong result which can also be described as ‘not working’.

Hence the reason for my asking for clarification,

for the future ‘not working’ means nothing- use code tags around copy/pasted code and provide the error code if that is the issue

[Welshgasman]

"Does not work" means it gave me a compile error.
Another participant suggested that I remove the second "IF".
I did so and it works.

Thank you for your response,

Carmine

Would have been more helpful if you had said that in the first place.