{"id":912,"date":"2020-05-20T22:52:11","date_gmt":"2020-05-20T13:52:11","guid":{"rendered":"https:\/\/extan.jp\/?p=912"},"modified":"2021-09-17T18:54:28","modified_gmt":"2021-09-17T09:54:28","slug":"%e3%80%90outlook-vba%e3%80%91%e5%8f%97%e4%bf%a1%e3%81%97%e3%81%9f%e3%83%a1%e3%83%bc%e3%83%ab%e3%81%ae%e6%b7%bb%e4%bb%98%e3%83%95%e3%82%a1%e3%82%a4%e3%83%ab%e3%82%92%e8%87%aa%e5%8b%95%e4%bd%9c%e6%88%90","status":"publish","type":"post","link":"https:\/\/extan.jp\/?p=912","title":{"rendered":"\u3010Outlook VBA\u3011\u53d7\u4fe1\u3057\u305f\u30e1\u30fc\u30eb\u306e\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u3092\u81ea\u52d5\u4f5c\u6210\u3057\u305f\u65e5\u4ed8\u30d5\u30a9\u30eb\u30c0\u3078\u4fdd\u5b58\uff06\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u30ea\u30b9\u30c8\u3092Excel\u5f62\u5f0f\u3067\u51fa\u529b"},"content":{"rendered":"<p>\u524d\u56de\u3001\u3010Outlook VBA\u3011\u53d7\u4fe1\u3057\u305f\u30e1\u30fc\u30eb\u306e\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u3092\u6307\u5b9a\u30d5\u30a9\u30eb\u30c0\u3078\u4fdd\u5b58\uff06\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u30ea\u30b9\u30c8\u3092Excel\u5f62\u5f0f\u3067\u51fa\u529b\u3059\u308b\u65b9\u6cd5\u3092\u7d39\u4ecb\u3057\u307e\u3057\u305f\u304c\u3001\u4fdd\u5b58\u5148\u30d5\u30a9\u30eb\u30c0\u3092\u6307\u5b9a\u5148\u306e\u30d1\u30b9\u306b\u3055\u3089\u306b\u65e5\u3054\u3068\u306e\u30d5\u30a9\u30eb\u30c0\u3092\u81ea\u52d5\u4f5c\u6210\u3057\u305d\u3053\u3078\u4fdd\u5b58\u3059\u308b\u65b9\u6cd5\u3092\u7d39\u4ecb\u3057\u307e\u3059\u3002<\/p>\n<blockquote class=\"wp-embedded-content\" data-secret=\"W2vr59SV54\"><p><a href=\"https:\/\/extan.jp\/?p=896\">\u3010Outlook VBA\u3011\u30e1\u30fc\u30eb\u306e\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u3092\u4fdd\u5b58\uff06\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u540d\u4e00\u89a7\u3092\u53d6\u5f97\u3059\u308b\u65b9\u6cd5<\/a><\/p><\/blockquote>\n<p><iframe loading=\"lazy\" class=\"wp-embedded-content\" sandbox=\"allow-scripts\" security=\"restricted\" style=\"position: absolute; visibility: hidden;\" title=\"&#8220;\u3010Outlook VBA\u3011\u30e1\u30fc\u30eb\u306e\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u3092\u4fdd\u5b58\uff06\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u540d\u4e00\u89a7\u3092\u53d6\u5f97\u3059\u308b\u65b9\u6cd5&#8221; &#8212; \u30a8\u30af\u77ed\uff5cExtan.jp\" src=\"https:\/\/extan.jp\/?p=896&#038;embed=true#?secret=ydAPILHbEg#?secret=W2vr59SV54\" data-secret=\"W2vr59SV54\" width=\"600\" height=\"338\" frameborder=\"0\" marginwidth=\"0\" marginheight=\"0\" scrolling=\"no\"><\/iframe><\/p>\n<p><script><\/p>\n<p><\/script><\/p>\n<div id=\"ez-toc-container\" class=\"ez-toc-v2_0_66_1 counter-hierarchy ez-toc-counter ez-toc-light-blue ez-toc-container-direction\">\n<div class=\"ez-toc-title-container\"><p class=\"ez-toc-title\">\u3082\u304f\u3058<\/p>\n<\/div><nav><ul class='ez-toc-list ez-toc-list-level-1 ' ><li class='ez-toc-page-1 ez-toc-heading-level-2'><a class=\"ez-toc-link ez-toc-heading-1\" href=\"https:\/\/extan.jp\/?p=912\/#%E6%B7%BB%E4%BB%98%E3%83%95%E3%82%A1%E3%82%A4%E3%83%AB%E3%82%92%E6%8C%87%E5%AE%9A%E3%81%AE%E3%83%95%E3%82%A9%E3%83%AB%E3%83%80%E3%81%B8%E4%BF%9D%E5%AD%98%E3%81%97%E3%81%9F%E3%81%A8%E3%81%8D%E3%81%AB%E6%B0%97%E3%81%A5%E3%81%84%E3%81%9F%E3%81%93%E3%81%A8\" title=\"\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u3092\u6307\u5b9a\u306e\u30d5\u30a9\u30eb\u30c0\u3078\u4fdd\u5b58\u3057\u305f\u3068\u304d\u306b\u6c17\u3065\u3044\u305f\u3053\u3068\">\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u3092\u6307\u5b9a\u306e\u30d5\u30a9\u30eb\u30c0\u3078\u4fdd\u5b58\u3057\u305f\u3068\u304d\u306b\u6c17\u3065\u3044\u305f\u3053\u3068<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-2'><a class=\"ez-toc-link ez-toc-heading-2\" href=\"https:\/\/extan.jp\/?p=912\/#%E3%83%9E%E3%82%AF%E3%83%AD%E3%82%92%E8%A8%AD%E7%BD%AE%E3%81%99%E3%82%8B%E4%B8%8B%E6%BA%96%E5%82%99%E3%82%92%E3%81%99%E3%82%8B%E3%80%82\" title=\"\u30de\u30af\u30ed\u3092\u8a2d\u7f6e\u3059\u308b\u4e0b\u6e96\u5099\u3092\u3059\u308b\u3002\">\u30de\u30af\u30ed\u3092\u8a2d\u7f6e\u3059\u308b\u4e0b\u6e96\u5099\u3092\u3059\u308b\u3002<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-2'><a class=\"ez-toc-link ez-toc-heading-3\" href=\"https:\/\/extan.jp\/?p=912\/#%E3%83%9E%E3%82%AF%E3%83%AD%E3%82%92%E7%99%BB%E9%8C%B2%E3%81%99%E3%82%8B\" title=\"\u30de\u30af\u30ed\u3092\u767b\u9332\u3059\u308b\">\u30de\u30af\u30ed\u3092\u767b\u9332\u3059\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-2'><a class=\"ez-toc-link ez-toc-heading-4\" href=\"https:\/\/extan.jp\/?p=912\/#%E8%A9%A6%E3%81%97%E3%81%AB%E6%B7%BB%E4%BB%98%E3%83%95%E3%82%A1%E3%82%A4%E3%83%AB%E4%BB%98%E3%81%8D%E3%83%A1%E3%83%BC%E3%83%AB%E3%82%92%E3%83%95%E3%82%A9%E3%83%AB%E3%83%80%E3%81%B8%E6%A0%BC%E7%B4%8D%E3%81%97%E3%81%A6%E5%8B%95%E4%BD%9C%E3%81%97%E3%81%A6%E3%81%BF%E3%82%8B\" title=\"\u8a66\u3057\u306b\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u4ed8\u304d\u30e1\u30fc\u30eb\u3092\u30d5\u30a9\u30eb\u30c0\u3078\u683c\u7d0d\u3057\u3066\u52d5\u4f5c\u3057\u3066\u307f\u308b\">\u8a66\u3057\u306b\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u4ed8\u304d\u30e1\u30fc\u30eb\u3092\u30d5\u30a9\u30eb\u30c0\u3078\u683c\u7d0d\u3057\u3066\u52d5\u4f5c\u3057\u3066\u307f\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-2'><a class=\"ez-toc-link ez-toc-heading-5\" href=\"https:\/\/extan.jp\/?p=912\/#%E3%81%8A%E3%81%BE%E3%81%91_%E6%9C%AC%E6%97%A5%E5%8F%97%E4%BF%A1%E5%88%86%E3%81%AE%E6%B7%BB%E4%BB%98%E3%83%95%E3%82%A1%E3%82%A4%E3%83%AB%E3%81%AB%E7%B5%9E%E3%82%8A%E8%BE%BC%E3%82%93%E3%81%A7%E6%9C%AC%E6%97%A5%E5%88%86%E3%81%AE%E3%83%95%E3%82%A9%E3%83%AB%E3%83%80%E3%81%B8%E5%87%BA%E5%8A%9B%E3%81%99%E3%82%8B\" title=\"\u304a\u307e\u3051:\u672c\u65e5\u53d7\u4fe1\u5206\u306e\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u306b\u7d5e\u308a\u8fbc\u3093\u3067\u672c\u65e5\u5206\u306e\u30d5\u30a9\u30eb\u30c0\u3078\u51fa\u529b\u3059\u308b\">\u304a\u307e\u3051:\u672c\u65e5\u53d7\u4fe1\u5206\u306e\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u306b\u7d5e\u308a\u8fbc\u3093\u3067\u672c\u65e5\u5206\u306e\u30d5\u30a9\u30eb\u30c0\u3078\u51fa\u529b\u3059\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-2'><a class=\"ez-toc-link ez-toc-heading-6\" href=\"https:\/\/extan.jp\/?p=912\/#%E3%81%95%E3%81%84%E3%81%94%E3%81%AB\" title=\"\u3055\u3044\u3054\u306b\">\u3055\u3044\u3054\u306b<\/a><\/li><\/ul><\/nav><\/div>\n<h2><span class=\"ez-toc-section\" id=\"%E6%B7%BB%E4%BB%98%E3%83%95%E3%82%A1%E3%82%A4%E3%83%AB%E3%82%92%E6%8C%87%E5%AE%9A%E3%81%AE%E3%83%95%E3%82%A9%E3%83%AB%E3%83%80%E3%81%B8%E4%BF%9D%E5%AD%98%E3%81%97%E3%81%9F%E3%81%A8%E3%81%8D%E3%81%AB%E6%B0%97%E3%81%A5%E3%81%84%E3%81%9F%E3%81%93%E3%81%A8\"><\/span>\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u3092\u6307\u5b9a\u306e\u30d5\u30a9\u30eb\u30c0\u3078\u4fdd\u5b58\u3057\u305f\u3068\u304d\u306b\u6c17\u3065\u3044\u305f\u3053\u3068<span class=\"ez-toc-section-end\"><\/span><\/h2>\n<p>\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u3092\u6307\u5b9a\u30d5\u30a9\u30eb\u30c0\u3078\u4fdd\u5b58\u3057\u305f\u3068\u304d\u306b\u3001\u3069\u306e\u30e1\u30fc\u30eb\u306e\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u304b\u308f\u304b\u3089\u306a\u304f\u306a\u308a\u307e\u3057\u305f\u3002\u4ef6\u6570\u304c\u591a\u3044\u307b\u3069\u5384\u4ecb\u3067\u3059\u306d\u3002<\/p>\n<p>\u524d\u56de\u306f\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u304b\u3069\u306e\u30e1\u30fc\u30eb\u306e\u3082\u306e\u3067\u3042\u308b\u304b\u308f\u304b\u308b\u30ea\u30b9\u30c8\u3092\u51fa\u529b\u3059\u308b\u6a5f\u80fd\u3092\u8ffd\u52a0\u3057\u307e\u3057\u305f\u304c\u3001\u3055\u3089\u306b\u65e5\u5225\u306b\u30d5\u30a9\u30eb\u30c0\u3092\u4f5c\u6210\u3057\u305d\u3053\u3078\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u3092\u683c\u7d0d\u3059\u308b\u6a5f\u80fd\u3092\u8ffd\u52a0\u3057\u305f\u3044\u3068\u601d\u3044\u307e\u3059\u3002<\/p>\n<p>\u5b8c\u6210\u3057\u305f\u30de\u30af\u30ed\u306f\u4ee5\u4e0b\u306e\u901a\u308a\u3067\u3059\u3002<\/p>\n<p><script><\/p>\n<p><\/script><\/p>\n<h2><span class=\"ez-toc-section\" id=\"%E3%83%9E%E3%82%AF%E3%83%AD%E3%82%92%E8%A8%AD%E7%BD%AE%E3%81%99%E3%82%8B%E4%B8%8B%E6%BA%96%E5%82%99%E3%82%92%E3%81%99%E3%82%8B%E3%80%82\"><\/span>\u30de\u30af\u30ed\u3092\u8a2d\u7f6e\u3059\u308b\u4e0b\u6e96\u5099\u3092\u3059\u308b\u3002<span class=\"ez-toc-section-end\"><\/span><\/h2>\n<p>\u4ee5\u4e0b\u3092\u53c2\u8003\u306bVBA\u30b3\u30fc\u30c9\u3092\u914d\u7f6e\u3059\u308b\u5834\u6240\u3092\u8868\u793a\u3055\u305b\u307e\u3059\u3002<\/p>\n<blockquote class=\"wp-embedded-content\" data-secret=\"1xM9PmjiX8\"><p><a href=\"https:\/\/extan.jp\/?p=421\">Outlook VBA\u3092\u306f\u3058\u3081\u3088\u3046\uff01\u521d\u5fc3\u8005\u5411\u3051\u624b\u5f15\u304d<\/a><\/p><\/blockquote>\n<p><iframe loading=\"lazy\" class=\"wp-embedded-content\" sandbox=\"allow-scripts\" security=\"restricted\" style=\"position: absolute; visibility: hidden;\" title=\"&#8220;Outlook VBA\u3092\u306f\u3058\u3081\u3088\u3046\uff01\u521d\u5fc3\u8005\u5411\u3051\u624b\u5f15\u304d&#8221; &#8212; \u30a8\u30af\u77ed\uff5cExtan.jp\" src=\"https:\/\/extan.jp\/?p=421&#038;embed=true#?secret=lLDkOFTcEh#?secret=1xM9PmjiX8\" data-secret=\"1xM9PmjiX8\" width=\"600\" height=\"338\" frameborder=\"0\" marginwidth=\"0\" marginheight=\"0\" scrolling=\"no\"><\/iframe><\/p>\n<p>\u4eca\u56deExcel\u306e\u6a5f\u80fd\u3092\u4f7f\u3044\u307e\u3059\u306e\u3067\u3001\u53c2\u7167\u8a2d\u5b9a\u304b\u3089Excel Object\u3092\u6307\u5b9a\u3057\u6709\u52b9\u5316\u3057\u307e\u3059\u3002<br \/>\n[\u958b\u767a]\u30bf\u30d6\u3092\u30af\u30ea\u30c3\u30af\u3057\u3001\u300cVisual Basic\u300d\u30dc\u30bf\u30f3\u3092\u30af\u30ea\u30c3\u30af\u3057\u307e\u3059\u3002<br \/>\n[\u30c4\u30fc\u30eb(T)]\u30e1\u30cb\u30e5\u30fc\uff1e[\u53c2\u7167\u8a2d\u5b9a(R)]\u3067\u300cMicrosoft Excel XX.X Object Library\u300d\u306b\u30c1\u30a7\u30c3\u30af\u3092\u5165\u308c\u307e\u3059\u3002<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-890\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2019\/06\/062519_1419_1.png\" alt=\"\" width=\"447\" height=\"323\" \/><\/p>\n<p>\u3053\u306e\u8a2d\u5b9a\u304c\u7d42\u3048\u305f\u3089\u4e00\u5ea6Outlook\u3092\u518d\u8d77\u52d5\u3055\u305b\u3066\u304f\u3060\u3055\u3044\u3002<\/p>\n<p><script><\/p>\n<p><\/script><\/p>\n<h2><span class=\"ez-toc-section\" id=\"%E3%83%9E%E3%82%AF%E3%83%AD%E3%82%92%E7%99%BB%E9%8C%B2%E3%81%99%E3%82%8B\"><\/span>\u30de\u30af\u30ed\u3092\u767b\u9332\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h2>\n<p>\u300c\u958b\u767a\u300d\u30bf\u30d6&gt;\u300cVisual Basic\u300d\u3092\u62bc\u3057\u307e\u3059\u3002<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-1181\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2019\/07\/070919_1543_temp1.png\" alt=\"\" width=\"394\" height=\"143\" \/><\/p>\n<p>\u300cVisual Basic Editor\u300d\u306b\u3066\u3001[Project1] &gt; [Microsoft Outlook Objects] &gt; [ThisOutlookSession] \u3092\u958b\u304d\u307e\u3059\u3002<br \/>\n<img decoding=\"async\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2019\/01\/012519_1556_Outlook2.png\" alt=\"\" \/><\/p>\n<p>\u53f3\u306e\u30b3\u30fc\u30c9\u30a8\u30ea\u30a2\u3078\u3001\u4ee5\u4e0b\u306e\u30b3\u30fc\u30c9\u3092\u8cbc\u308a\u4ed8\u3051\u3066\u4fdd\u5b58\u3057\u307e\u3059\u3002<\/p>\n<pre style=\"padding: 0;\"><code class=\"language-visual-basic line-numbers\">Sub \u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u3092\u4fdd\u5b58\u304b\u3064\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u30ea\u30b9\u30c8\u3092Excel\u3078\u51fa\u529b()\n\n    Dim objInbox As Object\n    Dim objFolder As Object\n    Dim strPath As String\n    Dim i As Long\n    \n    &#039;\u65e5\u4ed8\u7528\u5b9a\u7fa9\n    Dim strDay As String\n    \n    &#039;\u30d5\u30a9\u30eb\u30c0\u540d\u3092yyyymmdd\u5f62\u5f0f\u3067\u5165\u529b\n    strDay = Format(Date, &quot;yyyymmdd&quot;)\n    strDay = strDay &amp; &quot;\\&quot;\n    \n    &#039;Excel\u7528\u5b9a\u7fa9\n    Dim myExcel As Excel.Application\n    Dim objBook As Excel.Workbook\n    Dim objSheet As Excel.worksheet\n    Dim n As Long\n    \n    &#039;Excel\u30aa\u30d6\u30b8\u30a7\u30af\u30c8\u751f\u6210\u3001\u30d6\u30c3\u30af\u306e\u8ffd\u52a0\n    Set myExcel = CreateObject(&quot;Excel.Application&quot;)\n    Set objBook = myExcel.Workbooks.Add()\n    Set objSheet = objBook.sheets(1)\n\n    &#039;\u9805\u76ee\u76ee\u3092\u8ffd\u52a0\n    objSheet.Cells(1, 1) = &quot;ID&quot;\n    objSheet.Cells(1, 2) = &quot;\u4ef6\u540d&quot;\n    objSheet.Cells(1, 3) = &quot;\u9001\u4fe1\u8005&quot;\n    objSheet.Cells(1, 4) = &quot;\u53d7\u4fe1\u65e5\u6642&quot;\n    objSheet.Cells(1, 5) = &quot;\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb&quot;\n    objSheet.Cells(1, 6) = &quot;\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u306e\u30d1\u30b9&quot;\n    \n    &#039;\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u30ea\u30b9\u30c8\u3092\u66f8\u304d\u8fbc\u3080\u884c\u306e\u4f4d\u7f6e\n    n = 2\n    \n     \n    Set objInbox = GetNamespace(&quot;MAPI&quot;).GetDefaultFolder(olFolderInbox)\n    \n    &#039;\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u304c\u3042\u308b\u30e1\u30fc\u30eb\u306e\u30d5\u30a9\u30eb\u30c0\u3092\u6307\u5b9a\u3057\u307e\u3059\u30022\u968e\u5c64\u4ee5\u4e0a\u3042\u308b\u5834\u5408\u306f\u300c.Folders.Item(\uff1c\u30d5\u30a9\u30eb\u30c0\u540d\uff1e)\u300d\u3092\u8ffd\u52a0\u3057\u3066\u304f\u3060\u3055\u3044\u3002\n    Set objFolder = objInbox.Folders.Item(&quot;1.\u30b5\u30d6\u30d5\u30a9\u30eb\u30c0&quot;).Folders.Item(&quot;1-1.\u30b5\u30d6\u30d5\u30a9\u30eb\u30c0&quot;)\n    \n    &#039;\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u306e\u4fdd\u5b58\u5148\u3092\u30d1\u30b9\u3067\u6307\u5b9a\u3057\u307e\u3059\u3002\u203b\u65e5\u4ed8\u30d5\u30a9\u30eb\u30c0\u8ffd\u52a0\n    strPath = &quot;D:\\test\\outlook_temp\\&quot; &amp; strDay\n    \n    &#039;\u65e5\u4ed8\u30d5\u30a9\u30eb\u30c0\u304c\u306a\u3051\u308c\u3070\u4f5c\u6210\n    If Dir(strPath, vbDirectory) = &quot;&quot; Then\n        MkDir strPath\n    End If\n    \n    For Each objitem In objFolder.Items\n        For i = 1 To objitem.Attachments.Count\n            &#039;\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u306b\u62e1\u5f35\u5b50\u304c\u3042\u308b\u5834\u5408\u306e\u307f\u51e6\u7406\u3057\u307e\u3059\u3002\n            If InStr(objitem.Attachments.Item(i), &quot;.&quot;) &lt;&gt; 0 Then\n            \n                objitem.Attachments.Item(i).SaveAsFile strPath &amp; objitem.Attachments.Item(i)\n                \n               &#039;Excel\u3078\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u60c5\u5831\u3092\u8ffd\u52a0\n                objSheet.Cells(n, 1) = n - 1\n                objSheet.Cells(n, 2) = objitem.ConversationTopic &#039;\u4ef6\u540d\n                objSheet.Cells(n, 3) = objitem.SenderName &#039;\u9001\u4fe1\u8005\n                objSheet.Cells(n, 4) = objitem.ReceivedTime &#039;\u53d7\u4fe1\u65e5\u6642\n                objSheet.Cells(n, 5) = objitem.Attachments.Item(i) &#039;\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\n                objSheet.Cells(n, 6) = strPath &amp; objitem.Attachments.Item(i)   &#039;\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u306e\u30d1\u30b9&quot;\n                n = n + 1\n            End If\n        Next i\n    Next objitem\n \n    &#039;\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u4fdd\u5b58\u5834\u6240\u3078Excel\u3092\u4fdd\u5b58\u3000\u203b\u30d5\u30a1\u30a4\u30eb\u540d\u306f\u9069\u5f53\u306a\u540d\u524d\u306b\u5909\u3048\u3066\u304f\u3060\u3055\u3044\u3002\n    objBook.SaveAs strPath &amp; &quot;\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u30ea\u30b9\u30c8.xlsx&quot;\n    \n    &#039;Excel\u30d6\u30c3\u30af\u3092\u9589\u3058\u307e\u3059\u3002\n    objBook.Close SaveChanges:=False\n    \n    Set objitem = Nothing\n    Set objInbox = Nothing\n    Set objFolder = Nothing\n    Set objSheet = Nothing\n    Set objitem = Nothing\n\nEnd Sub<\/code><\/pre>\n<p><script><\/p>\n<p><\/script><\/p>\n<h2><span class=\"ez-toc-section\" id=\"%E8%A9%A6%E3%81%97%E3%81%AB%E6%B7%BB%E4%BB%98%E3%83%95%E3%82%A1%E3%82%A4%E3%83%AB%E4%BB%98%E3%81%8D%E3%83%A1%E3%83%BC%E3%83%AB%E3%82%92%E3%83%95%E3%82%A9%E3%83%AB%E3%83%80%E3%81%B8%E6%A0%BC%E7%B4%8D%E3%81%97%E3%81%A6%E5%8B%95%E4%BD%9C%E3%81%97%E3%81%A6%E3%81%BF%E3%82%8B\"><\/span>\u8a66\u3057\u306b\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u4ed8\u304d\u30e1\u30fc\u30eb\u3092\u30d5\u30a9\u30eb\u30c0\u3078\u683c\u7d0d\u3057\u3066\u52d5\u4f5c\u3057\u3066\u307f\u308b<span class=\"ez-toc-section-end\"><\/span><\/h2>\n<p>\u65e9\u901f\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u3068Excel\u306e\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u30ea\u30b9\u30c8\u304c\u81ea\u52d5\u751f\u6210\u3055\u308c\u305f\u65e5\u4ed8\u30d5\u30a9\u30eb\u30c0\u3078\u4fdd\u5b58\u3055\u308c\u308b\u304b\u78ba\u8a8d\u3092\u3057\u3066\u307f\u307e\u3057\u3087\u3046\u3002<\/p>\n<p>\u6dfb\u4ed8\u4ed8\u304d\u30e1\u30fc\u30eb\u3092\u4e8c\u968e\u5c64\u76ee\u306e\u300c1-1.\u30b5\u30d6\u30d5\u30a9\u30eb\u30c0\u300d\u3078\u79fb\u52d5\u3057\u307e\u3059\u3002<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-872\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2019\/06\/062419_1531_1.png\" alt=\"\" width=\"203\" height=\"114\" \/><\/p>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-873\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2019\/06\/062419_1531_2.png\" alt=\"\" width=\"871\" height=\"266\" \/>\n<p>\u30bd\u30fc\u30b9\u30b3\u30fc\u30c9\u3092\u7de8\u96c6\u3057\u307e\u3059\u3002<br \/>\n\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u304c\u3042\u308b\u30e1\u30fc\u30eb\u306e\u30d5\u30a9\u30eb\u30c0\u3092\u6307\u5b9a\u3057\u307e\u3059\u30022\u968e\u5c64\u4ee5\u4e0a\u3042\u308b\u5834\u5408\u306f\u300c.Folders.Item(\uff1c\u30d5\u30a9\u30eb\u30c0\u540d\uff1e)\u300d\u3092\u8ffd\u52a0\u3057\u3066\u304f\u3060\u3055\u3044\u3002<br \/>\nSet objFolder = objInbox.Folders.Item(&#8220;1.\u30b5\u30d6\u30d5\u30a9\u30eb\u30c0&#8221;).Folders.Item(&#8220;1-1.\u30b5\u30d6\u30d5\u30a9\u30eb\u30c0&#8221;)<\/p>\n<p>\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u3068Excel\u306e\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u30ea\u30b9\u30c8\u306e\u4fdd\u5b58\u5148\u3068\u306a\u308b\u30d5\u30a9\u30eb\u30c0\u306e\u30d1\u30b9\u3092\u4ee5\u4e0b\u30bd\u30fc\u30b9\u30b3\u30fc\u30c9\u306e&#8221;&#8221;\u5185\u306b\u6307\u5b9a\u3057\u307e\u3059\u3002<br \/>\nstrPath = &#8220;C:\\Users\\extan\\Documents\\outlook_temp\\&#8221; &amp; strDay<\/p>\n<p>\u6b21\u306boutlook\u672c\u4f53\u306b\u623b\u308a\u300c\u958b\u767a\u300d\u30bf\u30d6\u306e\u300c\u30de\u30af\u30ed\u300d\uff1e\u300c\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u3092\u4fdd\u5b58\u304b\u3064\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u30ea\u30b9\u30c8\u3092Excel\u3078\u51fa\u529b\u300d\u3092\u62bc\u4e0b\u3057\u307e\u3059\u3002<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-898\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2019\/06\/062519_1440_temp1.png\" alt=\"\" width=\"546\" height=\"159\" \/><\/p>\n<p>\u306f\u3044\uff01\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u3068Excel\u306e\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u30ea\u30b9\u30c8\u304c\u6307\u5b9a\u30d5\u30a9\u30eb\u30c0\u3078\u4fdd\u5b58\u3055\u308c\u307e\u3057\u305f\u306d\u3002<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-915\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2019\/06\/062719_1340_temp1.png\" alt=\"\" width=\"386\" height=\"143\" \/><br \/>\n\u2193<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-916\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2019\/06\/062719_1340_temp2.png\" alt=\"\" width=\"377\" height=\"208\" \/><\/p>\n<p>\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u306e\u30d1\u30b9\u306f\u65e5\u4ed8\u30d5\u30a9\u30eb\u30c0\u4ed8\u304d\u306b\u306a\u3063\u3066\u3044\u307e\u3059\u306d\u3002<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-920\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2019\/06\/062719_1348_temp1.png\" alt=\"\" width=\"1366\" height=\"154\" \/><\/p>\n<h2><span class=\"ez-toc-section\" id=\"%E3%81%8A%E3%81%BE%E3%81%91_%E6%9C%AC%E6%97%A5%E5%8F%97%E4%BF%A1%E5%88%86%E3%81%AE%E6%B7%BB%E4%BB%98%E3%83%95%E3%82%A1%E3%82%A4%E3%83%AB%E3%81%AB%E7%B5%9E%E3%82%8A%E8%BE%BC%E3%82%93%E3%81%A7%E6%9C%AC%E6%97%A5%E5%88%86%E3%81%AE%E3%83%95%E3%82%A9%E3%83%AB%E3%83%80%E3%81%B8%E5%87%BA%E5%8A%9B%E3%81%99%E3%82%8B\"><\/span>\u304a\u307e\u3051:\u672c\u65e5\u53d7\u4fe1\u5206\u306e\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u306b\u7d5e\u308a\u8fbc\u3093\u3067\u672c\u65e5\u5206\u306e\u30d5\u30a9\u30eb\u30c0\u3078\u51fa\u529b\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h2>\n<p>\u5f53\u65e5\u5206\u306e\u30d5\u30a9\u30eb\u30c0\u306b\u3057\u305f\u308f\u3051\u3067\u3059\u304b\u3089\u3001\u5f53\u65e5\u53d7\u4fe1\u5206\u306e\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u306b\u7d5e\u308a\u8fbc\u3093\u3067\u672c\u65e5\u5206\u306e\u30d5\u30a9\u30eb\u30c0\u3078\u51fa\u529b\u3057\u305f\u3044\u3068\u601d\u3044\u307e\u3057\u305f\u3002<br \/>\n\u30b3\u30fc\u30c9\u306f\u4ee5\u4e0b\u3068\u306a\u308a\u307e\u3059\u3002<\/p>\n<pre style=\"padding: 0;\"><code class=\"language-visual-basic line-numbers\">Sub \u5f53\u65e5\u53d7\u4fe1\u306e\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u3092\u4fdd\u5b58\u304b\u3064\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u30ea\u30b9\u30c8\u3092Excel\u3078\u51fa\u529b()\n\n    Dim objInbox As Object\n    Dim objFolder As Object\n    Dim strPath As String\n    Dim i As Long\n    \n    &#039;\u65e5\u4ed8\u7528\u5b9a\u7fa9\n    Dim strDaytemp As String\n    Dim strDay As String\n    Dim strReceivetime As String\n    \n    \n    &#039;\u30d5\u30a9\u30eb\u30c0\u540d\u3092yyyymmdd\u5f62\u5f0f\u3067\u5165\u529b\n    strDaytemp = Format(Date, &quot;yyyymmdd&quot;)\n    strDay = strDaytemp &amp; &quot;\\&quot;\n    \n    &#039;Excel\u7528\u5b9a\u7fa9\n    Dim myExcel As Excel.Application\n    Dim objBook As Excel.Workbook\n    Dim objSheet As Excel.worksheet\n    Dim n As Long\n    \n    &#039;Excel\u30aa\u30d6\u30b8\u30a7\u30af\u30c8\u751f\u6210\u3001\u30d6\u30c3\u30af\u306e\u8ffd\u52a0\n    Set myExcel = CreateObject(&quot;Excel.Application&quot;)\n    Set objBook = myExcel.Workbooks.Add()\n    Set objSheet = objBook.sheets(1)\n\n    &#039;\u9805\u76ee\u76ee\u3092\u8ffd\u52a0\n    objSheet.Cells(1, 1) = &quot;ID&quot;\n    objSheet.Cells(1, 2) = &quot;\u4ef6\u540d&quot;\n    objSheet.Cells(1, 3) = &quot;\u9001\u4fe1\u8005&quot;\n    objSheet.Cells(1, 4) = &quot;\u53d7\u4fe1\u65e5\u6642&quot;\n    objSheet.Cells(1, 5) = &quot;\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb&quot;\n    objSheet.Cells(1, 6) = &quot;\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u306e\u30d1\u30b9&quot;\n    \n    &#039;\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u30ea\u30b9\u30c8\u3092\u66f8\u304d\u8fbc\u3080\u884c\u306e\u4f4d\u7f6e\n    n = 2\n    \n     \n    Set objInbox = GetNamespace(&quot;MAPI&quot;).GetDefaultFolder(olFolderInbox)\n    \n    &#039;\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u304c\u3042\u308b\u30e1\u30fc\u30eb\u306e\u30d5\u30a9\u30eb\u30c0\u3092\u6307\u5b9a\u3057\u307e\u3059\u30022\u968e\u5c64\u4ee5\u4e0a\u3042\u308b\u5834\u5408\u306f\u300c.Folders.Item(\uff1c\u30d5\u30a9\u30eb\u30c0\u540d\uff1e)\u300d\u3092\u8ffd\u52a0\u3057\u3066\u304f\u3060\u3055\u3044\u3002\n    Set objFolder = objInbox.Folders.Item(&quot;1.\u30b5\u30d6\u30d5\u30a9\u30eb\u30c0&quot;).Folders.Item(&quot;1-1.\u30b5\u30d6\u30d5\u30a9\u30eb\u30c0&quot;)\n    \n    &#039;\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u306e\u4fdd\u5b58\u5148\u3092\u30d1\u30b9\u3067\u6307\u5b9a\u3057\u307e\u3059\u3002\u203b\u65e5\u4ed8\u30d5\u30a9\u30eb\u30c0\u8ffd\u52a0\n    strPath = &quot;D:\\test\\outlook_temp\\&quot; &amp; strDay\n    \n    &#039;\u65e5\u4ed8\u30d5\u30a9\u30eb\u30c0\u304c\u306a\u3051\u308c\u3070\u4f5c\u6210\n    If Dir(strPath, vbDirectory) = &quot;&quot; Then\n        MkDir strPath\n    End If\n    \n    For Each objItem In objFolder.Items\n        For i = 1 To objItem.Attachments.Count\n            strReceivetime = Format(objItem.ReceivedTime, &quot;yyyymmdd&quot;)\n            \n            &#039;\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u306b\u62e1\u5f35\u5b50\u304c\u3042\u308a\u3001\u5f53\u65e5\u53d7\u4fe1\u3057\u305f\u30a2\u30a4\u30c6\u30e0\u306e\u307f\u51e6\u7406\u3057\u307e\u3059\u3002\n            If InStr(objItem.Attachments.Item(i), &quot;.&quot;) &lt;&gt; 0 Then\n                If strReceivetime = strDaytemp Then\n                    objItem.Attachments.Item(i).SaveAsFile strPath &amp; objItem.Attachments.Item(i)\n                    \n                    &#039;Excel\u3078\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u60c5\u5831\u3092\u8ffd\u52a0\n                    objSheet.Cells(n, 1) = n - 1\n                    objSheet.Cells(n, 2) = objItem.ConversationTopic &#039;\u4ef6\u540d\n                    objSheet.Cells(n, 3) = objItem.SenderName &#039;\u9001\u4fe1\u8005\n                    objSheet.Cells(n, 4) = objItem.ReceivedTime &#039;\u53d7\u4fe1\u65e5\u6642\n                    objSheet.Cells(n, 5) = objItem.Attachments.Item(i) &#039;\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\n                    objSheet.Cells(n, 6) = strPath &amp; objItem.Attachments.Item(i) &#039;\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u306e\u30d1\u30b9&quot;\n                n = n + 1\n                End If\n            End If\n        Next i\n    Next objItem\n \n    &#039;\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u4fdd\u5b58\u5834\u6240\u3078Excel\u3092\u4fdd\u5b58\u3000\u203b\u30d5\u30a1\u30a4\u30eb\u540d\u306f\u9069\u5f53\u306a\u540d\u524d\u306b\u5909\u3048\u3066\u304f\u3060\u3055\u3044\u3002\n    objBook.SaveAs strPath &amp; &quot;\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u30ea\u30b9\u30c8.xlsx&quot;\n    \n \n    Set objItem = Nothing\n    Set objInbox = Nothing\n    Set objFolder = Nothing\n    Set objSheet = Nothing\n    &#039;\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u30ea\u30b9\u30c8\u30af\u30ed\u30fc\u30ba\n    objBook.Close\n    Set objBook = Nothing\n\nEnd Sub<\/code><\/pre>\n<p>\u3053\u308c\u3067\u672c\u65e5\u53d7\u4fe1\u5206\u9650\u5b9a\u3067\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u304c\u51fa\u529b\u3055\u308c\u305f\u304b\u3068\u601d\u3044\u307e\u3059\u3002<br \/>\n\u306a\u304a\u6642\u523b\u306f\u3001PC\u306e\u30bf\u30a4\u30e0\u30be\u30fc\u30f3\u306b\u4f9d\u5b58\u3059\u308b\u305f\u3081\u3001\u30bf\u30a4\u30e0\u30be\u30fc\u30f3\u8a2d\u5b9a\u3092\u5909\u3048\u308b\u5834\u5408\u306f\u96c6\u8a08\u7d50\u679c\u304c\u7570\u306a\u308a\u307e\u3059\u306e\u3067\u3054\u6ce8\u610f\u304f\u3060\u3055\u3044\u3002<\/p>\n<p><script><\/p>\n<p><\/script><\/p>\n<h2><span class=\"ez-toc-section\" id=\"%E3%81%95%E3%81%84%E3%81%94%E3%81%AB\"><\/span>\u3055\u3044\u3054\u306b<span class=\"ez-toc-section-end\"><\/span><\/h2>\n<p>\u3044\u304b\u304c\u3067\u3057\u3087\u3046\u304b\u3002\u3053\u308c\u307e\u3067\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u306e\u4fdd\u5b58\u306e\u4ed5\u65b9\u3068\u3057\u3066\u3054\u7d39\u4ecb\u3057\u307e\u3057\u305f\u304c\u3001\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u4ee5\u5916\u306b\u3082\u30e1\u30fc\u30eb\u305d\u306e\u3082\u306e\u3084\u30ab\u30ec\u30f3\u30c0\u30fc\u3001\u9023\u7d61\u8868\u306a\u3069\u5225\u306e\u30a2\u30a4\u30c6\u30e0\u3067\u3082\u51fa\u529b\u51e6\u7406\u304c\u53ef\u80fd\u3067\u3059\u3002<\/p>\n<p>\u6b21\u56de\u3082\u3044\u308d\u3044\u308d\u306a\u4f7f\u3044\u65b9\u3092\u3068\u308a\u3042\u3052\u3066\u3044\u304d\u305f\u3044\u3068\u601d\u3044\u307e\u3059\uff01<\/p>\n<p><script><\/p>\n<p><\/script><\/p>\n<blockquote class=\"wp-embedded-content\" data-secret=\"FRhhh0Ksgc\"><p><a href=\"https:\/\/extan.jp\/?p=866\">\u3010Outlook VBA\u3011\u53d7\u4fe1\u3057\u305f\u30e1\u30fc\u30eb\u306e\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u3092\u6307\u5b9a\u30d5\u30a9\u30eb\u30c0\u3078\u4fdd\u5b58\u3059\u308b<\/a><\/p><\/blockquote>\n<p><iframe loading=\"lazy\" class=\"wp-embedded-content\" sandbox=\"allow-scripts\" security=\"restricted\" style=\"position: absolute; visibility: hidden;\" title=\"&#8220;\u3010Outlook VBA\u3011\u53d7\u4fe1\u3057\u305f\u30e1\u30fc\u30eb\u306e\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u3092\u6307\u5b9a\u30d5\u30a9\u30eb\u30c0\u3078\u4fdd\u5b58\u3059\u308b&#8221; &#8212; \u30a8\u30af\u77ed\uff5cExtan.jp\" src=\"https:\/\/extan.jp\/?p=866&#038;embed=true#?secret=1PK5S4CFKg#?secret=FRhhh0Ksgc\" data-secret=\"FRhhh0Ksgc\" width=\"600\" height=\"338\" frameborder=\"0\" marginwidth=\"0\" marginheight=\"0\" scrolling=\"no\"><\/iframe><\/p>\n<blockquote class=\"wp-embedded-content\" data-secret=\"W2vr59SV54\"><p><a href=\"https:\/\/extan.jp\/?p=896\">\u3010Outlook VBA\u3011\u30e1\u30fc\u30eb\u306e\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u3092\u4fdd\u5b58\uff06\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u540d\u4e00\u89a7\u3092\u53d6\u5f97\u3059\u308b\u65b9\u6cd5<\/a><\/p><\/blockquote>\n<p><iframe loading=\"lazy\" class=\"wp-embedded-content\" sandbox=\"allow-scripts\" security=\"restricted\" style=\"position: absolute; visibility: hidden;\" title=\"&#8220;\u3010Outlook VBA\u3011\u30e1\u30fc\u30eb\u306e\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u3092\u4fdd\u5b58\uff06\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u540d\u4e00\u89a7\u3092\u53d6\u5f97\u3059\u308b\u65b9\u6cd5&#8221; &#8212; \u30a8\u30af\u77ed\uff5cExtan.jp\" src=\"https:\/\/extan.jp\/?p=896&#038;embed=true#?secret=ydAPILHbEg#?secret=W2vr59SV54\" data-secret=\"W2vr59SV54\" width=\"600\" height=\"338\" frameborder=\"0\" marginwidth=\"0\" marginheight=\"0\" scrolling=\"no\"><\/iframe><\/p>\n","protected":false},"excerpt":{"rendered":"<p>\u524d\u56de\u3001\u3010Outlook VBA\u3011\u53d7\u4fe1\u3057\u305f\u30e1\u30fc\u30eb\u306e\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u3092\u6307\u5b9a\u30d5\u30a9\u30eb\u30c0\u3078\u4fdd\u5b58\uff06\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u30ea\u30b9\u30c8\u3092Excel\u5f62\u5f0f\u3067\u51fa\u529b\u3059\u308b\u65b9\u6cd5\u3092\u7d39\u4ecb\u3057\u307e\u3057\u305f\u304c\u3001\u4fdd\u5b58\u5148\u30d5\u30a9\u30eb\u30c0\u3092\u6307\u5b9a\u5148\u306e\u30d1\u30b9\u306b\u3055\u3089\u306b\u65e5\u3054\u3068\u306e\u30d5\u30a9\u30eb\u30c0\u3092\u81ea\u52d5\u4f5c\u6210\u3057\u305d\u3053\u3078\u4fdd&#8230;<\/p>\n","protected":false},"author":1,"featured_media":917,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[7],"tags":[43],"class_list":{"0":"post-912","1":"post","2":"type-post","3":"status-publish","4":"format-standard","5":"has-post-thumbnail","7":"category-exceloutlook","8":"tag-43","9":"article cf"},"yoast_head":"<!-- This site is optimized with the Yoast SEO plugin v18.1 - https:\/\/yoast.com\/wordpress\/plugins\/seo\/ -->\n<meta name=\"robots\" content=\"index, follow, max-snippet:-1, max-image-preview:large, max-video-preview:-1\" \/>\n<link rel=\"canonical\" href=\"https:\/\/extan.jp\/?p=912\" \/>\n<meta property=\"og:locale\" content=\"ja_JP\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"\u3010Outlook VBA\u3011\u53d7\u4fe1\u3057\u305f\u30e1\u30fc\u30eb\u306e\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u3092\u81ea\u52d5\u4f5c\u6210\u3057\u305f\u65e5\u4ed8\u30d5\u30a9\u30eb\u30c0\u3078\u4fdd\u5b58\uff06\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u30ea\u30b9\u30c8\u3092Excel\u5f62\u5f0f\u3067\u51fa\u529b - \u30a8\u30af\u77ed\uff5cExtan.jp\" \/>\n<meta property=\"og:description\" content=\"\u524d\u56de\u3001\u3010Outlook VBA\u3011\u53d7\u4fe1\u3057\u305f\u30e1\u30fc\u30eb\u306e\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u3092\u6307\u5b9a\u30d5\u30a9\u30eb\u30c0\u3078\u4fdd\u5b58\uff06\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u30ea\u30b9\u30c8\u3092Excel\u5f62\u5f0f\u3067\u51fa\u529b\u3059\u308b\u65b9\u6cd5\u3092\u7d39\u4ecb\u3057\u307e\u3057\u305f\u304c\u3001\u4fdd\u5b58\u5148\u30d5\u30a9\u30eb\u30c0\u3092\u6307\u5b9a\u5148\u306e\u30d1\u30b9\u306b\u3055\u3089\u306b\u65e5\u3054\u3068\u306e\u30d5\u30a9\u30eb\u30c0\u3092\u81ea\u52d5\u4f5c\u6210\u3057\u305d\u3053\u3078\u4fdd...\" \/>\n<meta property=\"og:url\" content=\"https:\/\/extan.jp\/?p=912\" \/>\n<meta property=\"og:site_name\" content=\"\u30a8\u30af\u77ed\uff5cExtan.jp\" \/>\n<meta property=\"article:published_time\" content=\"2020-05-20T13:52:11+00:00\" \/>\n<meta property=\"article:modified_time\" content=\"2021-09-17T09:54:28+00:00\" \/>\n<meta property=\"og:image\" content=\"https:\/\/extan.jp\/wp-content\/uploads\/2019\/06\/062719_1340_temp3.png\" \/>\n\t<meta property=\"og:image:width\" content=\"778\" \/>\n\t<meta property=\"og:image:height\" content=\"402\" \/>\n\t<meta property=\"og:image:type\" content=\"image\/png\" \/>\n<meta name=\"twitter:card\" content=\"summary_large_image\" \/>\n<meta name=\"twitter:label1\" content=\"\u57f7\u7b46\u8005\" \/>\n\t<meta name=\"twitter:data1\" content=\"\u30bf\u30ab\u30d2\u30ed@extan\" \/>\n\t<meta name=\"twitter:label2\" content=\"\u63a8\u5b9a\u8aad\u307f\u53d6\u308a\u6642\u9593\" \/>\n\t<meta name=\"twitter:data2\" content=\"3\u5206\" \/>\n<script type=\"application\/ld+json\" class=\"yoast-schema-graph\">{\"@context\":\"https:\/\/schema.org\",\"@graph\":[{\"@type\":\"WebSite\",\"@id\":\"https:\/\/extan.jp\/#website\",\"url\":\"https:\/\/extan.jp\/\",\"name\":\"\u30a8\u30af\u77ed\uff5cExtan.jp\",\"description\":\"\u50cd\u304f\u4eba\u306e\u81ea\u7531\u6642\u9593\u3092\u3064\u304f\u308b\",\"potentialAction\":[{\"@type\":\"SearchAction\",\"target\":{\"@type\":\"EntryPoint\",\"urlTemplate\":\"https:\/\/extan.jp\/?s={search_term_string}\"},\"query-input\":\"required name=search_term_string\"}],\"inLanguage\":\"ja\"},{\"@type\":\"ImageObject\",\"@id\":\"https:\/\/extan.jp\/?p=912#primaryimage\",\"inLanguage\":\"ja\",\"url\":\"https:\/\/extan.jp\/wp-content\/uploads\/2019\/06\/062719_1340_temp3.png\",\"contentUrl\":\"https:\/\/extan.jp\/wp-content\/uploads\/2019\/06\/062719_1340_temp3.png\",\"width\":778,\"height\":402},{\"@type\":\"WebPage\",\"@id\":\"https:\/\/extan.jp\/?p=912#webpage\",\"url\":\"https:\/\/extan.jp\/?p=912\",\"name\":\"\u3010Outlook VBA\u3011\u53d7\u4fe1\u3057\u305f\u30e1\u30fc\u30eb\u306e\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u3092\u81ea\u52d5\u4f5c\u6210\u3057\u305f\u65e5\u4ed8\u30d5\u30a9\u30eb\u30c0\u3078\u4fdd\u5b58\uff06\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u30ea\u30b9\u30c8\u3092Excel\u5f62\u5f0f\u3067\u51fa\u529b - \u30a8\u30af\u77ed\uff5cExtan.jp\",\"isPartOf\":{\"@id\":\"https:\/\/extan.jp\/#website\"},\"primaryImageOfPage\":{\"@id\":\"https:\/\/extan.jp\/?p=912#primaryimage\"},\"datePublished\":\"2020-05-20T13:52:11+00:00\",\"dateModified\":\"2021-09-17T09:54:28+00:00\",\"author\":{\"@id\":\"https:\/\/extan.jp\/#\/schema\/person\/ccb8849fcf749d5f74439b1af7d4df1a\"},\"breadcrumb\":{\"@id\":\"https:\/\/extan.jp\/?p=912#breadcrumb\"},\"inLanguage\":\"ja\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\/\/extan.jp\/?p=912\"]}]},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\/\/extan.jp\/?p=912#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"\u30db\u30fc\u30e0\",\"item\":\"https:\/\/extan.jp\/\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"\u3010Outlook VBA\u3011\u53d7\u4fe1\u3057\u305f\u30e1\u30fc\u30eb\u306e\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u3092\u81ea\u52d5\u4f5c\u6210\u3057\u305f\u65e5\u4ed8\u30d5\u30a9\u30eb\u30c0\u3078\u4fdd\u5b58\uff06\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u30ea\u30b9\u30c8\u3092Excel\u5f62\u5f0f\u3067\u51fa\u529b\"}]},{\"@type\":\"Person\",\"@id\":\"https:\/\/extan.jp\/#\/schema\/person\/ccb8849fcf749d5f74439b1af7d4df1a\",\"name\":\"\u30bf\u30ab\u30d2\u30ed@extan\",\"image\":{\"@type\":\"ImageObject\",\"@id\":\"https:\/\/extan.jp\/#personlogo\",\"inLanguage\":\"ja\",\"url\":\"https:\/\/secure.gravatar.com\/avatar\/24a74fef504a714c468411d23f2d1fd451892ffebbba0d84f70d4ce0d489aefb?s=96&d=mm&r=g\",\"contentUrl\":\"https:\/\/secure.gravatar.com\/avatar\/24a74fef504a714c468411d23f2d1fd451892ffebbba0d84f70d4ce0d489aefb?s=96&d=mm&r=g\",\"caption\":\"\u30bf\u30ab\u30d2\u30ed@extan\"},\"url\":\"https:\/\/extan.jp\/?author=1\"}]}<\/script>\n<!-- \/ Yoast SEO plugin. -->","yoast_head_json":{"robots":{"index":"index","follow":"follow","max-snippet":"max-snippet:-1","max-image-preview":"max-image-preview:large","max-video-preview":"max-video-preview:-1"},"canonical":"https:\/\/extan.jp\/?p=912","og_locale":"ja_JP","og_type":"article","og_title":"\u3010Outlook VBA\u3011\u53d7\u4fe1\u3057\u305f\u30e1\u30fc\u30eb\u306e\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u3092\u81ea\u52d5\u4f5c\u6210\u3057\u305f\u65e5\u4ed8\u30d5\u30a9\u30eb\u30c0\u3078\u4fdd\u5b58\uff06\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u30ea\u30b9\u30c8\u3092Excel\u5f62\u5f0f\u3067\u51fa\u529b - \u30a8\u30af\u77ed\uff5cExtan.jp","og_description":"\u524d\u56de\u3001\u3010Outlook VBA\u3011\u53d7\u4fe1\u3057\u305f\u30e1\u30fc\u30eb\u306e\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u3092\u6307\u5b9a\u30d5\u30a9\u30eb\u30c0\u3078\u4fdd\u5b58\uff06\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u30ea\u30b9\u30c8\u3092Excel\u5f62\u5f0f\u3067\u51fa\u529b\u3059\u308b\u65b9\u6cd5\u3092\u7d39\u4ecb\u3057\u307e\u3057\u305f\u304c\u3001\u4fdd\u5b58\u5148\u30d5\u30a9\u30eb\u30c0\u3092\u6307\u5b9a\u5148\u306e\u30d1\u30b9\u306b\u3055\u3089\u306b\u65e5\u3054\u3068\u306e\u30d5\u30a9\u30eb\u30c0\u3092\u81ea\u52d5\u4f5c\u6210\u3057\u305d\u3053\u3078\u4fdd...","og_url":"https:\/\/extan.jp\/?p=912","og_site_name":"\u30a8\u30af\u77ed\uff5cExtan.jp","article_published_time":"2020-05-20T13:52:11+00:00","article_modified_time":"2021-09-17T09:54:28+00:00","og_image":[{"width":778,"height":402,"url":"https:\/\/extan.jp\/wp-content\/uploads\/2019\/06\/062719_1340_temp3.png","type":"image\/png"}],"twitter_card":"summary_large_image","twitter_misc":{"\u57f7\u7b46\u8005":"\u30bf\u30ab\u30d2\u30ed@extan","\u63a8\u5b9a\u8aad\u307f\u53d6\u308a\u6642\u9593":"3\u5206"},"schema":{"@context":"https:\/\/schema.org","@graph":[{"@type":"WebSite","@id":"https:\/\/extan.jp\/#website","url":"https:\/\/extan.jp\/","name":"\u30a8\u30af\u77ed\uff5cExtan.jp","description":"\u50cd\u304f\u4eba\u306e\u81ea\u7531\u6642\u9593\u3092\u3064\u304f\u308b","potentialAction":[{"@type":"SearchAction","target":{"@type":"EntryPoint","urlTemplate":"https:\/\/extan.jp\/?s={search_term_string}"},"query-input":"required name=search_term_string"}],"inLanguage":"ja"},{"@type":"ImageObject","@id":"https:\/\/extan.jp\/?p=912#primaryimage","inLanguage":"ja","url":"https:\/\/extan.jp\/wp-content\/uploads\/2019\/06\/062719_1340_temp3.png","contentUrl":"https:\/\/extan.jp\/wp-content\/uploads\/2019\/06\/062719_1340_temp3.png","width":778,"height":402},{"@type":"WebPage","@id":"https:\/\/extan.jp\/?p=912#webpage","url":"https:\/\/extan.jp\/?p=912","name":"\u3010Outlook VBA\u3011\u53d7\u4fe1\u3057\u305f\u30e1\u30fc\u30eb\u306e\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u3092\u81ea\u52d5\u4f5c\u6210\u3057\u305f\u65e5\u4ed8\u30d5\u30a9\u30eb\u30c0\u3078\u4fdd\u5b58\uff06\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u30ea\u30b9\u30c8\u3092Excel\u5f62\u5f0f\u3067\u51fa\u529b - \u30a8\u30af\u77ed\uff5cExtan.jp","isPartOf":{"@id":"https:\/\/extan.jp\/#website"},"primaryImageOfPage":{"@id":"https:\/\/extan.jp\/?p=912#primaryimage"},"datePublished":"2020-05-20T13:52:11+00:00","dateModified":"2021-09-17T09:54:28+00:00","author":{"@id":"https:\/\/extan.jp\/#\/schema\/person\/ccb8849fcf749d5f74439b1af7d4df1a"},"breadcrumb":{"@id":"https:\/\/extan.jp\/?p=912#breadcrumb"},"inLanguage":"ja","potentialAction":[{"@type":"ReadAction","target":["https:\/\/extan.jp\/?p=912"]}]},{"@type":"BreadcrumbList","@id":"https:\/\/extan.jp\/?p=912#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"\u30db\u30fc\u30e0","item":"https:\/\/extan.jp\/"},{"@type":"ListItem","position":2,"name":"\u3010Outlook VBA\u3011\u53d7\u4fe1\u3057\u305f\u30e1\u30fc\u30eb\u306e\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u3092\u81ea\u52d5\u4f5c\u6210\u3057\u305f\u65e5\u4ed8\u30d5\u30a9\u30eb\u30c0\u3078\u4fdd\u5b58\uff06\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u30ea\u30b9\u30c8\u3092Excel\u5f62\u5f0f\u3067\u51fa\u529b"}]},{"@type":"Person","@id":"https:\/\/extan.jp\/#\/schema\/person\/ccb8849fcf749d5f74439b1af7d4df1a","name":"\u30bf\u30ab\u30d2\u30ed@extan","image":{"@type":"ImageObject","@id":"https:\/\/extan.jp\/#personlogo","inLanguage":"ja","url":"https:\/\/secure.gravatar.com\/avatar\/24a74fef504a714c468411d23f2d1fd451892ffebbba0d84f70d4ce0d489aefb?s=96&d=mm&r=g","contentUrl":"https:\/\/secure.gravatar.com\/avatar\/24a74fef504a714c468411d23f2d1fd451892ffebbba0d84f70d4ce0d489aefb?s=96&d=mm&r=g","caption":"\u30bf\u30ab\u30d2\u30ed@extan"},"url":"https:\/\/extan.jp\/?author=1"}]}},"_links":{"self":[{"href":"https:\/\/extan.jp\/index.php?rest_route=\/wp\/v2\/posts\/912","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/extan.jp\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/extan.jp\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/extan.jp\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/extan.jp\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=912"}],"version-history":[{"count":21,"href":"https:\/\/extan.jp\/index.php?rest_route=\/wp\/v2\/posts\/912\/revisions"}],"predecessor-version":[{"id":2154,"href":"https:\/\/extan.jp\/index.php?rest_route=\/wp\/v2\/posts\/912\/revisions\/2154"}],"wp:featuredmedia":[{"embeddable":true,"href":"https:\/\/extan.jp\/index.php?rest_route=\/wp\/v2\/media\/917"}],"wp:attachment":[{"href":"https:\/\/extan.jp\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=912"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/extan.jp\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=912"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/extan.jp\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=912"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}