function doGet(e){
  return processGetRequest(e);
}

function processGetRequest(e){
  var sheetID = e.parameter.sheetID;
  var ss = SpreadsheetApp.openById(sheetID);
  var sheet1 = ss.getSheetByName('f');
  var jo = {};
  var dataArray = [];
  var rows = sheet1.getRange(2, 1, sheet1.getLastRow()-1, 2).getValues();
  for (var i=0, l=rows.length; i<l; i++){
    var dataRow = rows[i];
    var record = {};
    record['id']=dataRow[0];
    record['name']=dataRow[1];
    dataArray.push(record);
}
jo.user = dataArray;
  var result = JSON.stringify(jo);
  return ContentService.createTextOutput(result).setMimeType(ContentService.MimeType.JSON);
}

Sub Test()

Dim sJSONString

With CreateObject("MSXML2.XMLHTTP")
        .Open "GET", "https://script.google.com/macros/s/AKfycby5ovbrz8T_DjMoeQ-iTDhBIFbAYbuHXUxNzkfXcoc1IsSsDd5j/exec?sheetID=1IEHKtt4T525OE2nNago9ZfB-JX3CfnIo45hGvA9yQGw", False
        .send
        .sJSONString = .responseText
End With

End Sub

ActiveSheet.Select