{"id":12120,"date":"2019-08-16T12:00:49","date_gmt":"2019-08-16T03:00:49","guid":{"rendered":"https:\/\/www.ka-net.org\/blog\/?p=12120"},"modified":"2019-08-16T13:53:49","modified_gmt":"2019-08-16T04:53:49","slug":"office%e6%96%87%e6%9b%b8%e3%82%92%e3%83%91%e3%82%b9%e3%83%af%e3%83%bc%e3%83%89%e4%bb%98%e3%81%8dpdf%e3%81%ab%e5%a4%89%e6%8f%9b%e3%81%99%e3%82%8bvba%e3%83%9e%e3%82%af%e3%83%ad","status":"publish","type":"post","link":"https:\/\/www.ka-net.org\/blog\/?p=12120","title":{"rendered":"Office\u6587\u66f8\u3092\u30d1\u30b9\u30ef\u30fc\u30c9\u4ed8\u304dPDF\u306b\u5909\u63db\u3059\u308bVBA\u30de\u30af\u30ed"},"content":{"rendered":"<p>4\u5e74\u307b\u3069\u524d\u306b\u66f8\u3044\u305f\u3001\u4e0b\u8a18\u8a18\u4e8b\u306e\u30de\u30af\u30ed\u304cWord\u3067\u3082\u4f7f\u3048\u308b\u304b\uff1f\u3068\u306e\u8cea\u554f\u3092\u9802\u304d\u307e\u3057\u305f\u3002<\/p>\n<div class=\"cardlink\"><a href=\"https:\/\/www.ka-net.org\/blog\/?p=6209\"><div class=\"cardlink_thumbnail\"><img src='https:\/\/www.ka-net.org\/blog\/wp-content\/uploads\/eyecatch-Excel-120x120.png' alt='\u30d1\u30b9\u30ef\u30fc\u30c9\u4ed8\u306ePDF\u30d5\u30a1\u30a4\u30eb\u3092\u4f5c\u6210\u3059\u308bExcel\u30de\u30af\u30ed' width=120 height=120 \/><\/a><\/div><div class=\"cardlink_content\"><span class=\"timestamp\">2015.09.17<\/span><div class=\"cardlink_title\"><a href=\"https:\/\/www.ka-net.org\/blog\/?p=6209\">\u30d1\u30b9\u30ef\u30fc\u30c9\u4ed8\u306ePDF\u30d5\u30a1\u30a4\u30eb\u3092\u4f5c\u6210\u3059\u308bExcel\u30de\u30af\u30ed <\/a><\/div><div class=\"cardlink_excerpt\">2019\/8\/16 \u8ffd\u8a18\uff1a\r\nWord\u3084PowerPoint\u306b\u3082\u5bfe\u5fdc\u3057\u305f\u3001\u6539\u826f\u7248\u306e\u30de\u30af\u30ed\u306b\u3064\u3066\u8a18\u4e8b\u3092\u66f8\u304d\u307e\u3057\u305f\u3002\r\n\r\n\r\n\r\n\r\n\r\n\u4ee5\u524d\u66f8\u3044\u305f\u30de\u30af\u30ed\u304c\u51fa\u3066\u304d\u307e\u3057\u305f\u3002\r\nAcrobat\u4ed8\u5c5e\u306eOffice\u7528COM\u30a2\u30c9\u30a4\u30f3\u300cAcrobat PDFMaker Of...<\/div><\/div><div class=\"cardlink_footer\"><\/div><\/div>\n<p>\u6b8b\u5ff5\u306a\u304c\u3089\u3001\u4e0a\u8a18\u8a18\u4e8b\u306e\u30b3\u30fc\u30c9\u3092Word\u3067\u305d\u306e\u307e\u307e\u4f7f\u3046\u3053\u3068\u306f\u3067\u304d\u307e\u305b\u3093\u3002<br \/>\n\u305d\u3053\u3067\u4eca\u56de\u306f\u3001Excel\u306b\u9650\u5b9a\u305b\u305a\u3001Word\u3084PowerPoint\u30d5\u30a1\u30a4\u30eb\u306b\u3082\u5bfe\u5fdc\u3057\u305f\u30de\u30af\u30ed\u3092\u66f8\u3044\u3066\u307f\u307e\u3057\u305f\u3002<\/p>\n<p><span style=\"color: #ff0000; font-weight: bold;\">\u203b\u4e0b\u8a18\u30b3\u30fc\u30c9\u306f<a href=\"https:\/\/helpx.adobe.com\/jp\/acrobat\/using\/creating-pdfs-pdfmaker-windows.html\" title=\"Adobe Acrobat \u306e PDFMaker \u306b\u3088\u308b PDF \u306e\u4f5c\u6210\uff08Windows\uff09\" target=\"_blank\" rel=\"noopener noreferrer\">Acrobat PDFMaker<\/a>\u3092\u5229\u7528\u3057\u3066PDF\u30d5\u30a1\u30a4\u30eb\u3078\u306e\u5909\u63db\u3092\u884c\u3044\u307e\u3059\u3002Acrobat\u3092\u30a4\u30f3\u30b9\u30c8\u30fc\u30eb\u3057\u305f\u4e0a\u3067\u3001\u5404Office\u30a2\u30d7\u30ea\u30b1\u30fc\u30b7\u30e7\u30f3\u4e0a\u3067PDFMaker\u30a2\u30c9\u30a4\u30f3\u3092\u6709\u52b9\u306b\u3059\u308b\u5fc5\u8981\u304c\u3042\u308a\u307e\u3059\u3002<\/span><\/p>\n<pre class=\"brush: vb; title: ; notranslate\" title=\"\">Option Explicit\r\n\r\nPublic Sub Sample()\r\n'Word\u30d5\u30a1\u30a4\u30eb\u3092\u8aad\u307f\u53d6\u308a\u30fb\u6a29\u9650\u30d1\u30b9\u30ef\u30fc\u30c9\u4ed8\u306ePDF\u306b\u5909\u63db\r\n  ConvertPdfUsingPDFMaker &quot;C:\\Test\\Conv\\Test.docx&quot;, &quot;C:\\Test\\Conv\\Test.pdf&quot;, &quot;passr&quot;, &quot;passw&quot;\r\nEnd Sub\r\n\r\nPublic Sub Sample2()\r\n'Word,PowerPoint,Excel\u30d5\u30a1\u30a4\u30eb\u3092\u8aad\u307f\u53d6\u308a\u30fb\u6a29\u9650\u30d1\u30b9\u30ef\u30fc\u30c9\u4ed8\u306ePDF\u306b\u4e00\u62ec\u5909\u63db\r\n  Dim in_files, out_files\r\n  Dim i As Long\r\n  Const ReadPassWord As String = &quot;1234&quot;\r\n  Const WritePassWord As String = &quot;7777&quot;\r\n  \r\n  in_files = Array(&quot;C:\\Test\\Conv\\TestDOC.docx&quot;, _\r\n                   &quot;C:\\Test\\Conv\\TestPPT.pptx&quot;, _\r\n                   &quot;C:\\Test\\Conv\\TestXLS.xlsx&quot;)\r\n  out_files = Array(&quot;C:\\Test\\Conv\\TestDOC.pdf&quot;, _\r\n                    &quot;C:\\Test\\Conv\\TestPPT.pdf&quot;, _\r\n                    &quot;C:\\Test\\Conv\\TestXLS.pdf&quot;)\r\n  For i = LBound(in_files) To UBound(in_files)\r\n    ConvertPdfUsingPDFMaker in_files(i), out_files(i), ReadPassWord, WritePassWord\r\n  Next\r\nEnd Sub\r\n\r\nPrivate Sub ConvertPdfUsingPDFMaker(ByVal InputFilePath As String, _\r\n                                    ByVal OutputFilePath As String, _\r\n                                    Optional ByVal ReadPassWord As String = &quot;&quot;, _\r\n                                    Optional ByVal WritePassWord As String = &quot;&quot;)\r\n  Dim pm As Object 'PDFMAKERAPILib.PDFMakerApp\r\n  Dim cset As Object 'PDFMAKERAPILib.ConversionSettings\r\n  Dim sset As Object 'PDFMAKERAPILib.securitySettings\r\n  Dim appType As Long\r\n  Dim settingsName As String\r\n  Dim prms As Long\r\n  Dim ret As Long\r\n  \r\n  'PDFMAKERAPILib.SupportedApps\r\n  Const kAppUnknown = 0\r\n  'PDFMAKERAPILib.PDFMakerRetVals\r\n  Const kPDFMSuccess = 0\r\n  Const kPDFMErrorPDFMakerUnavailable = -10\r\n  Const kPDFMErrorFileOpenInAnotherApp = -24\r\n  'PDFMAKERAPILib.tagPrintingModesAllowedEnum\r\n  Const kPrintingAllowedNone = 0\r\n  Const kPrintingAllowedLowRes = 1\r\n  Const kPrintingAllowedHighRes = 2\r\n  'PDFMAKERAPILib.tagAllowedChangesEnum\r\n  Const kAllowChangesNone = 0\r\n  Const kAllowChangesInsertDeleteRotatePages = 1\r\n  Const kAllowChangesFormfillsSign = 2\r\n  Const kAllowChangesCommentingFormfillsSign = 6\r\n  Const kAllowChangesLayoutTouchupFormfillSign = 10\r\n  Const kAllowChangesAnyExceptPageExtraction = 14\r\n  Const kAllowChangesAll = 15\r\n  \r\n  On Error Resume Next\r\n  Set pm = CreateObject(&quot;PDFMakerAPI.PDFMakerApp&quot;)\r\n  On Error GoTo 0\r\n  If pm Is Nothing Then\r\n    MsgBox &quot;PDFMaker\u3092\u53d6\u5f97\u3067\u304d\u307e\u305b\u3093\u3067\u3057\u305f\u3002&quot; &amp; vbNewLine &amp; _\r\n           &quot;\u51e6\u7406\u3092\u4e2d\u6b62\u3057\u307e\u3059\u3002&quot;, vbCritical + vbSystemModal\r\n    Exit Sub\r\n  End If\r\n  \r\n  '\u30d5\u30a1\u30a4\u30eb\u5224\u5b9a\r\n  appType = pm.GetSupportedAppType(InputFilePath)\r\n  Select Case appType\r\n    Case kAppUnknown\r\n      MsgBox &quot;\u30b5\u30dd\u30fc\u30c8\u3055\u308c\u3066\u3044\u306a\u3044\u30d5\u30a1\u30a4\u30eb\u3067\u3059\u3002&quot; &amp; vbNewLine &amp; _\r\n             &quot;\u51e6\u7406\u3092\u4e2d\u6b62\u3057\u307e\u3059\u3002&quot;, vbCritical + vbSystemModal\r\n      Exit Sub\r\n  End Select\r\n  \r\n  '\u5909\u63db\u8a2d\u5b9a \u203b\u30a2\u30d7\u30ea\u30b1\u30fc\u30b7\u30e7\u30f3\u306e\u8a2d\u5b9a\u306b\u4f9d\u5b58\r\n  '\u7d30\u304b\u304f\u8a2d\u5b9a\u3059\u308b\u5834\u5408\u306f\u4e0b\u884c\u306e\u3088\u3046\u306bPDFMakerSettings\u3067\u6307\u5b9a\r\n  'prms = kCreateDocInfo Or kCreateComments Or kCreateLinks\r\n  Set cset = CreateObject(&quot;PDFMakerAPI.ConversionSettings&quot;)\r\n  cset.GetAppConversionDefaults appType, prms, settingsName\r\n  cset.SetConversionParameters prms\r\n  \r\n  '\u30bb\u30ad\u30e5\u30ea\u30c6\u30a3\u8a2d\u5b9a\r\n  Set sset = cset.GetSecuritySettings\r\n  With sset\r\n    '\u6587\u66f8\u3092\u958b\u304f\u3068\u304d\u306e\u30d1\u30b9\u30ef\u30fc\u30c9\u8a2d\u5b9a\r\n    If Len(Trim(ReadPassWord)) &gt; 0 Then\r\n      .OpenDocPasswdNeeded = True\r\n      .OpenDocPasswd = ReadPassWord\r\n    End If\r\n    \r\n    '\u6a29\u9650\u8a2d\u5b9a\r\n    If Len(Trim(WritePassWord)) &gt; 0 Then\r\n      .PermsPasswdNeeded = True\r\n      .PermsPasswd = WritePassWord\r\n      \r\n      '------------------------------------------------------------\r\n      ' * \u4e0b\u8a18\u306f\u5fc5\u8981\u306b\u5fdc\u3058\u3066\u8a2d\u5b9a\r\n      '------------------------------------------------------------\r\n      ' * \u5370\u5237\u3092\u8a31\u53ef\r\n      '------------------------------------------------------------\r\n      '.PrintingModeAllowed = kPrintingAllowedHighRes '\u9ad8\u89e3\u50cf\u5ea6\r\n      '.PrintingModeAllowed = kPrintingAllowedLowRes '\u4f4e\u89e3\u50cf\u5ea6 (150 dpi)\r\n      .PrintingModeAllowed = kPrintingAllowedNone '\u8a31\u53ef\u3057\u306a\u3044\r\n      '------------------------------------------------------------\r\n      ' * \u5909\u66f4\u3092\u8a31\u53ef\r\n      '------------------------------------------------------------\r\n      '.AllowedChanges = kAllowChangesAnyExceptPageExtraction '\u30da\u30fc\u30b8\u306e\u62bd\u51fa\u3092\u9664\u304f\u3059\u3079\u3066\u306e\u64cd\u4f5c\r\n      '.AllowedChanges = kAllowChangesCommentingFormfillsSign '\u6ce8\u91c8\u306e\u4f5c\u6210\u3001\u30d5\u30a9\u30fc\u30e0\u30d5\u30a3\u30fc\u30eb\u30c9\u306e\u5165\u529b\u3068\u65e2\u5b58\u306e\u7f72\u540d\u30d5\u30a3\u30fc\u30eb\u30c9\u306b\u7f72\u540d\r\n      '.AllowedChanges = kAllowChangesFormfillsSign '\u30d5\u30a9\u30fc\u30e0\u30d5\u30a3\u30fc\u30eb\u30c9\u306e\u5165\u529b\u3068\u65e2\u5b58\u306e\u7f72\u540d\u30d5\u30a3\u30fc\u30eb\u30c9\u306b\u7f72\u540d\r\n      '.AllowedChanges = kAllowChangesInsertDeleteRotatePages '\u30da\u30fc\u30b8\u306e\u633f\u5165\u3001\u524a\u9664\u3001\u56de\u8ee2\r\n      .AllowedChanges = kAllowChangesNone '\u8a31\u53ef\u3057\u306a\u3044\r\n      '------------------------------------------------------------\r\n      ' * \u30c6\u30ad\u30b9\u30c8\u3001\u753b\u50cf\u3001\u304a\u3088\u3073\u305d\u306e\u4ed6\u306e\u5185\u5bb9\u306e\u30b3\u30d4\u30fc\u3092\u6709\u52b9\u306b\u3059\u308b\r\n      '------------------------------------------------------------\r\n      .EnableCopyingContent = False 'True:\u30c1\u30a7\u30c3\u30afON \/ False:\u30c1\u30a7\u30c3\u30afOFF\r\n    End If\r\n  End With\r\n  cset.SetSecuritySettings sset\r\n  \r\n  'PDF\u4f5c\u6210\r\n  ret = pm.CreatePDF(srcFilePath:=InputFilePath, _\r\n                     pdfFilePath:=OutputFilePath, _\r\n                     pSettings:=cset, _\r\n                     bConvertSilent:=True, _\r\n                     bShowProgress:=True, _\r\n                     bConvertAsync:=False)\r\n  Select Case ret\r\n    Case kPDFMErrorFileOpenInAnotherApp\r\n      MsgBox &quot;\u5bfe\u8c61\u30d5\u30a1\u30a4\u30eb\u304c\u5225\u306e\u30a2\u30d7\u30ea\u30b1\u30fc\u30b7\u30e7\u30f3\u306b\u3088\u3063\u3066\u958b\u304b\u308c\u3066\u3044\u307e\u3059\u3002&quot; &amp; vbNewLine &amp; _\r\n             &quot;\u30d5\u30a1\u30a4\u30eb\u3092\u9589\u3058\u3066\u304b\u3089\u3001\u518d\u5ea6\u5b9f\u884c\u3057\u3066\u304f\u3060\u3055\u3044\u3002&quot;, vbCritical + vbSystemModal\r\n    Case kPDFMErrorPDFMakerUnavailable\r\n      MsgBox &quot;PDFMaker\u30a2\u30c9\u30a4\u30f3\u304c\u6709\u52b9\u306b\u306a\u3063\u3066\u3044\u307e\u305b\u3093\u3002&quot; &amp; vbNewLine &amp; _\r\n             &quot;\u30a2\u30c9\u30a4\u30f3\u3092\u6709\u52b9\u306b\u3057\u3066\u304b\u3089\u3001\u518d\u5ea6\u5b9f\u884c\u3057\u3066\u304f\u3060\u3055\u3044\u3002&quot;, vbCritical + vbSystemModal\r\n    Case kPDFMSuccess\r\n      Debug.Print &quot;\u6b63\u5e38\u7d42\u4e86:&quot; &amp; InputFilePath '\u78ba\u8a8d\u7528\r\n    Case Else\r\n      MsgBox &quot;\u51e6\u7406\u304c\u5931\u6557\u3057\u307e\u3057\u305f\u3002&quot; &amp; vbNewLine &amp; _\r\n             &quot;code:&quot; &amp; Hex(ret), vbCritical + vbSystemModal\r\n  End Select\r\nEnd Sub<\/pre>\n<p>\u300cSample\u300d\u306f1\u30d5\u30a1\u30a4\u30eb\u306e\u307f\u5909\u63db\u3092\u884c\u3044\u3001\u300cSample2\u300d\u306f\u8907\u6570\u306e\u30d5\u30a1\u30a4\u30eb\u3092\u4e00\u62ec\u3057\u3066\u5909\u63db\u3059\u308b\u30b5\u30f3\u30d7\u30eb\u3067\u3059\u3002<\/p>\n<p>\u4f8b\u3048\u3070\u3001Excel\u306e\u30b7\u30fc\u30c8\u306b\u5143\u30d5\u30a1\u30a4\u30eb\u306e\u30d1\u30b9\u3084\u51fa\u529b\u5148\u3001\u30d1\u30b9\u30ef\u30fc\u30c9\u3092\u8a18\u8f09\u3057\u3066\u304a\u3051\u3070\u3001\u307e\u3068\u3081\u3066\u30d1\u30b9\u30ef\u30fc\u30c9\u4ed8\u306ePDF\u3092\u4f5c\u6210\u3059\u308b\u3053\u3068\u304c\u3067\u304d\u308b\u306e\u3067\u3001\u51fa\u756a\u306f\u5272\u3068\u591a\u3044\u306e\u3067\u306f\u306a\u3044\u304b\u3068\u601d\u3044\u307e\u3059\u3002<\/p>\n<p>\u306a\u304a\u3001\u672c\u30de\u30af\u30ed\u306f\u3001Excel\u3060\u3051\u3067\u306a\u304f\u3001Word\u3084PowerPoint\u3067\u3082\u5b9f\u884c\u3059\u308b\u3053\u3068\u304c\u3067\u304d\u307e\u3059\u3002<\/p>\n<div id=\"single_banner_area2\" class=\"clearfix one_banner\">\n<div class=\"single_banner single_banner_left\">\n<script async src=\"https:\/\/pagead2.googlesyndication.com\/pagead\/js\/adsbygoogle.js\"><\/script>\r\n<!-- \u8a18\u4e8b\u4e2d(\u30c7\u30a3\u30b9\u30d7\u30ec\u30a4\u5e83\u544a\u30e6\u30cb\u30c3\u30c8) -->\r\n<ins class=\"adsbygoogle\"\r\n     style=\"display:block\"\r\n     data-ad-client=\"ca-pub-7306936664602087\"\r\n     data-ad-slot=\"5429724765\"\r\n     data-ad-format=\"auto\"\r\n     data-full-width-responsive=\"true\"><\/ins>\r\n<script>\r\n     (adsbygoogle = window.adsbygoogle || []).push({});\r\n<\/script>\n<\/div>\n<div class=\"single_banner single_banner_right\">\n<a href=\"\" target=\"_blank\"><img decoding=\"async\" src=\"\" alt=\"\" title=\"\" \/><\/a>\n<\/div>\n<\/div>\n\n<p>\u672c\u30de\u30af\u30ed\u3092\u4f5c\u6210\u3059\u308b\u306b\u3042\u305f\u308a\u3001\u4e0b\u8a18\u30b5\u30a4\u30c8\u3092\u53c2\u8003\u306b\u3057\u307e\u3057\u305f\u3002<\/p>\n<div class=\"linkcard\"><div class=\"lkc-external-wrap\"><a class=\"lkc-link no_icon\" href=\"http:\/\/tokidokidokin.com\/2012\/12\/pdfmakerapi%E3%82%92%E4%BD%BF%E3%81%A3%E3%81%A6%E3%83%91%E3%82%B9%E3%83%AF%E3%83%BC%E3%83%89%E4%BB%98%E3%81%8Dpdf%E3%82%92%E4%BD%9C%E6%88%90%E3%81%99%E3%82%8B\/\" target=\"_blank\" rel=\"external nofollow noopener\"><div class=\"lkc-card\"><div class=\"lkc-info\"><div class=\"lkc-favicon\"><img loading=\"lazy\" decoding=\"async\" src=\"https:\/\/www.google.com\/s2\/favicons?domain=tokidokidokin.com\" alt=\"\" width=\"16\" height=\"16\" \/><\/div><div class=\"lkc-domain\">tokidokidokin.com<\/div><\/div><div class=\"lkc-content\"><figure class=\"lkc-thumbnail\"><img decoding=\"async\" class=\"lkc-thumbnail-img\" src=\"https:\/\/s.wordpress.com\/mshots\/v1\/http%3A%2F%2Ftokidokidokin.com%2F2012%2F12%2Fpdfmakerapi%25E3%2582%2592%25E4%25BD%25BF%25E3%2581%25A3%25E3%2581%25A6%25E3%2583%2591%25E3%2582%25B9%25E3%2583%25AF%25E3%2583%25BC%25E3%2583%2589%25E4%25BB%2598%25E3%2581%258Dpdf%25E3%2582%2592%25E4%25BD%259C%25E6%2588%2590%25E3%2581%2599%25E3%2582%258B%2F?w=100\" width=\"100px\" height=\"108px\" alt=\"\" \/><\/figure><div class=\"lkc-title\">\u30c8\u30ad\u30c9\u30ad\u30c9\u30ad\u30f3\u30c9\u30c3\u30c8\u30b3\u30e0 :: PDFMakerAPI\u3092\u4f7f\u3063\u3066\u30d1\u30b9\u30ef\u30fc\u30c9\u4ed8\u304dPDF\u3092\u4f5c\u6210\u3059\u308b<\/div><div class=\"lkc-url\" title=\"http:\/\/tokidokidokin.com\/2012\/12\/pdfmakerapi%E3%82%92%E4%BD%BF%E3%81%A3%E3%81%A6%E3%83%91%E3%82%B9%E3%83%AF%E3%83%BC%E3%83%89%E4%BB%98%E3%81%8Dpdf%E3%82%92%E4%BD%9C%E6%88%90%E3%81%99%E3%82%8B\/\">http:\/\/tokidokidokin.com\/2012\/12\/pdfmakerapi\u3092\u4f7f\u3063\u3066\u30d1\u30b9\u30ef\u30fc\u30c9\u4ed8\u304dpdf\u3092\u4f5c\u6210\u3059\u308b\/<\/div><\/div><div class=\"clear\"><\/div><\/div><\/a><\/div><\/div>\n<p>\u60c5\u5831\u91cf\u304c\u5c11\u306a\u3044PDFMaker\u3092\u4f7f\u3063\u305f\u51e6\u7406\u306b\u3064\u3044\u3066\u8a73\u7d30\u306b\u307e\u3068\u3081\u3089\u308c\u3066\u304a\u308a\u3001\u5927\u5909\u52a9\u304b\u308a\u307e\u3057\u305f\u3002<br \/>\n\u3053\u306e\u5834\u3092\u501f\u308a\u3066\u304a\u793c\u7533\u3057\u4e0a\u3052\u307e\u3059\u3002<\/p>\n","protected":false},"excerpt":{"rendered":"4\u5e74\u307b\u3069\u524d\u306b\u66f8\u3044\u305f\u3001\u4e0b\u8a18\u8a18\u4e8b\u306e\u30de\u30af\u30ed\u304cWord\u3067\u3082\u4f7f\u3048\u308b\u304b\uff1f\u3068\u306e\u8cea\u554f\u3092\u9802\u304d\u307e\u3057\u305f\u3002 \u6b8b\u5ff5\u306a\u304c\u3089\u3001\u4e0a\u8a18\u8a18\u4e8b\u306e\u30b3\u30fc\u30c9\u3092Word\u3067\u305d\u306e\u307e\u307e\u4f7f\u3046\u3053\u3068\u306f\u3067\u304d\u307e\u305b\u3093\u3002 \u305d\u3053\u3067\u4eca\u56de\u306f\u3001Excel\u306b\u9650\u5b9a\u305b\u305a\u3001Word\u3084PowerPoin [&hellip;]","protected":false},"author":1,"featured_media":7120,"comment_status":"open","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"_jetpack_memberships_contains_paid_content":false,"footnotes":"","jetpack_publicize_message":"[Office\u6587\u66f8\u3092\u30d1\u30b9\u30ef\u30fc\u30c9\u4ed8\u304dPDF\u306b\u5909\u63db\u3059\u308bVBA\u30de\u30af\u30ed]","jetpack_publicize_feature_enabled":true,"jetpack_social_post_already_shared":true,"jetpack_social_options":{"image_generator_settings":{"template":"highway","default_image_id":0,"font":"","enabled":false},"version":2}},"categories":[4,48,49,58],"tags":[],"class_list":["post-12120","post","type-post","status-publish","format-standard","has-post-thumbnail","hentry","category-office","category-excel-office","category-word-office","category-powerpoint"],"aioseo_notices":[],"jetpack_publicize_connections":[],"jetpack_featured_media_url":"https:\/\/www.ka-net.org\/blog\/wp-content\/uploads\/eyecatch-OfficeVBA.png","jetpack_shortlink":"https:\/\/wp.me\/p4UZZr-39u","jetpack_sharing_enabled":true,"_links":{"self":[{"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=\/wp\/v2\/posts\/12120","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=12120"}],"version-history":[{"count":1,"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=\/wp\/v2\/posts\/12120\/revisions"}],"predecessor-version":[{"id":12121,"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=\/wp\/v2\/posts\/12120\/revisions\/12121"}],"wp:featuredmedia":[{"embeddable":true,"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=\/wp\/v2\/media\/7120"}],"wp:attachment":[{"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=12120"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=12120"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.ka-net.org\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=12120"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}