在使用Excel处理数据时，有时需要从某个API接口获取数据，这时就需要通过下载Json文件来获取API接口返回的数据。下面介绍如何通过Excel VBA下载Json文件。

首先，需要使用以下代码创建一个新的HTTP请求：

Dim request As New WinHttp.WinHttpRequest
request.Open "GET", "http://api.example.com/data.json", False
request.Send

这里的URL应该被替换成你需要获取数据的API接口URL。接着，需要判断请求是否成功，如果成功，则可以通过以下代码获取API接口返回的内容：

If request.Status = 200 Then
Dim json As Object
Set json = JsonConverter.Parse(request.ResponseText)
End If

这里需要使用JsonConverter对象来解析JSON字符串，所以在执行上述代码前需要确保已经从VBA编辑器中的导入了该对象。

最后，可以将获取的数据转换成Excel表格，这可以通过以下代码完成：

Dim sheet As Worksheet
Set sheet = ThisWorkbook.Sheets("Sheet1")
Dim rowCount As Long
rowCount = json.Count
For i = 1 To rowCount
sheet.Cells(i, 1) = json(i)("field1")
sheet.Cells(i, 2) = json(i)("field2")
sheet.Cells(i, 3) = json(i)("field3")
' ...
' 这里需要根据实际需求改变列名和数据类型
Next i

这里假设将数据保存到Excel Workbook的第一个工作表中，可以根据实际需要改变工作表的名称和保存数据的列及列名。