{"id":10834,"date":"2018-09-06T12:00:58","date_gmt":"2018-09-06T03:00:58","guid":{"rendered":"https:\/\/www.ka-net.org\/blog\/?p=10834"},"modified":"2018-09-06T13:57:57","modified_gmt":"2018-09-06T04:57:57","slug":"google-%e3%82%b9%e3%83%a9%e3%82%a4%e3%83%89%e3%81%a7%e6%96%b0%e8%a6%8f%e3%83%97%e3%83%ac%e3%82%bc%e3%83%b3%e3%83%86%e3%83%bc%e3%82%b7%e3%83%a7%e3%83%b3%e3%82%92%e4%bd%9c%e6%88%90%e3%81%99%e3%82%8bvba","status":"publish","type":"post","link":"https:\/\/www.ka-net.org\/blog\/?p=10834","title":{"rendered":"Google \u30b9\u30e9\u30a4\u30c9\u3067\u65b0\u898f\u30d7\u30ec\u30bc\u30f3\u30c6\u30fc\u30b7\u30e7\u30f3\u3092\u4f5c\u6210\u3059\u308bVBA\u30de\u30af\u30ed"},"content":{"rendered":"

\u3053\u3053\u6570\u65e5PowerPoint\u306e\u30de\u30af\u30ed\u306b\u52a0\u3048\u3001Google Apps Script\u304b\u3089Google \u30b9\u30e9\u30a4\u30c9\u3092\u53d6\u308a\u6271\u3046\u65b9\u6cd5\u306b\u3064\u3044\u3066\u8a18\u4e8b\u3092\u66f8\u3044\u3066\u304d\u307e\u3057\u305f\u3002<\/p>\n

\u9078\u629e\u4e2d\u306e\u56f3\u5f62\u306e\u6587\u5b57\u5217\u3092\u86cd\u5149\u30da\u30f3\u3067\u30cf\u30a4\u30e9\u30a4\u30c8\u3059\u308bPowerPoint\u30de\u30af\u30ed<\/a><\/div>
2018.09.05<\/span>
\u9078\u629e\u4e2d\u306e\u56f3\u5f62\u306e\u6587\u5b57\u5217\u3092\u86cd\u5149\u30da\u30f3\u3067\u30cf\u30a4\u30e9\u30a4\u30c8\u3059\u308bPowerPoint\u30de\u30af\u30ed <\/a><\/div>
MSDN\u30d5\u30a9\u30fc\u30e9\u30e0\u306b\u300cPowerPoint 2016\u3067\u3001\u30de\u30af\u30ed\u3067\u9078\u629e\u4e2d\u306e\u56f3\u5f62\u3092\u30cf\u30a4\u30e9\u30a4\u30c8\u3059\u308b\u3068\u3001\u6587\u5b57\u5217\u306e\u66f8\u5f0f\u304c\u52dd\u624b\u306b\u5909\u308f\u3063\u3066\u3057\u307e\u3046\u300d\u3068\u3044\u3063\u305f\u8cea\u554f\u304c\u3042\u308a\u307e\u3057\u305f\u3002\r\n\r\n\u78ba\u8a8d\u3057\u3066\u307f\u308b\u3068\u3001\u305f\u3057\u304b\u306b\u5148\u982d\u306e\u6587\u5b57\u306e\u66f8\u5f0f\u304c\u5f8c\u306e\u6587\u5b57\u306b\u307e\u3067\u53cd\u6620\u3055\u308c\u3066\u3057\u307e\u3063\u3066\u3044\u308b\u3088\u3046\u3067\u3059\u3002\r\n\r...<\/div><\/div>
<\/div><\/div>\n
[Google Apps Script]Google \u30b9\u30e9\u30a4\u30c9\u3067\u30b9\u30af\u30ea\u30d7\u30c8\u3092\u5b9f\u884c\u3059\u308b<\/a><\/div>
2018.09.05<\/span>
[Google Apps Script]Google \u30b9\u30e9\u30a4\u30c9\u3067\u30b9\u30af\u30ea\u30d7\u30c8\u3092\u5b9f\u884c\u3059\u308b <\/a><\/div>
\u6700\u8fd1\u79c1\u306e\u5468\u308a\u3067PowerPoint VBA\u304c\u3072\u3063\u305d\u308a\u3068\u6d41\u884c\u4e2d\u3067\u3059\u3002\r\nExcel\u306e\u30de\u30af\u30ed\u306b\u6bd4\u3079\u3066\u6ce8\u76ee\u3055\u308c\u308b\u6a5f\u4f1a\u304c\u5c11\u306a\u304b\u3063\u305fPowerPoint\u30de\u30af\u30ed\u306b\u7126\u70b9\u304c\u5f53\u305f\u308b\u306e\u306f\u4e2d\u3005\u9762\u767d\u3044\u6d41\u308c\u3067\u3059\u306d\uff01\r\n\r\n\u201c\u4e57\u308b\u3057\u304b\u306a\u3044\u3001\u3053\u306e\u30d3\u30c3\u30b0\u30a6\u30a7\u30fc\u30d6\u306b\u201d\u3001\u3068\u3044\u3046\u3053\u3068\u3067\u3001\u79c1\u3082\u3053\u306e\u6d41...<\/div><\/div>
<\/div><\/div>\n

\u3053\u3046\u6765\u308b\u3068\u3001\u6b21\u306fPowerPoint\u30de\u30af\u30ed\u304b\u3089Google \u30b9\u30e9\u30a4\u30c9\u3092\u5f04\u308d\u3046<\/span>\u3068\u3044\u3046\u306e\u306f\u3054\u304f\u81ea\u7136\u306a\u6d41\u308c\u304b\u3068\u601d\u3044\u307e\u3059\u3002<\/p>\n

\u305d\u3053\u3067\u4eca\u56de\u306f\u3001VBA\u30de\u30af\u30ed\u304b\u3089Google \u30b9\u30e9\u30a4\u30c9\u3067\u65b0\u898f\u30d7\u30ec\u30bc\u30f3\u30c6\u30fc\u30b7\u30e7\u30f3\u3092\u4f5c\u6210\u3059\u308b\u65b9\u6cd5\u3092\u7d39\u4ecb\u3057\u307e\u3059\u3002<\/p>\n

Google Slides API<\/h4>\n

Google \u30b9\u30e9\u30a4\u30c9\u306b\u306f\u3001\u5916\u90e8\u304b\u3089\u30d7\u30ec\u30bc\u30f3\u30c6\u30fc\u30b7\u30e7\u30f3\u3092\u64cd\u4f5c\u3059\u308b\u305f\u3081\u306eAPI\u300cGoogle Slides API<\/a>\u300d\u304c\u7528\u610f\u3055\u308c\u3066\u3044\u307e\u3059\u3002<\/p>\n

.NET<\/a>\u3084PHP<\/a>\u3068\u3044\u3063\u305f\u4e00\u822c\u7684\u306a\u8a00\u8a9e\u306b\u306f\u30e9\u30a4\u30d6\u30e9\u30ea\u304c\u7528\u610f\u3055\u308c\u3066\u3044\u308b\u306e\u3067\u6bd4\u8f03\u7684API\u3082\u547c\u3073\u51fa\u3057\u3084\u3059\u3044\u306e\u3067\u3059\u304c\u3001VBA\u306b\u306f\u3082\u3061\u308d\u3093\u30e9\u30a4\u30d6\u30e9\u30ea\u304c\u7528\u610f\u3055\u308c\u3066\u3044\u306a\u3044\u306e\u3067\u81ea\u529b\u3067\u5b9f\u88c5<\/span>\u3059\u308b\u5fc5\u8981\u304c\u3042\u308a\u307e\u3059\u3002<\/p>\n

API\u306e\u547c\u3073\u51fa\u3057\u306b\u3042\u305f\u3063\u3066\u306f\u3001Authorization Code\u3092\u53d6\u5f97\u3057\u3066Access Token\u3092\u53d6\u5f97\u3057\u3066\u2026\u3068\u3044\u3063\u305f\u30d5\u30ed\u30fc\u304c\u5fc5\u8981\u306a\u306e\u3067\u3059\u304c\u3001\u3053\u3053\u3067\u306f\u6df1\u304f\u89e3\u8aac\u3057\u307e\u305b\u3093\u3002
\nYouTube Data API\u306e\u30ac\u30a4\u30c9\u306b\u306a\u308a\u307e\u3059\u304c\u3001\u4e0b\u8a18\u30da\u30fc\u30b8\u304c\u6bd4\u8f03\u7684\u5206\u304b\u308a\u3084\u3059\u304f\u307e\u3068\u307e\u3063\u3066\u3044\u308b\u306e\u3067\u3001\u53c2\u8003\u306b\u3057\u3066\u3044\u305f\u3060\u3051\u308c\u3070\u3068\u601d\u3044\u307e\u3059\u3002<\/p>\n

\"\"<\/div>
Google Developers<\/div><\/div>
\"\"<\/figure>
OAuth 2.0 Flow: Installed apps  |  YouTube Data API (v3) &nbsp...<\/div>
https:\/\/developers.google.com\/youtube\/v3\/guides\/auth\/installed-apps?hl=ja<\/div><\/div>
<\/div><\/div><\/a><\/div><\/div>\n

\u4e0b\u6e96\u5099<\/h4>\n

API\u3092\u547c\u3073\u51fa\u3059\u524d\u306b\u3001\u307e\u305a\u306f\u300c\u30af\u30e9\u30a4\u30a2\u30f3\u30c8 ID<\/span>\u300d\u3068\u300c\u30af\u30e9\u30a4\u30a2\u30f3\u30c8 \u30b7\u30fc\u30af\u30ec\u30c3\u30c8<\/span>\u300d\u304c\u5fc5\u8981\u306b\u306a\u308a\u307e\u3059\u3002
\n\u524d\u56de\u66f8\u3044\u305f\u4e0b\u8a18\u8a18\u4e8b\u3092\u53c2\u8003\u306b\u3001\u3053\u306e2\u3064\u3092\u53d6\u5f97\u3057\u3066\u304f\u3060\u3055\u3044\u3002<\/p>\n

\u30102018\u5e749\u6708\u7248\u3011Google API Console\u3067\u30af\u30e9\u30a4\u30a2\u30f3\u30c8ID\u3068\u30af\u30e9\u30a4\u30a2\u30f3\u30c8\u30b7\u30fc\u30af\u30ec\u30c3\u30c8\u3092\u53d6\u5f97\u3059\u308b\u65b9\u6cd5<\/a><\/div>
2018.09.06<\/span>
\u30102018\u5e749\u6708\u7248\u3011Google API Console\u3067\u30af\u30e9\u30a4\u30a2\u30f3\u30c8ID\u3068\u30af\u30e9\u30a4\u30a2\u30f3\u30c8\u30b7\u30fc\u30af\u30ec\u30c3\u30c8\u3092\u53d6\u5f97\u3059\u308b\u65b9\u6cd5 <\/a><\/div>
Google\u306eAPI\u3092\u547c\u3073\u51fa\u3059\u306b\u3042\u305f\u308a\u3001\u30af\u30e9\u30a4\u30a2\u30f3\u30c8ID\u3068\u30af\u30e9\u30a4\u30a2\u30f3\u30c8\u30b7\u30fc\u30af\u30ec\u30c3\u30c8\u304c\u5fc5\u8981\u306a\u5834\u5408\u304c\u3042\u308a\u307e\u3059\u3002\r\n\u5f53\u30d6\u30ed\u30b0\u3067\u3082\u305d\u306e\u53d6\u5f97\u65b9\u6cd5\u306b\u3064\u3044\u3066\u3044\u304f\u3064\u304b\u8a18\u4e8b\u3092\u66f8\u3044\u3066\u304d\u305f\u306e\u3067\u3059\u304c(\u4e0b\u8a18\u53c2\u7167)\u3001\u7ba1\u7406\u753b\u9762\u306eUI\u306e\u5909\u66f4\u306b\u3088\u308a\u3001\u53e4\u3044\u60c5\u5831\u304c\u4f7f\u3048\u306a\u304f\u306a\u308b\u3053\u3068\u304c\u3088\u304f\u3042\u308a\u307e\u3059\u3002\r...<\/div><\/div>
<\/div><\/div>\n

\u30af\u30e9\u30a4\u30a2\u30f3\u30c8 ID\u3068\u30af\u30e9\u30a4\u30a2\u30f3\u30c8 \u30b7\u30fc\u30af\u30ec\u30c3\u30c8\u306e\u6e96\u5099\u304c\u3067\u304d\u305f\u3089\u3001\u300cGoogle Slides API<\/span>\u300d\u3092\u6709\u52b9\u306b\u3057\u307e\u3059\u3002<\/p>\n

    \n
  1. API\u30e9\u30a4\u30d6\u30e9\u30ea(https:\/\/console.developers.google.com\/apis\/library<\/a>)\u306b\u30a2\u30af\u30bb\u30b9\u3057\u3001Google \u30a2\u30ab\u30a6\u30f3\u30c8\u3067\u30ed\u30b0\u30a4\u30f3\u3057\u307e\u3059\u3002<\/li>\n
  2. \u300c\u30d7\u30ed\u30b8\u30a7\u30af\u30c8\u306e\u9078\u629e<\/span>\u300d\u30d7\u30eb\u30c0\u30a6\u30f3\u306e\u30d7\u30ed\u30b8\u30a7\u30af\u30c8\u304c\u4f7f\u7528\u3059\u308b\u30d7\u30ed\u30b8\u30a7\u30af\u30c8\u306b\u306a\u3063\u3066\u3044\u308b\u3053\u3068\u3092\u78ba\u8a8d\u3057\u307e\u3059\u3002<\/li>\n

    \"\"<\/a><\/p>\n

  3. \u300cslide\u300d\u3092\u30ad\u30fc\u30ef\u30fc\u30c9\u306b\u691c\u7d22\u3059\u308b\u3068\u3001\u300cGoogle Slides API<\/span>\u300d\u304c\u30d2\u30c3\u30c8\u3059\u308b\u306e\u3067API\u3092\u6709\u52b9\u306b\u3057\u307e\u3059\u3002<\/li>\n

    \"\"<\/a><\/p>\n

    \"\"<\/a>\n<\/ol>\n

    \u4ee5\u4e0a\u3067\u6e96\u5099\u4f5c\u696d\u306f\u5b8c\u4e86\u3067\u3059\u3002<\/p>\n

    Google \u30b9\u30e9\u30a4\u30c9\u3067\u65b0\u898f\u30d7\u30ec\u30bc\u30f3\u30c6\u30fc\u30b7\u30e7\u30f3\u3092\u4f5c\u6210\u3059\u308bVBA\u30de\u30af\u30ed<\/h4>\n

    \u6b21\u306f\u3044\u3088\u3044\u3088\u30b3\u30fc\u30c9\u3067\u3059\u3002
    \n\u30af\u30e9\u30a4\u30a2\u30f3\u30c8 ID\u3068\u30af\u30e9\u30a4\u30a2\u30f3\u30c8 \u30b7\u30fc\u30af\u30ec\u30c3\u30c8\u306f\u305d\u308c\u305e\u308c\u81ea\u5206\u306e\u3082\u306e\u306b\u7f6e\u304d\u63db\u3048\u3066\u304f\u3060\u3055\u3044\u3002
    \n\u307e\u305f\u3001\u4e0b\u8a18\u30b3\u30fc\u30c9\u306fScriptControl\u3092\u4f7f\u7528\u3057\u3066\u3044\u308b\u305f\u3081\u300164\u30d3\u30c3\u30c8\u7248\u306eOffice\u3067\u306f\u52d5\u4f5c\u3057\u307e\u305b\u3093<\/span>\u306e\u3067\u3001\u305d\u306e\u70b9\u3082\u6ce8\u610f\u304c\u5fc5\u8981\u3067\u3059\u3002<\/p>\n

    '\u203bScriptControl\u3092\u4f7f\u7528\u3057\u3066\u3044\u308b\u305f\u3081\u300164\u30d3\u30c3\u30c8\u7248\u306eOffice\u3067\u306f\u52d5\u4f5c\u3057\u307e\u305b\u3093\u3002\r\nOption Explicit\r\n\r\n'--------------------------------------------------\r\n'\u203b\u8981\u5909\u66f4\r\n'--------------------------------------------------\r\nPrivate Const client_id As String = "(\u30af\u30e9\u30a4\u30a2\u30f3\u30c8 ID)"\r\nPrivate Const client_secret As String = "(\u30af\u30e9\u30a4\u30a2\u30f3\u30c8 \u30b7\u30fc\u30af\u30ec\u30c3\u30c8)"\r\n'--------------------------------------------------\r\n \r\nPrivate Const redirect_uri As String = "urn:ietf:wg:oauth:2.0:oob"\r\nPrivate Const response_type As String = "code"\r\nPrivate Const grant_type As String = "authorization_code"\r\n\r\nPublic Sub CallSlidesAPI()\r\n  Dim ret As String\r\n  \r\n  ret = CreateNewPresentation("\u65b0\u898f\u30d7\u30ec\u30bc\u30f3\u30c6\u30fc\u30b7\u30e7\u30f3")\r\n  If Len(Trim(ret)) > 0 Then\r\n    MsgBox "presentationId:" & ret, vbInformation + vbSystemModal, "\u51e6\u7406\u6210\u529f"\r\n  Else\r\n    MsgBox "\u51e6\u7406\u304c\u5931\u6557\u3057\u307e\u3057\u305f\u3002", vbExclamation + vbSystemModal\r\n  End If\r\nEnd Sub\r\n\r\nPublic Function CreateNewPresentation(ByVal title As String) As String\r\n'\u65b0\u898f\u30d7\u30ec\u30bc\u30f3\u30c6\u30fc\u30b7\u30e7\u30f3\u4f5c\u6210\r\n  Dim auth_code As String\r\n  Dim access_token As String\r\n  Dim presentation_id As String\r\n  Dim res As String\r\n  Dim json As Object\r\n  Dim dat As Variant\r\n  Const scopes As String = "https:\/\/www.googleapis.com\/auth\/drive%20https:\/\/www.googleapis.com\/auth\/presentations"\r\n  Const presentation_uri As String = "https:\/\/slides.googleapis.com\/v1\/presentations"\r\n  \r\n  'Authorization Code\u53d6\u5f97\r\n  auth_code = GetAuthorizationCode(scopes)\r\n  If Len(Trim(auth_code)) < 1 Then Exit Function\r\n  \r\n  'Access Token\u53d6\u5f97\r\n  access_token = GetAccessToken(auth_code)\r\n  If Len(Trim(access_token)) < 1 Then Exit Function\r\n  \r\n  'API\u5b9f\u884c\r\n  dat = "{""title"": """ & title & """}"\r\n  With CreateObject("WinHttp.WinHttpRequest.5.1")\r\n    .Open "POST", presentation_uri, False\r\n    .SetRequestHeader "Content-Type", "application\/json; charset=UTF-8"\r\n    .SetRequestHeader "Authorization", "Bearer " & access_token\r\n    .Send dat\r\n    Select Case .Status\r\n      Case 200:\r\n        res = "(" & .responseText & ")"\r\n        With CreateObject("ScriptControl")\r\n          .Language = "JScript"\r\n          Set json = .Eval(res)\r\n          If Not json Is Nothing Then presentation_id = VBA.CallByName(json, "presentationId", VbGet)\r\n        End With\r\n    End Select\r\n  End With\r\n  CreateNewPresentation = presentation_id\r\nEnd Function\r\n\r\nPrivate Function GetAuthorizationCode(ByVal scopes As String) As String\r\n'Authorization Code\u53d6\u5f97\r\n  Dim ie As Object\r\n  Dim url As String\r\n  Dim iptCode As Object\r\n  Dim auth_code As String\r\n  Const READYSTATE_COMPLETE = 4\r\n  \r\n  '\u521d\u671f\u5316\r\n  Set ie = Nothing: Set iptCode = Nothing\r\n  \r\n  url = "https:\/\/accounts.google.com\/o\/oauth2\/auth?" & _\r\n        "client_id=" & client_id & _\r\n        "&redirect_uri=" & redirect_uri & _\r\n        "&scope=" & scopes & _\r\n        "&response_type=" & response_type\r\n  Set ie = CreateObject("InternetExplorer.Application")\r\n  With ie\r\n    .Visible = True\r\n    .AddressBar = False\r\n    .MenuBar = False\r\n    .StatusBar = False\r\n    .Toolbar = False\r\n    .Width = 600\r\n    .Height = 480\r\n    .Navigate url\r\n    \r\n    '\u627f\u8a8d\u5f85\u3061\r\n    Do\r\n      DoEvents\r\n    Loop While InStr(LCase(.LocationURL), "accounts.google.com\/o\/oauth2\/approval") < 1\r\n    \r\n    'Authorization Code\u53d6\u5f97\u5f85\u3061\r\n    On Error Resume Next\r\n    Do\r\n      Set iptCode = .Document.getElementById("code")\r\n      DoEvents\r\n    Loop While iptCode Is Nothing\r\n    On Error GoTo 0\r\n    auth_code = iptCode.Value\r\n    \r\n    '\u30ed\u30b0\u30a2\u30a6\u30c8\r\n    .Navigate "https:\/\/accounts.google.com\/Logout"\r\n    While .Busy Or .readyState <> READYSTATE_COMPLETE\r\n      DoEvents\r\n    Wend\r\n    .Quit\r\n  End With\r\n  GetAuthorizationCode = auth_code\r\nEnd Function\r\n\r\nPrivate Function GetAccessToken(ByVal auth_code As String) As String\r\n'Access Token\u53d6\u5f97\r\n  Dim access_token As String\r\n  Dim res As String\r\n  Dim json As Object\r\n  Dim dat As Variant\r\n  \r\n  dat = "code=" & auth_code & _\r\n        "&client_id=" & client_id & _\r\n        "&client_secret=" & client_secret & _\r\n        "&redirect_uri=" & redirect_uri & _\r\n        "&grant_type=" & grant_type\r\n  With CreateObject("WinHttp.WinHttpRequest.5.1")\r\n    .Open "POST", "https:\/\/accounts.google.com\/o\/oauth2\/token", False\r\n    .SetRequestHeader "Content-Type", "application\/x-www-form-urlencoded"\r\n    .Send dat\r\n    Select Case .Status\r\n      Case 200:\r\n        res = "(" & .responseText & ")"\r\n        With CreateObject("ScriptControl")\r\n          .Language = "JScript"\r\n          Set json = .Eval(res)\r\n          If Not json Is Nothing Then access_token = VBA.CallByName(json, "access_token", VbGet)\r\n        End With\r\n    End Select\r\n  End With\r\n  GetAccessToken = access_token\r\nEnd Function<\/pre>\n
    \u5b9f\u884c\u753b\u9762<\/h4>\n
    \u4e0a\u8a18\u30b3\u30fc\u30c9\u3092\u5b9f\u884c\u3059\u308b\u3068\u3001Internet Explorer\u304c\u7acb\u3061\u4e0a\u304c\u308b\u306e\u3067\u3001Google \u30a2\u30ab\u30a6\u30f3\u30c8\u3067\u30ed\u30b0\u30a4\u30f3\u3057\u307e\u3059\u3002<\/p>\n
    \"\"<\/a><\/p>\n
    \"\"<\/a><\/p>\n
    \u30a2\u30af\u30bb\u30b9\u306e\u8a31\u53ef\u3092\u6c42\u3081\u3089\u308c\u308b\u306e\u3067\u3001\u300c\u8a31\u53ef<\/span>\u300d\u30dc\u30bf\u30f3\u3092\u30af\u30ea\u30c3\u30af\u3057\u307e\u3059\u3002<\/p>\n
    \"\"<\/a><\/p>\n
    \u554f\u984c\u306a\u304f\u51e6\u7406\u304c\u5b9f\u884c\u3055\u308c\u308b\u3068\u3001\u65b0\u3057\u3044\u30d7\u30ec\u30bc\u30f3\u30c6\u30fc\u30b7\u30e7\u30f3\u304c\u4f5c\u6210\u3055\u308c\u3001\u305d\u306eID(presentationId)\u304c\u30e1\u30c3\u30bb\u30fc\u30b8\u30dc\u30c3\u30af\u30b9\u3067\u8868\u793a\u3055\u308c\u307e\u3059\u3002<\/p>\n
    \"\"<\/a><\/p>\n
    \"\"<\/a><\/p>\n
    \"\"<\/a><\/p>\n
    \u304a\u308f\u308a\u306b<\/h4>\n
    \u4ee5\u4e0a\u306e\u3088\u3046\u306b\u3001VBA\u30de\u30af\u30ed\u304b\u3089Google \u30b9\u30e9\u30a4\u30c9\u3067\u65b0\u898f\u30d7\u30ec\u30bc\u30f3\u30c6\u30fc\u30b7\u30e7\u30f3\u3092\u4f5c\u6210\u3067\u304d\u308b\u3053\u3068\u304c\u78ba\u8a8d\u3067\u304d\u307e\u3057\u305f\u3002
    \n\u305f\u3060\u3001Slides API\u3092\u4f7f\u3063\u3066\u30c6\u30ad\u30b9\u30c8\u7de8\u96c6\u3084\u30b7\u30a7\u30a4\u30d7\u306e\u8ffd\u52a0\u7b49\u3082\u3067\u304d\u308b\u306e\u3067\u3059\u304c\u3001JSON\u5f62\u5f0f\u3067\u53d6\u308a\u6271\u3046\u3053\u3068\u306b\u306a\u308b\u305f\u3081\u3001VBA\u30de\u30af\u30ed\u3067\u51e6\u7406\u3059\u308b\u306e\u306f\u30c4\u30e9\u3044\u3067\u3059\u3002<\/p>\n
    VBA\u3068Google API\u306e\u9023\u643a\u3068\u3044\u3046\u3001\u8328\u306e\u9053\u306b\u8208\u5473\u304c\u3042\u308b\u65b9\u306f\u662f\u975e\u304a\u8a66\u3057\u3044\u305f\u3060\u304d\u305f\u3044\u306e\u3067\u3059\u304c\u3001\u305d\u3046\u3067\u306a\u3044\u65b9\u306f\u3001\u7d20\u76f4\u306bGoogle Apps Script\u3092\u4f7f\u3063\u305f\u65b9\u304c\u826f\u3044\u3060\u308d\u3046<\/span>\u3068\u601d\u3044\u307e\u3059
    \n(\u3053\u3053\u307e\u3067\u66f8\u3044\u3066\u304a\u3044\u3066\u4f55\u3067\u3059\u304c\u30fb\u30fb\u30fb)<\/p>\n
    \u307e\u305f\u3001\u4eca\u56de\u306e\u30de\u30af\u30ed\u306fPowerPoint\u30de\u30af\u30ed\u3068\u3057\u3066\u52d5\u4f5c\u78ba\u8a8d\u3092\u884c\u3044\u307e\u3057\u305f\u304c\u3001\u30a2\u30d7\u30ea\u30b1\u30fc\u30b7\u30e7\u30f3\u306b\u4f9d\u5b58\u3059\u308b\u66f8\u304d\u65b9\u306f\u3057\u3066\u3044\u306a\u3044\u306e\u3067\u3001Excel\u3084Word\u3068\u3044\u3063\u305f\u3001\u4ed6\u306eOffice\u30a2\u30d7\u30ea\u30b1\u30fc\u30b7\u30e7\u30f3\u304b\u3089\u3067\u3082\u5b9f\u884c\u3067\u304d\u307e\u3059\u3002<\/p>\n
    \n
    \n