AND Operator

Result = Expression1 And Expression2

Sub ExampleAnd

Dim A As Variant, B As Variant, C As Variant, D As Variant

Dim vVarOut As Variant

    A = 10: B = 8: C = 6: D = Null

    vVarOut = A > B And B > C REM returns -1

    vVarOut = B > A And B > C REM returns 0

    vVarOut = A > B And B > D REM returns 0

    vVarOut = (B > D And B > A) REM returns 0

    vVarOut = B And A REM returns 8 due to the bitwise AND combination of both arguments

End Sub