Help regarding excel macro visual basic nga dili mo incode ug Japanese Characters!!!

[proudmom@24]

---

Hi All techy istoryans!

I need help regarding excel macro visual basic. Sa amo ni work. Dili xa ka incode ug Japanese symbols.Ang mo gawas kay kani nga symbols instead japanese " ƒŒƒfƒB�[ƒXƒnƒ“ƒhƒoƒbƒO"

IF THERE'S A NEED TO PAY SOMEONE THEN I WILL JUST TO GET THIS FIXED BEFORE THURSDAY (6/7/2012) KAY MOARI NA AKONG JAPANESE BOSS TO DISCUSS THIS PROJECT. OTRO SAD TO WALA KAHIBAW.

URGENT JUD KAAU. PLS CONTACT ME 09067647374


(MAO NI ANG MOGAWAS,,,MGA ƒJƒeƒSƒŠ�F JUD WHEN DAPAT JAPANESE SYMBOLS NI)
Columns("A:A").Select
Selection.Replace What:="ƒJƒeƒSƒŠ�F", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False


Selection.Replace What:="ƒŒƒfƒB�[ƒXƒVƒ‡ƒ‹ƒ_�[ƒoƒbƒO", Replacement:="", LookAt:=xlPart _
, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Selection.Replace What:="ƒuƒ‰ƒ“ƒh�F", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Selection.Replace What:="ƒR�[ƒ` -", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Selection.Replace What:="ƒVƒOƒlƒ`ƒƒ�[ ƒAƒbƒvƒŠƒP", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Selection.Replace What:="ƒg�[ƒgƒoƒbƒO", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Selection.Replace What:="ƒVƒOƒlƒ`ƒƒ�[ ƒXƒgƒ‰ƒCƒv", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Selection.Replace What:="ƒŒƒfƒB�[ƒXƒnƒ“ƒhƒoƒbƒO", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Selection.Replace What:="ƒEƒB�[ƒNƒGƒ“ƒh", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Selection.Replace What:="PDA‚»‚Ì‘¼", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Selection.Replace What:="ƒŒƒfƒB�[ƒX�à•z�AƒRƒCƒ“ƒP�[ƒX‚»‚Ì‘¼", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Selection.Replace What:="ƒsƒ“ƒNƒnƒEƒX", Replacement:="", LookAt:=xlPart, _

[proudmom@24]

pls. kinsa ni to naa kaila nga expert sa vba ipa contact ko 09067647374. Nana ako boss. WILL PAY HIM/HER. LET ME KNOW KAY MEETING MI SA HAROLDS HOTEL AKO SIYA DAD-ON BY TOMORROW JUNE 8,2012. MY JAPANESE BOSS WILL PAY.

[proudmom@24]

saka please urgent kaau. I NEED A VBA EXPERT BY TOMORROW 11am @ HAROLDS HOTEL

[SYNCH]

Better to be late than never. Might help anyone in the future.

It could possibly work if you have the international locales installed in your Windows system, make sure though that the proper language (JP) is selected. If you are using XP, you will be needing the CD to install the locales. Not sure with W7.

However, there is also a tedious way and that is to replace each character into their numeric unicode equivalent using ChrW(), it is a pain I know.

References:
Multi-Lingual VBA Projects for the Clinically Insane - Updated and Outdated | Tea And Biscuits
VBA Unicode done right, redux | Tea And Biscuits

[Rozencrantz]

i think that problem can be solved if you add language support to ur OS and Office pack

[sierrachello]

@proudmom..ikaw si liezel kauban nako pag elementary ug high school sa Naga?
hehehe