A message from our CEO about the future of Stack Overflow and Stack Exchange. Read now.
428
reputation
4
18

Petrichor

MEng, PhD candidate. A bit of experience in C++, Fortran 77 and now VBA via excel.

Saving for a later project, scraping and analysing data for fantasy football:

 Public Sub exceljson()
Dim https As Object, Json As Object, i As Integer

Dim Item As Variant

Set https = CreateObject("MSXML2.XMLHTTP")
https.Open "GET", "https://min-api.cryptocompare.com/data/price?fsym=USD&tsyms=BTC", False
https.Send

Set Json = JsonConverter.ParseJson(https.responseText)

i = 2
For Each Item In Json.Items
    Sheets(1).Cells(i, 2).Value = Item
    i = i + 1
Next
MsgBox ("complete")
End Sub
7
answers
10
questions
~7k
people reached
  • Reading, United Kingdom
  • Member for 2 years
  • 20 profile views
  • Last seen Jan 15 at 8:20

Top tags (24)

Score 3
Posts 2
Posts % 12
Score 3
Posts 2
Score 3
Posts 2
Score 2
Posts 2
Score 1
Posts 8
Score 1
Posts 6

Top posts (17) All Questions Answers | Votes Newest

View all questions and answers

Badges (22)

Gold

Silver

4

Rarest

Bronze

18

Rarest