参考URL:
GAS
function doGet() {
// シートを設定
let sh = SpreadsheetApp.getActiveSpreadsheet().getSheetByName("シート1");
// 配列としてA1セルからA3セルの値を取得します
let values = sh.getRange("A1:A50").getValues();
// joinメソッドを使用して配列の要素を指定した区切り文字で結合
let response = values.join(",");
// 完成した文字列をテキスト文字列として返す
return ContentService.createTextOutput(response);
}
参考:2次元配列対応版
VBA
Public Sub sample()
'HTTP
Dim httpRequest As New WinHttp.WinHttpRequest
With httpRequest
.Open "GET", "https://script.google.com/macros/s/ ID /exec", False
.SetRequestHeader "Content-Type", "application/x-www-form-urlencoded"
'設定した内容をリクエストで送信
.Send
'Sprit関数をしようしてカンマで分割して配列にする
Dim myary As Variant
myary = Split(httpRequest.ResponseText, ",")
'1次元から2次元にしてサイズを合わせてセルに入れる
Range("A1").Resize(UBound(myary) - LBound(myary) + 1, 1).Value = Application.Transpose(myary)
End With
End Sub