Excel: получить значения из загруженного XML и вставить в таблицу?

Question

Как заставить Excel загружать http://api.eve-central.com/api/evemon, анализировать его и форматировать значения в таблице каждый раз, когда открывается файл .xlsx?

Я попытался импортировать XML, и это сработало, но я не знаю, что делать отсюда.

Спасибо!

Answer 1

Если вы используете Data | Import External Query | New Web Query, есть параметр RefreshOnFileOpen, который вы можете просто установить в True.

Вот фрагмент, который получает данные из сети, но не форматирует их (так как вы сказали, что это уже работает).

'
'
    Range("I12").Select
    With ActiveSheet.QueryTables.Add(Connection:= _
        "URL;http://api.eve-central.com/api/evemon", Destination:=Range("I12"))
        .Name = "evemon_1"
        .FieldNames = True
        .RowNumbers = False
        .FillAdjacentFormulas = False
        .PreserveFormatting = True
        .RefreshOnFileOpen = True
        .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
End Sub