VBA中区分重音的查询表？

我已经在VBA中创建了一个sub，用于检查我是否在网上书店被削价。问题是，许多作者和书名中都有重音字符，就我所经历的而言，我不得不把它们变成一个可查询的表格。例如，当我试图加载网页时，字符aá、é、ö会变成像@或$这样的奇怪符号

我附上迄今为止我拥有的代码：

For i = 1 To Sorok
        Nev(i) = Ekezet(Sheets(AdatokLap).Cells(i + 1, 4)
        KonyvCim(i) = Ekezet(Sheets(AdatokLap).Cells(i + 1, 5)
        ConnectString = "URL;http://bookline.hu/search/search.action?     inner=true&searchfield=" & Nev(i) & " " & KonyvCim(i) & "&tab=bookline.hu%2Foldbook"

    Set qt = Sheets(QueryLap).QueryTables.Add(Connection:=ConnectString, Destination:=Cells(1, 1))
    With qt
        .Name = "MyName"
        .FieldNames = True
        .RowNumbers = False
        .FillAdjacentFormulas = False
        .PreserveFormatting = True
        .RefreshOnFileOpen = False
        .BackgroundQuery = True
        .RefreshStyle = xlInsertDeleteCells
        .SavePassword = False
        .SaveData = True
        .AdjustColumnWidth = True
        .RefreshPeriod = 0
        .WebSelectionType = xlEntirePage
        .WebFormatting = xlWebFormattingNone
        .WebPreFormattedTextToColumns = True
        .WebConsecutiveDelimitersAsOne = True
        .WebSingleBlockTextImport = False
        .WebDisableDateRecognition = False
        .WebDisableRedirections = False
        .Refresh BackgroundQuery:=False
    End With

我编写了一个名为Ekezet（）的函数，它可以从字符串中删除所有重音字符。有没有什么方法可以让我不必删除重音字符而仍然运行web查询