Unusual non english characters in vba

[lotsbg]

I need to type the following word in VBA; Příbram, which obviously uses a couple of wierd characters. When I copy and paste the word into VBA I end up with P?íbram.

Obviously VBA doesn't recognise the ř symbol. I have tens of other words like this. Is there anyway for VBA to recognise these symbols somehow?

 

[gonen]

thank you for your reply.

I think VBA is effected by my regional setting (where my language is set to Hebrew for non-unicode)

the ASC(char) gives 63 which is the ASC of real ? and not for my real character...

any idea ??

many thanks

 

[kylefoley76]

I'm also having problems with this. If I could find a table of hex values or anything that will tell me how to get these characters below.

Π λ Δ ⇾ ⇿ ∀ ∴ ∃ □ ◊

I would really appreciate it. I would like to know their number so that I can write them into vba.

 

[pgc01]

I'm also having problems with this. If I could find a table of hex values or anything that will tell me how to get these characters below.

Π λ Δ ⇾ ⇿ ∀ ∴ ∃ □ ◊

I would really appreciate it. I would like to know their number so that I can write them into vba.

Hi Kyle

A quick way to find the hex code of a character is to copy it to a cell and then execute:

MsgBox Hex(AscW(Range("A1").Value))

 

[kylefoley76]

I got an error when I ran that macro. It said wrong number of argument or invalid property assignment. Plus it seems like it doesn't recognize the Hex method, because it changed it to lowercase when I put it in.

 

[kylefoley76]

anyone know this?

 

[pgc01]

I don't see how that can error out.

Try a simple sub with only that statement, like:

Sub DisplayHexCode()

MsgBox Hex(AscW(Range("A1").Value))

End Sub

or execute it in the Immediate Window.

Remark: Paste this code into a standard module (If it's the first module you insert it's Module1).

 

[kylefoley76]

ok, that works. thanks. I tried to input that values into the cells with this macro

Range("u10").Value = hex(AscW(2234))

and it didn't work. It turned up value 32, obviously not what I had in mind.

 

[pgc01]

ok, that works. thanks. I tried to input that values into the cells with this macro

Range("u10").Value = hex(AscW(2234))

and it didn't work. It turned up value 32, obviously not what I had in mind.

To input the character with hex code 2234 into the cell use:

Range("A1").Value = ChrW(&H2234)

 

[kylefoley76]

cool, works, thanks.

 

[pgc01]

You're welcome. Thanks for the feedback.