2007 Excel Hexadecimal XOR calculation

[Sparky81]

I have been trying to figure out how to do XOR calculations in Excel instead of using windows calculator. Such as 1A xor F1 = EB.

I have tried a few variations of modules within VBA, set references to atpvbaen.xls, but I am still getting

Compile Error:
Sub or Function not defined

Any ideas on how to do this? I am a newbie on writing codes so bear with me.

 

[shg]

Xor is a native operator

myLong = &H1A Xor &HF1
msgbox hex(myLong)

 

[Sparky81]

Gave me "invalid outside procedure" error when I used the code.

 

[CharlesChuckieCharles]

=tester(C19,D19)

Public Function tester(r1 As Range, r2 As Range) As Double

tester = r1.Value Xor r2.Value
End Function

(put in a module)

 

[Sparky81]

That works. Will I always have to use "&H" or is there a work around?

This will start with a decimal number and will eventually spit out a string of hexadecimal. If I can make it to where the single decimal number is input and the rest is automated it would be perfect.

Thanks for your help!

 

[CharlesChuckieCharles]

=tester(C19,D19)
C19 and d19 are cells

just type &H1A etc into the cells

 

[Sparky81]

I can have them do that. the cells its actually pulling from were going to be hidden but I can show them and have people add &H to the front end of the number. Just trying to see if there was a work around. Again thanks!

 

[CharlesChuckieCharles]

or have the function add &H to every range value so the users don't have to worry about it ... much safer too

"&H" & r1.Value

 

[Sparky81]

Never used that function before. Learning all kinds of basic tricks today haha