Macros. String problems

[MindaugasBacius]

Hello,

I do have Macros like:

SUB ExcelFile

  vDate = ActiveDocument.GetVariable("vData").GetContent.String

  SET val = ActiveDocument.Fields("To").GetPossibleValues()

  vTO = ""

  FOR i = 0 to val.Count-1

  vTO = vTO & ", " & val.Item(i).Text

  NEXT

  vCC=""

  vName = "Report123 " & vDate

  Dim vText 'as String

vText = ActiveDocument.Variables("vText").GetContent().String

  ActiveDocument.getApplication.sleep 5000

  send_report vTO, vCC, vText, vName

  ActiveDocument.getApplication.sleep 2000

  ActiveDocument.Save

  Application.Quit

END SUB

The issue appears with vText variable. I am grabbing string from QV variable vText that contains letters like Š, Ž and so on. Instead of them in the mail I receive ð, þ.

How should I solve this problem? Ideas?

Thank you!

[MindaugasBacius · Accepted solution]

I am not very happy with my solution as still I do not know how to pass the native symbols to macros.

But the alternative solution would be an Alert trigger: