Comparing variables in VBA

[mikeymay]

I am comparing a db table field value from a record to a cell value

If .Fields(strDbField) = Trim(Range(strRangeName)) Then

strDbField is the field name in the table
strRangeName is the cell containing the value to compare to

The Field value at the point of the comparison taking place is FALSE
The Cell value at the point of the comparison taking place is FALSE

Yet the check returns FALSE

Using the Immediates window I have testing each of the variables -
Debug.Print .Fields(strDbField) = Trim(Range(strRangeName))
False

Debug.Print .Fields(strDbField)
False

Debug.Print Trim(Range(strRangeName))
False

Unsure as to what is happening but in my world False = False = True!!!

 

[BSALV]

in my world too, but trim(...) is string and the other boolean perhaps ?
what do you get with debug.print vartype(.fields(...)) and vartype(trim(...)))

 

[mikeymay]

To get this to work I've assigned the Db and cell values to strings and compared those and it works as needed.

         If IsNull(.Fields(strDbField)) Then
            strDbValue = ""
            Else
            strDbValue = .Fields(strDbField)
         End If
         
         strCellValue = Trim(Range(strRangeName))

Like you said, it's probably because I'm trying to compare different variables types.

 

[Alex Blakenburg]

This might work for you:
(you only need the Trim if you it is likely you will have spaces in the cell that need to be removed)

Debug.Print CBool(.Fields(strDbField)) = CBool(Trim(Range(strRangeName)))

 

[mikeymay]

This might work for you:
(you only need the Trim if you it is likely you will have spaces in the cell that need to be removed)

Debug.Print CBool(.Fields(strDbField)) = CBool(Trim(Range(strRangeName)))

Thanks, will give this a go.
Definitely need to trim so fingers crossed this works.