Vba post request json

'https://github.com/VBA-tools/VBA-Web. 
'Using this library, it would look like:

Sub sendPostRequest()
  Dim Body As New Dictionary
  Dim Client As New WebClient
  Dim Response As WebResponse

  Body.Add "mType", "OPEN_SYSTEM_TRADE"
  Body.Add "systemOwnerId", 10
  'Equal to Body = "{""mType"":""OPEN_SYSTEM_TRADE"",""systemOwnerId"":10}"

  Set Response = Client.PostJson("somewebsite.com", Body)

  Worksheets("Sheet1").Range("A1").Value = Response.Content
End Sub

Source: stackoverflow.com

Similar codes

1 vote185 views1 answer
Excel vba to lower case
VBA
4 votes159 views1 answer
Excel vba how to reset usedrange
VBA
0 vote170 views1 answer
Vba like with wildcard
VBA
0 vote171 views1 answer
Vbnet add axis labels to chart
VBA
1 vote183 views1 answer
Change the first item in a queue vb.net
VBA
0 vote174 views1 answer
Vba code to select image in sheet
VBA
0 vote182 views1 answer
Delete rows in excel vba code
VBA
0 vote184 views1 answer
Vba dictionary clear
VBA
0 vote206 views1 answer
Filesystemobject vba reference
VBA
1 vote186 views1 answer
Vba login website
VBA