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

0 vote215 views1 answer
Find the name of the last excel sheet vb
VBA
0 vote174 views1 answer
Check if cell is dbnullvb.net
VBA
0 vote154 views1 answer
If statement vdhl
VBA
0 vote137 views1 answer
Group controls programmatically vb
VBA
1 vote133 views1 answer
Excel vba hide zero values
VBA
0 vote151 views1 answer
Vbnet check if string is only numbers
VBA
0 vote143 views1 answer
Excel vba delete folder
VBA
0 vote148 views1 answer
Build an index all files of a FTP site
VBA
0 vote143 views1 answer
Vba type
VBA
0 vote97 views1 answer
Vba set vs dim
VBA