{"id":3636,"date":"2023-01-21T01:45:31","date_gmt":"2023-01-20T16:45:31","guid":{"rendered":"https:\/\/extan.jp\/?p=3636"},"modified":"2023-01-21T13:11:01","modified_gmt":"2023-01-21T04:11:01","slug":"%e3%80%90vba%e3%80%91excel-%e3%81%8b%e3%82%89outlook%e3%81%ae%e4%bc%9a%e8%ad%b0%e5%87%ba%e5%b8%ad%e4%be%9d%e9%a0%bc%e3%82%92%e9%80%81%e4%bf%a1%e3%81%99%e3%82%8b%e6%96%b9%e6%b3%95%ef%bc%81%e4%bc%9a","status":"publish","type":"post","link":"https:\/\/extan.jp\/?p=3636","title":{"rendered":"\u3010VBA\u3011Excel \u304b\u3089Outlook\u306e\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u9001\u4fe1\u3059\u308b\u65b9\u6cd5\uff01\u4f1a\u8b70\u5909\u66f4\u5f8c\u306e\u9001\u4fe1\u3082\u5bfe\u5fdc\uff01"},"content":{"rendered":"<p>Outlook\u306e\u4e88\u5b9a\u8868\u3067\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u9001\u4fe1\u3059\u308b\u6a5f\u4f1a\u306f\u591a\u3044\u304b\u3068\u601d\u3044\u307e\u3059\u3002<\/p>\n<p>\u305d\u3093\u306a\u4e2d\u3067\u56f0\u308b\u3053\u3068\u3053\u3068\u306f\u3001<\/p>\n<div class=\"kininarukoto1\">\u30fb\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u306e\u5b9b\u5148\u3092\u624b\u5165\u529b\u3059\u308b\u306e\u306f\u9762\u5012<br \/>\n\u30fb\u8907\u6570\u306e\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u51fa\u3059\u5834\u5408\u306f\u3001\u4ef6\u6570\u5206\u65b0\u898f\u4f5c\u6210\u3057\u306a\u3051\u308c\u3070\u306a\u3089\u306a\u3044\u306e\u3067\u9762\u5012<\/div>\n<p>\u3067\u306f\u306a\u3044\u3067\u3057\u3087\u3046\u304b\uff1f<\/p>\n<p>\u5b9f\u306fOutlook\u3068Excel\u306eVBA\u3092\u7d44\u307f\u5408\u308f\u305b\u3066\u5229\u7528\u3059\u308b\u3068<br \/>\nExcel\u3067\u307e\u3068\u3081\u305f\u4f1a\u8b70\u60c5\u5831\u304b\u3089\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u751f\u6210\u3001\u9001\u4fe1\u3059\u308b\u3053\u3068\u304c\u3067\u304d\u308b\u306e\u3067\u3059\u3002<\/p>\n<p>\u4eca\u56de\u306f\u305d\u3093\u306a\u5b9f\u7528\u6027\u304c\u9ad8\u3044\u3001<\/p>\n<div class=\"rdinfo\">Excel\u306b\u307e\u3068\u3081\u305f\u4f1a\u8b70\u60c5\u5831\u304b\u3089Outlook\u306e\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u9001\u4fe1\u3059\u308b\u65b9\u6cd5\u3068\u3001\u4f1a\u8b70\u5185\u5bb9\u3084\u30b9\u30b1\u30b8\u30e5\u30fc\u30eb\u3092\u5909\u66f4\u3057\u3066\u518d\u9001\u4fe1\u3059\u308b\u65b9\u6cd5<\/div>\n<p>\u306b\u3064\u3044\u3066\u307e\u3068\u3081\u307e\u3059\uff01<\/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=3636\/#Excel%E3%81%AB%E3%81%BE%E3%81%A8%E3%82%81%E3%81%9F%E4%BC%9A%E8%AD%B0%E6%83%85%E5%A0%B1%E3%81%8B%E3%82%89Outlook%E3%81%AE%E4%BC%9A%E8%AD%B0%E5%87%BA%E5%B8%AD%E4%BE%9D%E9%A0%BC%E3%82%92%E9%80%81%E4%BF%A1%E3%81%99%E3%82%8B%E6%96%B9%E3%81%AB%E3%81%A4%E3%81%84%E3%81%A6\" title=\"Excel\u306b\u307e\u3068\u3081\u305f\u4f1a\u8b70\u60c5\u5831\u304b\u3089Outlook\u306e\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u9001\u4fe1\u3059\u308b\u65b9\u306b\u3064\u3044\u3066\">Excel\u306b\u307e\u3068\u3081\u305f\u4f1a\u8b70\u60c5\u5831\u304b\u3089Outlook\u306e\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u9001\u4fe1\u3059\u308b\u65b9\u306b\u3064\u3044\u3066<\/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=3636\/#Excel_VBA%E3%81%8B%E3%82%89Outlook%E3%82%92%E6%93%8D%E4%BD%9C%E3%81%99%E3%82%8B%E3%81%9F%E3%82%81%E3%81%AE%E4%B8%8B%E6%BA%96%E5%82%99\" title=\"Excel VBA\u304b\u3089Outlook\u3092\u64cd\u4f5c\u3059\u308b\u305f\u3081\u306e\u4e0b\u6e96\u5099\">Excel VBA\u304b\u3089Outlook\u3092\u64cd\u4f5c\u3059\u308b\u305f\u3081\u306e\u4e0b\u6e96\u5099<\/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=3636\/#VBA%E3%82%92%E5%AE%9F%E8%A3%85%E3%81%99%E3%82%8B\" title=\"VBA\u3092\u5b9f\u88c5\u3059\u308b\">VBA\u3092\u5b9f\u88c5\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=3636\/#%E4%BC%9A%E8%AD%B0%E5%87%BA%E5%B8%AD%E4%BE%9D%E9%A0%BC%E3%81%AE%E3%83%87%E3%83%BC%E3%82%BF%E3%82%92%E6%BA%96%E5%82%99%E3%81%99%E3%82%8B\" title=\"\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u306e\u30c7\u30fc\u30bf\u3092\u6e96\u5099\u3059\u308b\">\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u306e\u30c7\u30fc\u30bf\u3092\u6e96\u5099\u3059\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=3636\/#VBA%E3%82%92%E5%AE%9F%E8%A1%8C%E3%81%97%E3%80%81%E4%BC%9A%E8%AD%B0%E5%87%BA%E5%B8%AD%E4%BE%9D%E9%A0%BC%E3%82%92%E9%80%81%E4%BF%A1%E3%81%99%E3%82%8B\" title=\"VBA\u3092\u5b9f\u884c\u3057\u3001\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u9001\u4fe1\u3059\u308b\">VBA\u3092\u5b9f\u884c\u3057\u3001\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u9001\u4fe1\u3059\u308b<\/a><ul class='ez-toc-list-level-3' ><li class='ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-6\" href=\"https:\/\/extan.jp\/?p=3636\/#%E3%83%A1%E3%83%BC%E3%83%AB%E8%AA%A4%E9%80%81%E4%BF%A1%E4%BA%88%E9%98%B2%E3%81%AE%E8%A8%AD%E5%AE%9A%E3%82%92%E3%81%99%E3%82%8B\" title=\"\u30e1\u30fc\u30eb\u8aa4\u9001\u4fe1\u4e88\u9632\u306e\u8a2d\u5b9a\u3092\u3059\u308b\">\u30e1\u30fc\u30eb\u8aa4\u9001\u4fe1\u4e88\u9632\u306e\u8a2d\u5b9a\u3092\u3059\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-7\" href=\"https:\/\/extan.jp\/?p=3636\/#VBA%E3%82%92%E5%AE%9F%E8%A1%8C%E3%81%99%E3%82%8B\" title=\"VBA\u3092\u5b9f\u884c\u3059\u308b\">VBA\u3092\u5b9f\u884c\u3059\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-8\" href=\"https:\/\/extan.jp\/?p=3636\/#%E4%BC%9A%E8%AD%B0%E3%81%AE%E3%82%B9%E3%82%B1%E3%82%B8%E3%83%A5%E3%83%BC%E3%83%AB%E3%80%81%E5%86%85%E5%AE%B9%E3%82%92%E5%A4%89%E6%9B%B4%E3%81%97%E5%86%8D%E9%80%81%E4%BF%A1%E3%81%99%E3%82%8B\" title=\"\u4f1a\u8b70\u306e\u30b9\u30b1\u30b8\u30e5\u30fc\u30eb\u3001\u5185\u5bb9\u3092\u5909\u66f4\u3057\u518d\u9001\u4fe1\u3059\u308b\">\u4f1a\u8b70\u306e\u30b9\u30b1\u30b8\u30e5\u30fc\u30eb\u3001\u5185\u5bb9\u3092\u5909\u66f4\u3057\u518d\u9001\u4fe1\u3059\u308b<\/a><\/li><\/ul><\/li><li class='ez-toc-page-1 ez-toc-heading-level-2'><a class=\"ez-toc-link ez-toc-heading-9\" href=\"https:\/\/extan.jp\/?p=3636\/#%E4%BB%8A%E5%9B%9E%E3%81%AEVBA%E3%81%AB%E3%81%A4%E3%81%84%E3%81%A6%E8%AA%AC%E6%98%8E\" title=\"\u4eca\u56de\u306eVBA\u306b\u3064\u3044\u3066\u8aac\u660e\">\u4eca\u56de\u306eVBA\u306b\u3064\u3044\u3066\u8aac\u660e<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-2'><a class=\"ez-toc-link ez-toc-heading-10\" href=\"https:\/\/extan.jp\/?p=3636\/#%EF%BC%9C%E8%BF%BD%E5%8A%A0%EF%BC%9E%E6%97%A5%E6%9C%AC%E8%AA%9E%E4%BA%A4%E3%81%98%E3%82%8A%E3%81%AEURL%E3%82%92%E6%97%A5%E6%9C%AC%E8%AA%9E%E3%82%82%E5%90%AB%E3%82%80%E5%BD%A2%E3%81%A7%E3%83%8F%E3%82%A4%E3%83%91%E3%83%BC%E3%83%AA%E3%83%B3%E3%82%AF%E3%82%92%E4%BB%98%E4%B8%8E%E3%81%99%E3%82%8B%E3%82%88%E3%81%86%E6%A9%9F%E8%83%BD%EF%BC%88URL%E3%82%A8%E3%83%B3%E3%82%B3%E3%83%BC%E3%83%89%E5%87%A6%E7%90%86%EF%BC%89%E8%BF%BD%E5%8A%A0\" title=\"\uff1c\u8ffd\u52a0\uff1e\u65e5\u672c\u8a9e\u4ea4\u3058\u308a\u306eURL\u3092\u65e5\u672c\u8a9e\u3082\u542b\u3080\u5f62\u3067\u30cf\u30a4\u30d1\u30fc\u30ea\u30f3\u30af\u3092\u4ed8\u4e0e\u3059\u308b\u3088\u3046\u6a5f\u80fd\uff08URL\u30a8\u30f3\u30b3\u30fc\u30c9\u51e6\u7406\uff09\u8ffd\u52a0\">\uff1c\u8ffd\u52a0\uff1e\u65e5\u672c\u8a9e\u4ea4\u3058\u308a\u306eURL\u3092\u65e5\u672c\u8a9e\u3082\u542b\u3080\u5f62\u3067\u30cf\u30a4\u30d1\u30fc\u30ea\u30f3\u30af\u3092\u4ed8\u4e0e\u3059\u308b\u3088\u3046\u6a5f\u80fd\uff08URL\u30a8\u30f3\u30b3\u30fc\u30c9\u51e6\u7406\uff09\u8ffd\u52a0<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-2'><a class=\"ez-toc-link ez-toc-heading-11\" href=\"https:\/\/extan.jp\/?p=3636\/#%EF%BC%9C%E8%BF%BD%E5%8A%A0%EF%BC%9EExcel%E3%81%8B%E3%82%89%E7%99%BB%E9%8C%B2%E6%B8%88%E3%81%BF%E4%BC%9A%E8%AD%B0%E3%81%AE%E3%82%AD%E3%83%A3%E3%83%B3%E3%82%BB%E3%83%AB%E9%80%9A%E7%9F%A5%E3%82%92%E3%81%99%E3%82%8B\" title=\"\uff1c\u8ffd\u52a0\uff1eExcel\u304b\u3089\u767b\u9332\u6e08\u307f\u4f1a\u8b70\u306e\u30ad\u30e3\u30f3\u30bb\u30eb\u901a\u77e5\u3092\u3059\u308b\">\uff1c\u8ffd\u52a0\uff1eExcel\u304b\u3089\u767b\u9332\u6e08\u307f\u4f1a\u8b70\u306e\u30ad\u30e3\u30f3\u30bb\u30eb\u901a\u77e5\u3092\u3059\u308b<\/a><ul class='ez-toc-list-level-3' ><li class='ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-12\" href=\"https:\/\/extan.jp\/?p=3636\/#VBA%E3%82%92%E5%AE%9F%E8%A3%85%E3%81%99%E3%82%8B-2\" title=\"VBA\u3092\u5b9f\u88c5\u3059\u308b\">VBA\u3092\u5b9f\u88c5\u3059\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-13\" href=\"https:\/\/extan.jp\/?p=3636\/#%E4%BC%9A%E8%AD%B0%E3%82%92%E6%96%B0%E8%A6%8F%E7%99%BB%E9%8C%B2%E3%81%99%E3%82%8B\" title=\"\u4f1a\u8b70\u3092\u65b0\u898f\u767b\u9332\u3059\u308b\">\u4f1a\u8b70\u3092\u65b0\u898f\u767b\u9332\u3059\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-14\" href=\"https:\/\/extan.jp\/?p=3636\/#Excel%E3%81%B8%E3%82%AD%E3%83%A3%E3%83%B3%E3%82%BB%E3%83%AB%E3%83%95%E3%83%A9%E3%82%B0%E3%82%92%E5%85%A5%E5%8A%9B%E3%81%99%E3%82%8B\" title=\"Excel\u3078\u30ad\u30e3\u30f3\u30bb\u30eb\u30d5\u30e9\u30b0\u3092\u5165\u529b\u3059\u308b\">Excel\u3078\u30ad\u30e3\u30f3\u30bb\u30eb\u30d5\u30e9\u30b0\u3092\u5165\u529b\u3059\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-15\" href=\"https:\/\/extan.jp\/?p=3636\/#VBA%E3%82%92%E5%AE%9F%E8%A1%8C%E3%81%99%E3%82%8B-2\" title=\"VBA\u3092\u5b9f\u884c\u3059\u308b\">VBA\u3092\u5b9f\u884c\u3059\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-16\" href=\"https:\/\/extan.jp\/?p=3636\/#VBA%E3%81%AE%E8%AA%AC%E6%98%8E\" title=\"VBA\u306e\u8aac\u660e\">VBA\u306e\u8aac\u660e<\/a><\/li><\/ul><\/li><li class='ez-toc-page-1 ez-toc-heading-level-2'><a class=\"ez-toc-link ez-toc-heading-17\" href=\"https:\/\/extan.jp\/?p=3636\/#%EF%BC%9C%E8%BF%BD%E5%8A%A0%EF%BC%9E%E4%BC%9A%E8%AD%B0%E3%81%B8%E3%82%A2%E3%83%A9%E3%83%BC%E3%83%A0%E3%82%92%E8%A8%AD%E5%AE%9A%E3%81%99%E3%82%8B\" title=\"\uff1c\u8ffd\u52a0\uff1e\u4f1a\u8b70\u3078\u30a2\u30e9\u30fc\u30e0\u3092\u8a2d\u5b9a\u3059\u308b\">\uff1c\u8ffd\u52a0\uff1e\u4f1a\u8b70\u3078\u30a2\u30e9\u30fc\u30e0\u3092\u8a2d\u5b9a\u3059\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-2'><a class=\"ez-toc-link ez-toc-heading-18\" href=\"https:\/\/extan.jp\/?p=3636\/#%EF%BC%9C%E8%BF%BD%E5%8A%A0%EF%BC%9E%E4%BB%96%E4%BA%BA%E3%81%AE%E7%A9%BA%E3%81%8D%E6%99%82%E9%96%93%E3%82%92%E3%83%81%E3%82%A7%E3%83%83%E3%82%AF%E3%81%97%E7%A9%BA%E3%81%8D%E3%81%8C%E3%81%AA%E3%81%84%E5%A0%B4%E5%90%88%E3%81%AF%E5%AE%9B%E5%85%88%E3%81%8B%E3%82%89%E9%99%A4%E5%A4%96%E3%81%99%E3%82%8B\" title=\"\uff1c\u8ffd\u52a0\uff1e\u4ed6\u4eba\u306e\u7a7a\u304d\u6642\u9593\u3092\u30c1\u30a7\u30c3\u30af\u3057\u7a7a\u304d\u304c\u306a\u3044\u5834\u5408\u306f\u5b9b\u5148\u304b\u3089\u9664\u5916\u3059\u308b\">\uff1c\u8ffd\u52a0\uff1e\u4ed6\u4eba\u306e\u7a7a\u304d\u6642\u9593\u3092\u30c1\u30a7\u30c3\u30af\u3057\u7a7a\u304d\u304c\u306a\u3044\u5834\u5408\u306f\u5b9b\u5148\u304b\u3089\u9664\u5916\u3059\u308b<\/a><ul class='ez-toc-list-level-3' ><li class='ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-19\" href=\"https:\/\/extan.jp\/?p=3636\/#Function%E3%83%97%E3%83%AD%E3%82%B7%E3%83%BC%E3%82%B8%E3%83%A3\" title=\"Function\u30d7\u30ed\u30b7\u30fc\u30b8\u30e3\">Function\u30d7\u30ed\u30b7\u30fc\u30b8\u30e3<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-20\" href=\"https:\/\/extan.jp\/?p=3636\/#%E4%BC%9A%E8%AD%B0%E5%87%BA%E5%B8%AD%E4%BE%9D%E9%A0%BC%E3%82%92%E9%80%81%E4%BF%A1%E3%81%99%E3%82%8B%E3%82%B3%E3%83%BC%E3%83%89%E3%82%92%E5%A4%89%E6%9B%B4%E3%81%99%E3%82%8B\" title=\"\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u9001\u4fe1\u3059\u308b\u30b3\u30fc\u30c9\u3092\u5909\u66f4\u3059\u308b\">\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u9001\u4fe1\u3059\u308b\u30b3\u30fc\u30c9\u3092\u5909\u66f4\u3059\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-21\" href=\"https:\/\/extan.jp\/?p=3636\/#%E5%8B%95%E4%BD%9C%E7%A2%BA%E8%AA%8D%E3%82%92%E3%81%99%E3%82%8B\" title=\"\u52d5\u4f5c\u78ba\u8a8d\u3092\u3059\u308b\">\u52d5\u4f5c\u78ba\u8a8d\u3092\u3059\u308b<\/a><\/li><\/ul><\/li><li class='ez-toc-page-1 ez-toc-heading-level-2'><a class=\"ez-toc-link ez-toc-heading-22\" href=\"https:\/\/extan.jp\/?p=3636\/#%EF%BC%9C%E8%BF%BD%E5%8A%A0%EF%BC%9E%E4%BC%9A%E8%AD%B0%E5%87%BA%E5%B8%AD%E4%BE%9D%E9%A0%BC%E3%81%ABTeams%E4%BC%9A%E8%AD%B0%E3%82%92VBA%E3%81%A7%E8%A8%AD%E5%AE%9A%E3%81%99%E3%82%8B\" title=\"\uff1c\u8ffd\u52a0\uff1e\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u306bTeams\u4f1a\u8b70\u3092VBA\u3067\u8a2d\u5b9a\u3059\u308b\">\uff1c\u8ffd\u52a0\uff1e\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u306bTeams\u4f1a\u8b70\u3092VBA\u3067\u8a2d\u5b9a\u3059\u308b<\/a><ul class='ez-toc-list-level-3' ><li class='ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-23\" href=\"https:\/\/extan.jp\/?p=3636\/#VBA%E3%82%92%E5%AE%9F%E8%A3%85%E3%81%99%E3%82%8B-3\" title=\"VBA\u3092\u5b9f\u88c5\u3059\u308b\">VBA\u3092\u5b9f\u88c5\u3059\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-24\" href=\"https:\/\/extan.jp\/?p=3636\/#VBA%E3%82%92%E5%AE%9F%E8%A1%8C%E3%81%99%E3%82%8B-3\" title=\"VBA\u3092\u5b9f\u884c\u3059\u308b\">VBA\u3092\u5b9f\u884c\u3059\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-25\" href=\"https:\/\/extan.jp\/?p=3636\/#VBA%E3%81%AE%E8%AA%AC%E6%98%8E-2\" title=\"VBA\u306e\u8aac\u660e\">VBA\u306e\u8aac\u660e<\/a><\/li><\/ul><\/li><li class='ez-toc-page-1 ez-toc-heading-level-2'><a class=\"ez-toc-link ez-toc-heading-26\" href=\"https:\/\/extan.jp\/?p=3636\/#%EF%BC%9C%E8%BF%BD%E5%8A%A0%EF%BC%9E%E4%BC%9A%E8%AD%B0%E5%87%BA%E5%B8%AD%E4%BE%9D%E9%A0%BC%E3%81%AB%E5%88%86%E9%A1%9E%E9%A0%85%E7%9B%AE%E3%81%A7%E8%A8%AD%E5%AE%9A%E3%81%99%E3%82%8B\" title=\"\uff1c\u8ffd\u52a0\uff1e\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u306b\u5206\u985e\u9805\u76ee\u3067\u8a2d\u5b9a\u3059\u308b\">\uff1c\u8ffd\u52a0\uff1e\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u306b\u5206\u985e\u9805\u76ee\u3067\u8a2d\u5b9a\u3059\u308b<\/a><ul class='ez-toc-list-level-3' ><li class='ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-27\" href=\"https:\/\/extan.jp\/?p=3636\/#VBA%E3%82%92%E5%AE%9F%E8%A3%85%E3%81%99%E3%82%8B-4\" title=\"VBA\u3092\u5b9f\u88c5\u3059\u308b\">VBA\u3092\u5b9f\u88c5\u3059\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-28\" href=\"https:\/\/extan.jp\/?p=3636\/#VBA%E3%82%92%E5%AE%9F%E8%A1%8C%E3%81%99%E3%82%8B-4\" title=\"VBA\u3092\u5b9f\u884c\u3059\u308b\">VBA\u3092\u5b9f\u884c\u3059\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-29\" href=\"https:\/\/extan.jp\/?p=3636\/#VBA%E3%81%AE%E8%AA%AC%E6%98%8E-3\" title=\"VBA\u306e\u8aac\u660e\">VBA\u306e\u8aac\u660e<\/a><\/li><\/ul><\/li><li class='ez-toc-page-1 ez-toc-heading-level-2'><a class=\"ez-toc-link ez-toc-heading-30\" href=\"https:\/\/extan.jp\/?p=3636\/#%EF%BC%9C%E8%BF%BD%E5%8A%A0%EF%BC%9E%E4%BC%9A%E8%AD%B0%E5%87%BA%E5%B8%AD%E4%BE%9D%E9%A0%BC%E3%81%AB%E8%A4%87%E6%95%B0%E3%81%AE%E3%83%95%E3%82%A1%E3%82%A4%E3%83%AB%E3%82%92%E6%B7%BB%E4%BB%98%E3%81%99%E3%82%8B\" title=\"\uff1c\u8ffd\u52a0\uff1e\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u306b\u8907\u6570\u306e\u30d5\u30a1\u30a4\u30eb\u3092\u6dfb\u4ed8\u3059\u308b\">\uff1c\u8ffd\u52a0\uff1e\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u306b\u8907\u6570\u306e\u30d5\u30a1\u30a4\u30eb\u3092\u6dfb\u4ed8\u3059\u308b<\/a><ul class='ez-toc-list-level-3' ><li class='ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-31\" href=\"https:\/\/extan.jp\/?p=3636\/#%E6%B7%BB%E4%BB%98%E3%83%95%E3%82%A1%E3%82%A4%E3%83%AB%E3%82%92%E6%BA%96%E5%82%99%E3%81%99%E3%82%8B\" title=\"\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u3092\u6e96\u5099\u3059\u308b\">\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u3092\u6e96\u5099\u3059\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-32\" href=\"https:\/\/extan.jp\/?p=3636\/#VBA%E3%82%92%E5%AE%9F%E8%A3%85%E3%81%99%E3%82%8B-5\" title=\"VBA\u3092\u5b9f\u88c5\u3059\u308b\">VBA\u3092\u5b9f\u88c5\u3059\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-33\" href=\"https:\/\/extan.jp\/?p=3636\/#VBA%E3%82%92%E5%AE%9F%E8%A1%8C%E3%81%99%E3%82%8B-5\" title=\"VBA\u3092\u5b9f\u884c\u3059\u308b\">VBA\u3092\u5b9f\u884c\u3059\u308b<\/a><\/li><li class='ez-toc-page-1 ez-toc-heading-level-3'><a class=\"ez-toc-link ez-toc-heading-34\" href=\"https:\/\/extan.jp\/?p=3636\/#VBA%E3%81%AE%E8%AA%AC%E6%98%8E-4\" title=\"VBA\u306e\u8aac\u660e\">VBA\u306e\u8aac\u660e<\/a><\/li><\/ul><\/li><li class='ez-toc-page-1 ez-toc-heading-level-2'><a class=\"ez-toc-link ez-toc-heading-35\" href=\"https:\/\/extan.jp\/?p=3636\/#%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=\"Excel%E3%81%AB%E3%81%BE%E3%81%A8%E3%82%81%E3%81%9F%E4%BC%9A%E8%AD%B0%E6%83%85%E5%A0%B1%E3%81%8B%E3%82%89Outlook%E3%81%AE%E4%BC%9A%E8%AD%B0%E5%87%BA%E5%B8%AD%E4%BE%9D%E9%A0%BC%E3%82%92%E9%80%81%E4%BF%A1%E3%81%99%E3%82%8B%E6%96%B9%E3%81%AB%E3%81%A4%E3%81%84%E3%81%A6\"><\/span>Excel\u306b\u307e\u3068\u3081\u305f\u4f1a\u8b70\u60c5\u5831\u304b\u3089Outlook\u306e\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u9001\u4fe1\u3059\u308b\u65b9\u306b\u3064\u3044\u3066<span class=\"ez-toc-section-end\"><\/span><\/h2>\n<p>\u4eca\u56de\u306e\u30de\u30af\u30ed\u5b9f\u884c\u74b0\u5883\u306f\u30b9\u30b1\u30b8\u30e5\u30fc\u30eb\u4e00\u89a7\u304c\u3042\u308bExcel\u5074\u3068\u306a\u308a\u307e\u3059\u3002<\/p>\n<p><!--\u5439\u304d\u51fa\u3057\u306f\u3058\u307e\u308a--><\/p>\n<div class=\"balloon5\">\n<div class=\"faceicon\">\n<img loading=\"lazy\" decoding=\"async\" src=\"\/wp-content\/uploads\/2020\/11\/taka_kao.gif\" alt=\"\u30bf\u30ab\u30d2\u30ed\" width=\"110\" height=\"110\" \/>\n<div class=\"faceiconfont\">\u30bf\u30ab\u30d2\u30ed<\/div>\n<\/div>\n<div class=\"chatting\">\n<div class=\"says\">Excel\u304b\u3089Outlook\u306e\u64cd\u4f5c\u3092\u884c\u3044\u307e\u3059\u306e\u3067\u3001Outlook\u3092\u8d77\u52d5\u3057\u3066\u3044\u306a\u304f\u3066\u3082\u4e88\u5b9a\u306e\u767b\u9332\u304c\u53ef\u80fd\u3067\u3059\u3002<\/div>\n<\/div>\n<\/div>\n<p><!--\u5439\u304d\u51fa\u3057\u7d42\u308f\u308a--><\/p>\n<p>Excel\u306e\u4f1a\u8b70\u60c5\u5831\u4e00\u89a7\u304b\u3089\u4e00\u4ef6\u3065\u3064\u53d6\u308a\u51fa\u3057Outlook\u306e\u4e88\u5b9a\u8868\u3078\u4f1a\u8b70\u3092\u767b\u9332\u30fb\u9001\u4fe1\u3059\u308b\u6d41\u308c\u3068\u306a\u308a\u307e\u3059\u3002<\/p>\n<div class=\"info\">\u2460<strong>Excel\u30d6\u30c3\u30af(VBA)<\/strong> \u2192\u3000<strong>\u4e88\u5b9a\u8868\u3078\u4f1a\u8b70\u3092\u767b\u9332\u30fb\u9001\u4fe1\u3057\u3066<\/strong>\u3000\u2192 <strong>Outlook<\/strong><br \/>\n\u2461<strong>Excel\u30d6\u30c3\u30af<\/strong> \u2190\u3000<strong>\u4f1a\u8b70\u3092\u767b\u9332\u30fb\u9001\u4fe1\u3057\u305f\u3088<\/strong>\u3000\u2190 <strong>Outlook<\/strong><\/div>\n<p>\u6b21\u306b\u65e9\u901f\u5b9f\u88c5\u3092\u3057\u3066\u52d5\u304b\u3057\u3066\u307f\u307e\u3057\u3087\u3046\uff01<\/p>\n<h2><span class=\"ez-toc-section\" id=\"Excel_VBA%E3%81%8B%E3%82%89Outlook%E3%82%92%E6%93%8D%E4%BD%9C%E3%81%99%E3%82%8B%E3%81%9F%E3%82%81%E3%81%AE%E4%B8%8B%E6%BA%96%E5%82%99\"><\/span>Excel VBA\u304b\u3089Outlook\u3092\u64cd\u4f5c\u3059\u308b\u305f\u3081\u306e\u4e0b\u6e96\u5099<span class=\"ez-toc-section-end\"><\/span><\/h2>\n<p>\u2460\u307e\u305aExcel\u3092\u8d77\u52d5\u3057\u3001\u300c\u958b\u767a\u300d\u30bf\u30d6\u3092\u30af\u30ea\u30c3\u30af\u3057\u307e\u3059\u3002<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-1670\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2019\/09\/092219_1157_temp25.png\" alt=\"\" width=\"1051\" height=\"456\" \/><\/p>\n<p>\u2461VBE\u306e\u753b\u9762\u304c\u958b\u3044\u305f\u3089\u3001\u30e1\u30cb\u30e5\u30fc\u304b\u3089\u300c\u30c4\u30fc\u30eb\u300d&gt;\u300c\u53c2\u7167\u8a2d\u5b9a\u300d\u3092\u9078\u629e\u3057\u307e\u3059\u3002<\/p>\n<p>\u2462\u300cMicrosoft Outlook XX.X Object Library\u300d\u3092\u63a2\u3057\u3066\u30c1\u30a7\u30c3\u30af\u30dc\u30c3\u30af\u30b9\u306b\u30c1\u30a7\u30c3\u30af\u3057\u300cOK\u300d\u3092\u30af\u30ea\u30c3\u30af\u3057\u307e\u3059\u3002<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-1536\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2019\/09\/091219_1002_temp3.png\" alt=\"\" width=\"650\" height=\"465\" \/><\/p>\n<p>\u4ee5\u4e0a\u3067\u3059\u3002<\/p>\n<p><script><\/p>\n<p><\/script><\/p>\n<h2><span class=\"ez-toc-section\" id=\"VBA%E3%82%92%E5%AE%9F%E8%A3%85%E3%81%99%E3%82%8B\"><\/span>VBA\u3092\u5b9f\u88c5\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h2>\n<p>\u7d9a\u3044\u3066VBA\u3092\u5b9f\u88c5\u3057\u307e\u3059\u3002<\/p>\n<p>\u4eca\u56deVBA\u306f\u4ee5\u4e0b\u306e\u901a\u308a\u3068\u306a\u308a\u307e\u3059\u3002<\/p>\n<pre style=\"padding: 0;\"><code class=\"language-visual-basic line-numbers\">Sub Outlook\u304b\u3089\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u9001\u4fe1\u3059\u308b()\n\n    &#039;Outlook\u7528\u306e\u5b9a\u7fa9\n    Dim olApp As Outlook.Application\n    Dim olNamespace As Outlook.Namespace\n    Dim olFolder As Folder\n    Dim olConItems As Outlook.Items\n    Dim olItem  As AppointmentItem\n    Dim checkFlg As Long\n    Dim olItemBefor As AppointmentItem\n    \n    &#039;\u91cd\u8907\u30c1\u30a7\u30c3\u30af\u30d5\u30e9\u30b0\u521d\u671f\u5024\u8a2d\u5b9a\n    checkFlg = 0\n\n    &#039;Excel\u7528\u306e\u5b9a\u7fa9\n    Dim wbBook As Workbook\n    Dim wsSheet As Worksheet\n    Dim lnContactCount As Long\n    \n    &#039;\u62bd\u51fa\u671f\u9593\u306e\u5b9a\u7fa9\n    Dim strStart As String\n    Dim strEnd As String\n    Dim intKikan As Integer\n    \n    Dim i As Integer\n    \n    \n    \n    &#039;\u5bfe\u8c61\u4e88\u5b9a\u8868\u306e\u62bd\u51fa\u671f\u9593\u3092\u6708\u5358\u4f4d\u3067\u6307\u5b9a\u3057\u307e\u3059\u3002\n    &#039;\u203b\u62bd\u51fa\u671f\u9593\u304c\u77ed\u3044\u3068\u4e88\u5b9a\u30a2\u30a4\u30c6\u30e0\u306e\u30c1\u30a7\u30c3\u30af\u304c\u3067\u304d\u305a\u767b\u9332\u3067\u304d\u306a\u3044\u5834\u5408\u304c\u3042\u308a\u307e\u3059\u306e\u3067\u6ce8\u610f\u3057\u3066\u304f\u3060\u3055\u3044\uff61\n    intKikan = 12  &#039;\u62bd\u51fa\u671f\u9593\u309212\u304b\u6708\u306b\u3057\u3066\u3044\u307e\u3059\u3002\n    \n    strStart = Format(DateAdd(&quot;m&quot;, -intKikan, Date), &quot;yyyy\/mm\/dd&quot;) &#039;\u62bd\u51fa\u3059\u308b\u30b9\u30b1\u30b8\u30e5\u30fc\u30eb\u306e\u958b\u59cb\u65e5\u3092\u6307\u5b9a\n    strEnd = Format(DateAdd(&quot;m&quot;, intKikan, Date), &quot;yyyy\/mm\/dd&quot;) &#039;\u62bd\u51fa\u3059\u308b\u30b9\u30b1\u30b8\u30e5\u30fc\u30eb\u306e\u7d42\u4e86\u65e5\u3092\u6307\u5b9a\n    \n    \n    &#039;\u30b9\u30af\u30ea\u30fc\u30f3\u306e\u66f4\u65b0\u3092\u30aa\u30d5\u306b\u3057\u307e\u3059\u3002\n    Application.ScreenUpdating = False\n    \n    &#039;Excel\u306e\u30d6\u30c3\u30af\u3068\u30ef\u30fc\u30af\u30b7\u30fc\u30c8\u306e\u30aa\u30d6\u30b8\u30a7\u30af\u30c8\u3092\u8a2d\u5b9a\u3057\u307e\u3059\u3002\n    Set wbBook = ThisWorkbook\n    Set wsSheet = wbBook.Worksheets(1)\n    \n    wsSheet.Activate\n    \n    &#039;Outlook\u30aa\u30d6\u30b8\u30a7\u30af\u30c8\u3092\u8a2d\u5b9a\u3057\u3001MAPI\u540d\u524d\u7a7a\u9593\u3092\u4ecb\u3057\u3066Outlook\u306e\u4e88\u5b9a\u8868\u3092\u53d6\u5f97\u3057\u307e\u3059\u3002\n    Set olApp = New Outlook.Application\n    Set olNamespace = olApp.GetNamespace(&quot;MAPI&quot;)\n    Set olFolder = olNamespace.GetDefaultFolder(olFolderCalendar)\n    Set olConItems = olFolder.Items\n\n    &#039;Restrict\u30e1\u30bd\u30c3\u30c9\u3067\u671f\u9593\u6307\u5b9a\u3057\u3066\u62bd\u51fa\u3059\u308b\u30e1\u30fc\u30eb\u30a2\u30a4\u30c6\u30e0\u3092\u7d5e\u308a\u8fbc\u307f\u307e\u3059\u3002\n    Set olConItems = olConItems.Restrict(&quot;[Start] &gt;= &#039;&quot; &amp; strStart &amp; &quot;&#039; And [End] &lt; &#039;&quot; &amp; strEnd &amp; &quot;&#039;&quot;)\n\n\n    &#039;\u53d6\u5f97\u7d50\u679c\u3092\u8a18\u8ff0\u3059\u308b\u884c\u756a\u53f7\u3092\u6307\u5b9a\u3057\u307e\u3059\u30022\u884c\u76ee\u306e\u30bb\u30eb\u304b\u3089\u958b\u59cb\u3055\u308c\u308b\u3053\u3068\u306b\u306a\u308a\u307e\u3059\u3002\n    lnContactCount = 2\n\n    Dim rc As Integer\n    rc = MsgBox(&quot;\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u9001\u4fe1\u3057\u307e\u3059\u304b\uff1f&quot;, vbYesNo + vbQuestion, &quot;\u78ba\u8a8d&quot;)\n    \n    If rc = vbYes Then\n    \n        &#039;\u4e88\u5b9a\u8868\u4e00\u89a7\u306e\u4ef6\u6570\u5206\u7e70\u308a\u8fd4\u3057\u307e\u3059\u3002\n        For i = lnContactCount To Cells(1, 1).End(xlDown).Row\n            Set olItem = olApp.CreateItem(olAppointmentItem)\n\n            &#039;\u91cd\u8907\u30c1\u30a7\u30c3\u30af\uff06\u66f4\u65b0\u51e6\u7406\n            For Each olItemBefor In olConItems\n                If TypeName(olItemBefor) = &quot;AppointmentItem&quot; Then\n                \n                    &#039;ExcelI\u5217\u306eEntryID\u3068\u767b\u9332\u3055\u308c\u3066\u3044\u308bEntryID\u304c\u4e00\u81f4\u3057\u3066\u3044\u305f\u3089\u8a72\u5f53\u4e88\u5b9a\u8868\u3092\u66f4\u65b0\u3057\u307e\u3059\u3002\n                    If olItemBefor.EntryID = Cells(i, 9) Then\n                    \n                        &#039;\u6bd4\u8f03\u7528\u306b\u4e00\u6642\u7684\u306b\u4f5c\u6210\n                        With olItem\n                            .Subject = Cells(i, 1)\n                            .Start = Format(Cells(i, 3), &quot;yyyy\/mm\/dd hh:mm:ss&quot;)\n                            .End = Format(Cells(i, 4), &quot;yyyy\/mm\/dd hh:mm:ss&quot;)\n                        End With\n    \n                    \n                        &#039;\u91cd\u8907\u30d5\u30e9\u30b01\u3092\u30bb\u30c3\u30c8\n                         checkFlg = 1\n                    \n                        &#039;\u767b\u9332\u3055\u308c\u3066\u3044\u308b\u4e88\u5b9a\u8868\u306e\u4ef6\u540d\u3068\u958b\u59cb\u65e5\u6642\u53ca\u3073\u7d42\u4e86\u65e5\u6642\u304c\u4e00\u81f4\u3057\u3066\u3044\u306a\u304b\u3063\u305f\u5834\u5408\u306e\u307f\u66f4\u65b0\u3057\u307e\u3059\u3002\n                        &#039;\u203b\u66f4\u65b0\u306e\u6761\u4ef6\u306f\u3054\u90fd\u5408\u306b\u5fdc\u3058\u3066\u5909\u66f4\u3057\u3066\u304f\u3060\u3055\u3044\u3002\u3053\u306e\u6761\u4ef6\u304c\u7121\u3044\u5834\u5408\u306fExcel\u306e\u4e88\u5b9a\u8868\u3059\u3079\u3066\u66f4\u65b0\u3055\u308c\u307e\u3059\u306e\u3067\u3001\u3054\u6ce8\u610f\u304f\u3060\u3055\u3044\u3002\n                        If olItemBefor.Subject = olItem.Subject And olItemBefor.Start = olItem.Start And olItemBefor.End = olItem.End Then\n    \n    \n                        Else\n\n                            &#039;\u5b9a\u671f\u30a2\u30a4\u30c6\u30e0\u306f\u9664\u5916\u3057\u307e\u3059\u3002\n                            If Cells(i, 10) &lt;&gt; &quot;True&quot; Then\n                                 With olItemBefor\n                                    .Subject = Cells(i, 1)\n                                    .Location = Cells(i, 2)\n                                    .Start = Format(Cells(i, 3), &quot;yyyy\/mm\/dd hh:mm:ss&quot;)\n                                    .End = Format(Cells(i, 4), &quot;yyyy\/mm\/dd hh:mm:ss&quot;)\n                                    .Body = Cells(i, 5)\n                                    .RequiredAttendees = Cells(i, 7)\n                                    .OptionalAttendees = Cells(i, 8)\n                                    .Recipients.ResolveAll\n                                    \n                                    .MeetingStatus = 1  &#039;\u4e88\u5b9a\u3092 &quot;\u4f1a\u8b70&quot; \u306b\u8a2d\u5b9a\u3000\u203b\u300colMeeting\u300d\u3067\u3082OK\n                                    .Send  &#039;\u9001\u4fe1\n                                End With\n                            End If\n                        End If\n                        \n                        &#039;Null out the variables.\n                        Set olItem = Nothing\n                        \n                    End If\n                End If\n            Next\n            &#039;EntryID\u304c\u7a7a\u304b\u3064\u3001\u958b\u59cb\u65e5\u6642\u304c\u7a7a\u3067\u306a\u3044\u5834\u5408\u306e\u307f\u65b0\u898f\u767b\u9332\u3057\u307e\u3059\u3002\n            If checkFlg &lt;&gt; 1 And Cells(i, 9) = &quot;&quot; And Cells(i, 3).Text &lt;&gt; &quot;&quot; Then\n                With olItem\n                    .Subject = Cells(i, 1)\n                    .Location = Cells(i, 2)\n                    .Start = Format(Cells(i, 3), &quot;yyyy\/mm\/dd hh:mm:ss&quot;)\n                    .End = Format(Cells(i, 4), &quot;yyyy\/mm\/dd hh:mm:ss&quot;)\n                    .Body = Cells(i, 5)\n                    .RequiredAttendees = Cells(i, 7)\n                    .OptionalAttendees = Cells(i, 8)\n                    .Recipients.ResolveAll\n                    .MeetingStatus = 1\n                    .Send  &#039;\u9001\u4fe1\n\n               End With\n               \n\n               &#039;ExcelI\u5217\u3078\u767a\u884c\u3055\u308c\u305fEntryID\u3092\u66f8\u304d\u8fbc\u307f\u3092\u3057\u307e\u3059\u3002\n               Cells(i, 9) = olItem.EntryID\n               \n               &#039;ExcelF\u5217\u3078\u4e88\u7d04\u8005\u3092\u66f8\u304d\u8fbc\u307f\u3092\u3057\u307e\u3059\u3002\n               Cells(i, 6) = olItem.Organizer\n\n               \n            End If\n    \n        \n        &#039;\u91cd\u8907\u30d5\u30e9\u30b0\u30ea\u30bb\u30c3\u30c8\n        checkFlg = 0\n    \n    Next\n    \n    Else\n        MsgBox &quot;\u51e6\u7406\u3092\u4e2d\u65ad\u3057\u307e\u3059&quot;\n    End If\n    \n    &#039;\u30aa\u30d6\u30b8\u30a7\u30af\u30c8\u3092\u89e3\u653e\u3057\u307e\u3059\u3002\n    Set olItem = Nothing\n    Set olApp = Nothing\n    Set wbBook = Nothing\n    Set wsSheet = Nothing\n    Set olNamespace = Nothing\n    Set olFolder = Nothing\n    Set olConItems = Nothing\n\n    &#039;\u30b9\u30af\u30ea\u30fc\u30f3\u306e\u66f4\u65b0\u3092\u30aa\u30f3\u306b\u3057\u307e\u3059\u3002\n    Application.ScreenUpdating = True\n    \n    MsgBox &quot;\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u306e\u9001\u4fe1\u304c\u5b8c\u4e86\u3057\u307e\u3057\u305f\uff01&quot;, vbInformation\n    \nEnd Sub<\/code><\/pre>\n<p>\u5b9f\u88c5\u624b\u9806\u306f\u4ee5\u4e0b\u306e\u901a\u308a\u3067\u3059\u3002\u4eca\u56de\u306fExcel\u5074\u306b\u3053\u306eVBA\u3092\u5b9f\u88c5\u3057\u307e\u3059\u3002<br \/>\n\u2460Excel\u3092\u65b0\u898f\u306b\u958b\u304d\u3001\u300c\u958b\u767a\u300d\u30bf\u30d6\u3092\u30af\u30ea\u30c3\u30af\u3057\u3001\u300cVisualBasic\u300d\u3092\u30af\u30ea\u30c3\u30af\u3057\u307e\u3059\u3002<br \/>\n\u3082\u3057\u304f\u306f\u30b7\u30e7\u30fc\u30c8\u30ab\u30c3\u30c8\u30ad\u30fc\u300cAlt\u300d\uff0b\u300cF11\u300d\u3067\u3082OK\u3067\u3059\u3002<\/p>\n<p>\u2461\u6a19\u6e96\u30e2\u30b8\u30e5\u30fc\u30eb\u3092\u8ffd\u52a0\u3057\u307e\u3059\u3002<br \/>\n\u5de6\u30da\u30a4\u30f3\u306eVBAProject\u3092\u53f3\u30af\u30ea\u30c3\u30af\u3057\u3001\u300c\u633f\u5165\u300d\u3001\u300c\u6a19\u6e96\u30e2\u30b8\u30e5\u30fc\u30eb\u300d\u3092\u9078\u629e\u3057\u307e\u3059\u3002<\/p>\n<img decoding=\"async\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2019\/05\/050919_1542_VBAFunctio2.png\" alt=\"\" \/>\n<p>\u2462\u53f3\u30da\u30a4\u30f3\u306e\u30a6\u30a4\u30f3\u30c9\u30a6\u306b\u4e0a\u8a18\u306e\u30de\u30af\u30ed\u3092\u5165\u529b\u3057\u307e\u3059\u3002<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-1680\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2019\/09\/092219_1211_temp22.png\" alt=\"\" width=\"1395\" height=\"879\" \/><\/p>\n<p>\u3053\u3061\u3089\u3067\u5b8c\u4e86\u3067\u3059\u3002<\/p>\n<p><script><\/p>\n<p><\/script><\/p>\n<h2><span class=\"ez-toc-section\" id=\"%E4%BC%9A%E8%AD%B0%E5%87%BA%E5%B8%AD%E4%BE%9D%E9%A0%BC%E3%81%AE%E3%83%87%E3%83%BC%E3%82%BF%E3%82%92%E6%BA%96%E5%82%99%E3%81%99%E3%82%8B\"><\/span>\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u306e\u30c7\u30fc\u30bf\u3092\u6e96\u5099\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h2>\n<p>\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u306e\u30c7\u30fc\u30bf\u3092\u6e96\u5099\u3057\u307e\u3057\u3087\u3046\u3002<\/p>\n<p>VBA\u3092\u5b9f\u88c5\u3057\u305fExcel\u306e\u30b7\u30fc\u30c8\u3078<br \/>\n\u4ee5\u4e0b\u306e\u9805\u76ee\u306b\u6cbf\u3063\u3066\u8a18\u5165\u3092\u3057\u3066\u3044\u304d\u307e\u3059\u3002<\/p>\n<table width=\"1058\">\n<tbody>\n<tr>\n<td>\u4ef6\u540d<\/td>\n<td>\u5834\u6240<\/td>\n<td>\u958b\u59cb\u65e5\u6642<\/td>\n<td>\u7d42\u4e86\u65e5\u6642<\/td>\n<td>\u4e88\u5b9a\u306e\u672c\u6587<\/td>\n<td>\u4e88\u7d04\u8005<\/td>\n<td>\u5fc5\u9808\u51fa\u5e2d\u8005<\/td>\n<td>\u4efb\u610f\u51fa\u5e2d\u8005<\/td>\n<td>EntryID<\/td>\n<\/tr>\n<tr>\n<td>\u4ef6\u540d\u3092\u5165\u529b<\/td>\n<td>\u5834\u6240\u3092\u5165\u529b<\/td>\n<td>\u958b\u59cb\u65e5\u6642\u3092&#8221;yyyy\/mm\/dd hh:mm:ss&#8221;\u5f62\u5f0f\u3067\u5165\u529b<\/td>\n<td>\u7d42\u4e86\u65e5\u6642\u3092&#8221;yyyy\/mm\/dd hh:mm:ss&#8221;\u5f62\u5f0f\u3067\u5165\u529b<\/td>\n<td>\u4e88\u5b9a\u306e\u672c\u6587\u3092\u5165\u529b<\/td>\n<td>\u4e88\u7d04\u8005\u304c\u767b\u9332\u5f8c\u5165\u308a\u307e\u3059\u3002\u7a7a\u3067OK\u3067\u3059\u3002<\/td>\n<td>\u5fc5\u9808\u51fa\u5e2d\u8005\u306e\u30a2\u30c9\u30ec\u30b9\u3092\u5165\u529b<\/td>\n<td>\u4efb\u610f\u51fa\u5e2d\u8005\u306e\u30a2\u30c9\u30ec\u30b9\u3092\u5165\u529b<\/td>\n<td>\u4f1a\u8b70\u8b58\u5225\u5b50\u306eEntryID\u304c\u767b\u9332\u5f8c\u5165\u308a\u307e\u3059\u3002\u7a7a\u3067OK\u3067\u3059\u3002<\/td>\n<\/tr>\n<\/tbody>\n<\/table>\n<p><!--\u5439\u304d\u51fa\u3057\u306f\u3058\u307e\u308a--><\/p>\n<div class=\"balloon5\">\n<div class=\"faceicon\">\n<img loading=\"lazy\" decoding=\"async\" src=\"\/wp-content\/uploads\/2020\/11\/taka_kao.gif\" alt=\"\u30bf\u30ab\u30d2\u30ed\" width=\"110\" height=\"110\" \/>\n<div class=\"faceiconfont\">\u30bf\u30ab\u30d2\u30ed<\/div>\n<\/div>\n<div class=\"chatting\">\n<div class=\"says\">\u8907\u6570\u306e\u4f1a\u8b70\u51fa\u5e2d\u8005\u3092\u6307\u5b9a\u3059\u308b\u5834\u5408\u306f\u3001\u300c;\u300d\u30bb\u30df\u30b3\u30ed\u30f3\u3067\u533a\u5207\u3063\u3066\u5165\u529b\u3057\u3066\u304f\u3060\u3055\u3044\u3002<\/div>\n<\/div>\n<\/div>\n<p><!--\u5439\u304d\u51fa\u3057\u7d42\u308f\u308a--><\/p>\n<p>\u30b5\u30f3\u30d7\u30eb\u3067\u306f\u4ee5\u4e0b\u306e\u3088\u3046\u306b\u5165\u529b\u3057\u3066\u3044\u307e\u3059\u3002<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-3674\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/04\/040221_1557_12.png\" alt=\"\" width=\"1374\" height=\"170\" \/><\/p>\n<p><script><\/p>\n<p><\/script><\/p>\n<h2><span class=\"ez-toc-section\" id=\"VBA%E3%82%92%E5%AE%9F%E8%A1%8C%E3%81%97%E3%80%81%E4%BC%9A%E8%AD%B0%E5%87%BA%E5%B8%AD%E4%BE%9D%E9%A0%BC%E3%82%92%E9%80%81%E4%BF%A1%E3%81%99%E3%82%8B\"><\/span>VBA\u3092\u5b9f\u884c\u3057\u3001\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u9001\u4fe1\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h2>\n<h3><span class=\"ez-toc-section\" id=\"%E3%83%A1%E3%83%BC%E3%83%AB%E8%AA%A4%E9%80%81%E4%BF%A1%E4%BA%88%E9%98%B2%E3%81%AE%E8%A8%AD%E5%AE%9A%E3%82%92%E3%81%99%E3%82%8B\"><\/span>\u30e1\u30fc\u30eb\u8aa4\u9001\u4fe1\u4e88\u9632\u306e\u8a2d\u5b9a\u3092\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n<p>\u4eca\u56de\u306f\u30e1\u30fc\u30eb\u3092\u9001\u4fe1\u3057\u307e\u3059\u304c\u3001\u30e1\u30fc\u30eb\u8aa4\u9001\u4fe1\u9632\u6b62\u306e\u305f\u3081\u306b\u30e1\u30fc\u30eb\u304c\u5373\u9001\u4fe1\u3068\u306a\u3089\u306a\u3044\u8a2d\u5b9a\u3092\u3057\u3066\u304a\u304d\u307e\u3057\u3087\u3046\u3002<\/p>\n<p>\u2460Outlook\u306e\u30aa\u30d7\u30b7\u30e7\u30f3\u3092\u958b\u304d\u307e\u3059\u3002<\/p>\n<p>\u2461\u5de6\u30da\u30a4\u30f3<span class=\"keybtn\">\u8a73\u7d30\u8a2d\u5b9a<\/span>\u3092\u30af\u30ea\u30c3\u30af\u3057\u307e\u3059\u3002<\/p>\n<p>\u2462\u53f3\u30da\u30a4\u30f3<span class=\"keybtn\">\u9001\u53d7\u4fe1<\/span>\uff1e\u300c\u63a5\u7d9a\u3057\u305f\u3089\u76f4\u3061\u306b\u9001\u4fe1\u3059\u308b\u300d\u306e\u30c1\u30a7\u30c3\u30af\u3092\u5916\u3057\u3001<span class=\"keybtn\">OK<\/span>\u3092\u30af\u30ea\u30c3\u30af\u3057\u307e\u3059\u3002<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-3670\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/04\/040221_1557_8.png\" alt=\"\" width=\"940\" height=\"752\" \/><\/p>\n<p>\u7d9a\u3044\u3066\u3001VBA\u3092\u5b9f\u884c\u3057\u3066\u307f\u307e\u3057\u3087\u3046\u3002<\/p>\n<h3><span class=\"ez-toc-section\" id=\"VBA%E3%82%92%E5%AE%9F%E8%A1%8C%E3%81%99%E3%82%8B\"><\/span>VBA\u3092\u5b9f\u884c\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n<p>\u2460\u300c\u958b\u767a\u300d\u30bf\u30d6\u306e\u300c\u30de\u30af\u30ed\u300d\u3092\u30af\u30ea\u30c3\u30af\u3057\u307e\u3059\u3002<\/p>\n<p>\u2461\u300cOutlook\u304b\u3089\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u9001\u4fe1\u3059\u308b\u300d\u3092\u9078\u629e\u3057\u3001\u300c\u5b9f\u884c\u300d\u3092\u30af\u30ea\u30c3\u30af\u3057\u307e\u3059\u3002<\/p>\n<p>\u2462\u30e1\u30c3\u30bb\u30fc\u30b8\u300c\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u306e\u9001\u4fe1\u304c\u5b8c\u4e86\u3057\u307e\u3057\u305f\uff01\u300d\u304c\u8868\u793a\u3055\u308c\u3070\u5b8c\u6210\u3067\u3059\uff01<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-3671\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/04\/040221_1557_9.png\" alt=\"\" width=\"272\" height=\"152\" \/><\/p>\n<p>\u4e88\u5b9a\u7528\u3078\u4f1a\u8b70\u30b9\u30b1\u30b8\u30e5\u30fc\u30eb\u304c\u767b\u9332\u3055\u308c\u307e\u3057\u305f\u306d\u3002<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-3675\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/04\/040221_1557_13.png\" alt=\"\" width=\"1208\" height=\"722\" \/><\/p>\n<p>\u767b\u9332\u3057\u305f2\u4ef6\u306e\u4f1a\u8b70\u5185\u5bb9\u3092\u78ba\u8a8d\u3057\u307e\u3057\u3087\u3046\u3002<\/p>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-3663\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/04\/040221_1557_1.png\" alt=\"\" width=\"1066\" height=\"529\" \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-3664\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/04\/040221_1557_2.png\" alt=\"\" width=\"1065\" height=\"508\" \/>\n<p>\u5b9b\u5148\u3001\u4ef6\u540d\u3001\u672c\u6587\u5171\u306bExcel\u901a\u308a\u306b\u5165\u3063\u3066\u3044\u307e\u3059\u306d\uff01<\/p>\n<p>\u6b21\u306b\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u304c\u9001\u4fe1\u3055\u308c\u3066\u3044\u308b\u304b\u30c1\u30a7\u30c3\u30af\u3057\u3066\u307f\u307e\u3059\u3002<\/p>\n<p>Outlook\u306e\u9001\u4fe1\u30c8\u30ec\u30a4\u3092\u898b\u3066\u307f\u307e\u3057\u3087\u3046\u3002<\/p>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-3666\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/04\/040221_1557_4.png\" alt=\"\" width=\"781\" height=\"236\" \/>\n<p>\u306f\u3044\u3001\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u30e1\u30fc\u30eb\u304c\u9001\u4fe1\u3055\u308c\u3066\u3044\u308b\u3053\u3068\u304c\u78ba\u8a8d\u3067\u304d\u307e\u3057\u305f\u306d\uff01<\/p>\n<h3><span class=\"ez-toc-section\" id=\"%E4%BC%9A%E8%AD%B0%E3%81%AE%E3%82%B9%E3%82%B1%E3%82%B8%E3%83%A5%E3%83%BC%E3%83%AB%E3%80%81%E5%86%85%E5%AE%B9%E3%82%92%E5%A4%89%E6%9B%B4%E3%81%97%E5%86%8D%E9%80%81%E4%BF%A1%E3%81%99%E3%82%8B\"><\/span>\u4f1a\u8b70\u306e\u30b9\u30b1\u30b8\u30e5\u30fc\u30eb\u3001\u5185\u5bb9\u3092\u5909\u66f4\u3057\u518d\u9001\u4fe1\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n<p>\u4f1a\u8b70\u306e\u30b9\u30b1\u30b8\u30e5\u30fc\u30eb\u3001\u5185\u5bb9\u3092\u5909\u66f4\u3057\u518d\u9001\u4fe1\u3057\u3066\u307f\u307e\u3057\u3087\u3046\u3002<\/p>\n<p>\u2460Excel\u306e\u4ef6\u540d\u3001\u958b\u59cb\u65e5\u6642\u3001\u7d42\u4e86\u65e5\u6642\u3092\u5909\u66f4\u3057\u307e\u3059\u3002<\/p>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-3668\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/04\/040221_1557_6.png\" alt=\"\" width=\"637\" height=\"185\" \/>\n<p>\u2461\u300cOutlook\u304b\u3089\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u9001\u4fe1\u3059\u308b\u300d\u3092\u9078\u629e\u3057\u3001\u300c\u5b9f\u884c\u300d\u3092\u30af\u30ea\u30c3\u30af\u3057\u307e\u3059\u3002<\/p>\n<p>\u2462\u30e1\u30c3\u30bb\u30fc\u30b8\u300c\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u306e\u9001\u4fe1\u304c\u5b8c\u4e86\u3057\u307e\u3057\u305f\uff01\u300d\u304c\u8868\u793a\u3055\u308c\u3070\u5b8c\u6210\u3067\u3059\u3002<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-3671\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/04\/040221_1557_9.png\" alt=\"\" width=\"272\" height=\"152\" \/><\/p>\n<p>\u4e88\u5b9a\u7528\u3078\u5909\u66f4\u5f8c\u306e\u4f1a\u8b70\u30b9\u30b1\u30b8\u30e5\u30fc\u30eb\u306b\u306a\u308a\u307e\u3057\u305f\u306d\u3002<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-3665\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/04\/040221_1557_3.png\" alt=\"\" width=\"1180\" height=\"774\" \/><\/p>\n<p>\u4f1a\u8b70\u5909\u66f4\u901a\u77e5\u3082\u9001\u4fe1\u3055\u308c\u3066\u3044\u307e\u3059\u306d\u3002<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-3669\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/04\/040221_1557_7.png\" alt=\"\" width=\"812\" height=\"225\" \/><\/p>\n<p>&nbsp;<\/p>\n<p><script><\/p>\n<p><\/script><\/p>\n<h2><span class=\"ez-toc-section\" id=\"%E4%BB%8A%E5%9B%9E%E3%81%AEVBA%E3%81%AB%E3%81%A4%E3%81%84%E3%81%A6%E8%AA%AC%E6%98%8E\"><\/span>\u4eca\u56de\u306eVBA\u306b\u3064\u3044\u3066\u8aac\u660e<span class=\"ez-toc-section-end\"><\/span><\/h2>\n<p>\u5bfe\u8c61\u671f\u9593\u3092\u8a2d\u3051\u3001\u671f\u9593\u3092\u7d5e\u308b\u3053\u3068\u306b\u3088\u308a\u30c1\u30a7\u30c3\u30af\u5bfe\u8c61\u306e\u4ef6\u6570\u304c\u5c11\u306a\u304f\u306a\u308b\u306e\u3067\u51e6\u7406\u6642\u9593\u3092\u77ed\u304f\u3059\u308b\u3053\u3068\u304c\u3067\u304d\u307e\u3057\u305f\u3002<br \/>\n\u30b5\u30f3\u30d7\u30eb\u3067\u306f\u62bd\u51fa\u671f\u9593\u309212\u304b\u6708\u306b\u3057\u3066\u3044\u307e\u3059\u3002<\/p>\n<div class=\"info\">intKikan = 12<\/div>\n<p>\u62bd\u51fa\u3059\u308b\u30b9\u30b1\u30b8\u30e5\u30fc\u30eb\u306e\u958b\u59cb\u65e5\u3092\u6307\u5b9a\u3057\u307e\u3059\u3002<\/p>\n<div class=\"info\">strStart = Format(DateAdd(\u201cm\u201d, -intKikan, Date), \u201cyyyy\/mm\/dd\u201d)<\/div>\n<p>\u62bd\u51fa\u3059\u308b\u30b9\u30b1\u30b8\u30e5\u30fc\u30eb\u306e\u7d42\u4e86\u65e5\u3092\u6307\u5b9a\u3057\u307e\u3059\u3002<\/p>\n<div class=\"info\">strEnd = Format(DateAdd(\u201cm\u201d, intKikan, Date), \u201cyyyy\/mm\/dd\u201d)<\/div>\n<p>\u53d6\u5f97\u3057\u305fOutlook\u30aa\u30d6\u30b8\u30a7\u30af\u30c8\u3092\u53d6\u5f97\u3057\u307e\u3059\u3002<\/p>\n<div class=\"info\">Set olApp = New Outlook.Application<br \/>\nSet olNamespace = olApp.GetNamespace(\u201cMAPI\u201d)<\/div>\n<p>\u4e88\u5b9a\u8868\u306e\u30ea\u30b9\u30c8\u306folFolderCalendar\u3068\u3044\u3046\u30e1\u30f3\u30d0\u30fc\u306b\u683c\u7d0d\u3055\u308c\u3066\u3044\u307e\u3059\u306e\u3067\u305d\u308c\u3092\u6307\u5b9a\u3057\u3066\u3044\u307e\u3059\u3002<\/p>\n<div class=\"info\">Set olFolder = olNamespace.GetDefaultFolder(olFolderCalendar)<\/div>\n<p>ExcelI\u5217\u306eEntryID\u3068\u767b\u9332\u3055\u308c\u3066\u3044\u308bEntryID\u304c\u4e00\u81f4\u3057\u3066\u3044\u305f\u3089\u8a72\u5f53\u4e88\u5b9a\u8868\u3092\u66f4\u65b0\u3057\u307e\u3059\u3002<\/p>\n<div class=\"info\">If olItemBefor.EntryID = Cells(i, 9) Then<\/div>\n<p>\u767b\u9332\u3055\u308c\u3066\u3044\u308b\u4e88\u5b9a\u8868\u306e\u4ef6\u540d\u3068\u958b\u59cb\u65e5\u6642\u53ca\u3073\u7d42\u4e86\u65e5\u6642\u304c\u4e00\u81f4\u3057\u3066\u3044\u306a\u304b\u3063\u305f\u5834\u5408\u306e\u307f\u66f4\u65b0\u3057\u307e\u3059\u3002<br \/>\n\u203b\u66f4\u65b0\u306e\u6761\u4ef6\u306f\u3054\u90fd\u5408\u306b\u5fdc\u3058\u3066\u5909\u66f4\u3057\u3066\u304f\u3060\u3055\u3044\u3002\u3053\u306e\u6761\u4ef6\u304c\u7121\u3044\u5834\u5408\u306fExcel\u306e\u4e88\u5b9a\u8868\u3059\u3079\u3066\u66f4\u65b0\u3055\u308c\u307e\u3059\u306e\u3067\u3001\u3054\u6ce8\u610f\u304f\u3060\u3055\u3044\u3002<\/p>\n<div class=\"info\">If olItemBefor.Subject = olItem.Subject And olItemBefor.Start = olItem.Start And olItemBefor.End = olItem.End Then<\/div>\n<p>\u5b9a\u671f\u7684\u306a\u4e88\u5b9a\u3067\u306a\u3044\u5834\u5408\u5909\u66f4\u3057\u307e\u3059\u3002<\/p>\n<div class=\"info\">If Cells(i, 10) = \u201cFalse\u201d Then<\/div>\n<p>Excel\u5074\u306e\u5024\u3092\u8aad\u307f\u8fbc\u307f\u3001\u4e88\u5b9a\u30aa\u30d6\u30b8\u30a7\u30af\u30c8\u306b\u30bb\u30c3\u30c8\u3057\u307e\u3059\u3002<\/p>\n<div class=\"info\">.Subject = Cells(i, 1)<br \/>\n.Location = Cells(i, 2)<br \/>\n.Start = Format(Cells(i, 3), &#8220;yyyy\/mm\/dd hh:mm:ss&#8221;)<br \/>\n.End = Format(Cells(i, 4), &#8220;yyyy\/mm\/dd hh:mm:ss&#8221;)<br \/>\n.Body = Cells(i, 5)<br \/>\n.RequiredAttendees = Cells(i, 7)<br \/>\n.OptionalAttendees = Cells(i, 8)<br \/>\n.Recipients.ResolveAll<\/div>\n<p>\u4e88\u5b9a\u3092 &#8220;\u4f1a\u8b70&#8221; \u306b\u8a2d\u5b9a\u3057\u307e\u3059\u3002\u300colMeeting\u300d\u3067\u3082OK\u3067\u3059\u3002<\/p>\n<div class=\"info\">.MeetingStatus = 1<\/div>\n<p>OlMeetingStatus\u30d7\u30ed\u30d1\u30c6\u30a3\u306e\u5024\u306e\u8a73\u7d30\u306f\u4ee5\u4e0b\u306e\u901a\u308a\u3067\u3059\u3002<\/p>\n<table>\n<tbody>\n<tr>\n<th><span data-stu-id=\"c61ba-105\">Name<\/span><\/th>\n<th><span data-stu-id=\"c61ba-106\">Value<\/span><\/th>\n<th><span data-stu-id=\"c61ba-107\">Description<\/span><\/th>\n<\/tr>\n<tr>\n<td><span data-stu-id=\"c61ba-108\">olMeeting<\/span><\/td>\n<td><span data-stu-id=\"c61ba-109\">1<\/span><\/td>\n<td><span data-ttu-id=\"c61ba-110\">\u4e88\u5b9a\u304c\u7d44\u307e\u308c\u305f\u72b6\u614b\u3002<\/span><\/td>\n<\/tr>\n<tr>\n<td><span data-stu-id=\"c61ba-111\">olMeetingCanceled<\/span><\/td>\n<td><span data-stu-id=\"c61ba-112\">5<\/span><\/td>\n<td><span data-ttu-id=\"c61ba-113\">\u4e88\u5b9a\u304c\u53d6\u308a\u6d88\u3055\u308c\u305f\u72b6\u614b\u3002<\/span><\/td>\n<\/tr>\n<tr>\n<td><span data-stu-id=\"c61ba-114\">olMeetingReceived<\/span><\/td>\n<td><span data-stu-id=\"c61ba-115\">3<\/span><\/td>\n<td><span data-ttu-id=\"c61ba-116\">\u53c2\u52a0\u8981\u8acb\u304c\u53d7\u4fe1\u3055\u308c\u305f\u72b6\u614b\u3002<\/span><\/td>\n<\/tr>\n<tr>\n<td><span data-stu-id=\"c61ba-117\">olMeetingReceivedAndCanceled<\/span><\/td>\n<td><span data-stu-id=\"c61ba-118\">7<\/span><\/td>\n<td><span data-ttu-id=\"c61ba-119\">\u4e88\u5b9a\u3055\u308c\u3066\u3044\u305f\u4f1a\u8b70\u304c\u53d6\u308a\u6d88\u3055\u308c\u305f\u304c\u3001\u30e6\u30fc\u30b6\u30fc\u306e\u4e88\u5b9a\u8868\u306b\u306f\u307e\u3060\u8868\u793a\u3055\u308c\u3066\u3044\u308b\u72b6\u614b\u3002<\/span><\/td>\n<\/tr>\n<tr>\n<td><span data-stu-id=\"c61ba-120\">olNonMeeting<\/span><\/td>\n<td><span data-stu-id=\"c61ba-121\">0<\/span><\/td>\n<td><span data-ttu-id=\"c61ba-122\">\u53c2\u52a0\u8005\u306a\u3057\u3067\u4e88\u5b9a\u304c\u7d44\u307e\u308c\u305f\u72b6\u614b\u3002?\u4e88\u5b9a\u8868\u306b\u4f11\u65e5\u3092\u8a2d\u5b9a\u3059\u308b\u969b\u3001\u3053\u306e\u72b6\u614b\u304c\u751f\u3058\u308b\u3053\u3068\u304c\u3042\u308a\u307e\u3059\u3002<\/span><\/td>\n<\/tr>\n<\/tbody>\n<\/table>\n<p>\u203b\u53c2\u8003\uff1ahttps:\/\/docs.microsoft.com\/ja-jp\/office\/vba\/api\/outlook.olmeetingstatus<\/p>\n<p><!--\u5439\u304d\u51fa\u3057\u306f\u3058\u307e\u308a--><\/p>\n<div class=\"balloon5\">\n<div class=\"faceicon\">\n<img loading=\"lazy\" decoding=\"async\" src=\"\/wp-content\/uploads\/2020\/11\/taka_kao.gif\" alt=\"\u30bf\u30ab\u30d2\u30ed\" width=\"110\" height=\"110\" \/>\n<div class=\"faceiconfont\">\u30bf\u30ab\u30d2\u30ed<\/div>\n<\/div>\n<div class=\"chatting\">\n<div class=\"says\">\u516c\u5f0f\u30b5\u30a4\u30c8\u306e\u65e5\u672c\u8a9e\u7248\u306f\u6a5f\u68b0\u7ffb\u8a33\u306e\u305b\u3044\u304b\u5024\u304c\u6b63\u3057\u304f\u306a\u3044\u306e\u3067\u82f1\u8a9e\u7248\u3092\u898b\u308b\u3088\u3046\u306b\u3057\u307e\u3057\u3087\u3046\u3002<\/div>\n<\/div>\n<\/div>\n<p><!--\u5439\u304d\u51fa\u3057\u7d42\u308f\u308a--><\/p>\n<p>Send\u30e1\u30bd\u30c3\u30c9\u3067\u30e1\u30fc\u30eb\u9001\u4fe1\u3057\u307e\u3059\u3002<\/p>\n<div class=\"info\">.Send<\/div>\n<p>ExcelI\u5217\u306eEntryID\u3068\u767b\u9332\u3055\u308c\u3066\u3044\u308bEntryID\u304c\u4e00\u81f4\u3057\u3066\u3044\u306a\u304b\u3063\u305f\u3089\u65b0\u898f\u767b\u9332\u3057\u307e\u3059\u3002<\/p>\n<div class=\"info\">If checkFlg &lt;&gt; 1 Then<\/div>\n<p>\u65b0\u898f\u306e\u5834\u5408\u306f\u767a\u884c\u3055\u308c\u305fEntryID\u3092Excel\u30b7\u30fc\u30c8\u306eI\u5217\u3078\u66f8\u304d\u8fbc\u307f\u307e\u3059\u3002<\/p>\n<div class=\"info\">Cells(i, 9) = olItem.EntryID<\/div>\n<p><script><\/p>\n<p><\/script><\/p>\n<h2><span class=\"ez-toc-section\" id=\"%EF%BC%9C%E8%BF%BD%E5%8A%A0%EF%BC%9E%E6%97%A5%E6%9C%AC%E8%AA%9E%E4%BA%A4%E3%81%98%E3%82%8A%E3%81%AEURL%E3%82%92%E6%97%A5%E6%9C%AC%E8%AA%9E%E3%82%82%E5%90%AB%E3%82%80%E5%BD%A2%E3%81%A7%E3%83%8F%E3%82%A4%E3%83%91%E3%83%BC%E3%83%AA%E3%83%B3%E3%82%AF%E3%82%92%E4%BB%98%E4%B8%8E%E3%81%99%E3%82%8B%E3%82%88%E3%81%86%E6%A9%9F%E8%83%BD%EF%BC%88URL%E3%82%A8%E3%83%B3%E3%82%B3%E3%83%BC%E3%83%89%E5%87%A6%E7%90%86%EF%BC%89%E8%BF%BD%E5%8A%A0\"><\/span>\uff1c\u8ffd\u52a0\uff1e\u65e5\u672c\u8a9e\u4ea4\u3058\u308a\u306eURL\u3092\u65e5\u672c\u8a9e\u3082\u542b\u3080\u5f62\u3067\u30cf\u30a4\u30d1\u30fc\u30ea\u30f3\u30af\u3092\u4ed8\u4e0e\u3059\u308b\u3088\u3046\u6a5f\u80fd\uff08URL\u30a8\u30f3\u30b3\u30fc\u30c9\u51e6\u7406\uff09\u8ffd\u52a0<span class=\"ez-toc-section-end\"><\/span><\/h2>\n<p>\u65e5\u672c\u8a9e\u4ea4\u3058\u308a\u306eURL\u3092\u5165\u529b\u3059\u308b\u3068\u3001\u4f1a\u8b70\/\u4e88\u5b9a\u30a2\u30a4\u30c6\u30e0\u751f\u6210\u6642\u306b\u30cf\u30a4\u30d1\u30fc\u30ea\u30f3\u30af\u304c\u65e5\u672c\u8a9e\u306e\u624b\u524d\u3067\u5207\u308c\u3066\u3057\u307e\u3046\u554f\u984c\u304c\u3042\u308a\u307e\u3059\u3002<\/p>\n<p>Excel\u306e\u672c\u6587\u6b04\u3078\u65e5\u672c\u8a9e\u4ea4\u3058\u308a\u306eURL\u3092\u5165\u529b\u3057\u307e\u3059\u3002<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-5301\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/09\/091221_1558_temp2.png\" alt=\"\" width=\"345\" height=\"165\" srcset=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/09\/091221_1558_temp2.png 345w, https:\/\/extan.jp\/wp-content\/uploads\/2021\/09\/091221_1558_temp2-300x143.png 300w\" sizes=\"auto, (max-width: 345px) 100vw, 345px\" \/><\/p>\n<p>VBA\u5b9f\u884c\u5f8c\u3001\u4f1a\u8b70\u30a2\u30a4\u30c6\u30e0\u306e\u672c\u6587\u6b04\u306b\u30cf\u30a4\u30d1\u30fc\u30ea\u30f3\u30af\u304c\u5165\u3063\u3066\u3044\u307e\u3059\u304c\u3001\u65e5\u672c\u8a9e\u306e\u624b\u524d\u307e\u3067\u3057\u304b\u8a8d\u8b58\u3055\u308c\u3066\u3044\u307e\u305b\u3093\u3002<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-5300\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/09\/091221_1558_temp1.png\" alt=\"\" width=\"375\" height=\"233\" srcset=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/09\/091221_1558_temp1.png 375w, https:\/\/extan.jp\/wp-content\/uploads\/2021\/09\/091221_1558_temp1-300x186.png 300w\" sizes=\"auto, (max-width: 375px) 100vw, 375px\" \/><\/p>\n<p>Outlook\u306e\u4ed5\u69d8\u3067\u30012\u30d0\u30a4\u30c8\u6587\u5b57\u3092URL\u3068\u8a8d\u8b58\u3057\u306a\u3044\u3053\u3068\u304c\u539f\u56e0\u3067\u3059\u306d\u3002<\/p>\n<p>\u5bfe\u7b56\u3068\u3057\u3066\u306f\u624b\u76f4\u3057\u3059\u308b\u3053\u3068\u304c\u7c21\u5358\u3067\u901f\u3044\u306e\u3067\u3059\u304c\u3001<br \/>\n\u4e88\u5b9a\u3084\u4f1a\u8b70\u3092\u751f\u6210\u3059\u308b\u305f\u3073\u306b\u30cf\u30a4\u30d1\u30fc\u30ea\u30f3\u30af\u3092\u624b\u76f4\u3057\u3059\u308b\u3053\u3068\u306f\u5c11\u3005\u9762\u5012\u3067\u3059\u3002<\/p>\n<p>\u305d\u3053\u3067\u3001Excel\u3067\u5165\u529b\u3057\u305f\u672c\u6587\u306e\u5185\u5bb9\u306bhttps\u59cb\u307e\u308a\u306eURL\u304c\u3042\u308c\u3070URL\u30a8\u30f3\u30b3\u30fc\u30c9\u3092\u3059\u308b\u3088\u3046\u51e6\u7406\u3092\u8ffd\u52a0\u3057\u3001<br \/>\n\u65e5\u672c\u8a9e\u4ea4\u3058\u308a\u3067\u3082\u30cf\u30a4\u30d1\u30fc\u30ea\u30f3\u30af\u304c\u4ed8\u304f\u3088\u3046\u306b\u3057\u3066\u307f\u307e\u3057\u305f\u3002<\/p>\n<p><!--\u5439\u304d\u51fa\u3057\u306f\u3058\u307e\u308a--><\/p>\n<div class=\"balloon5\">\n<div class=\"faceicon\">\n<img loading=\"lazy\" decoding=\"async\" src=\"\/wp-content\/uploads\/2020\/11\/taka_kao.gif\" alt=\"\u30bf\u30ab\u30d2\u30ed\" width=\"110\" height=\"110\" \/>\n<div class=\"faceiconfont\">\u30bf\u30ab\u30d2\u30ed<\/div>\n<\/div>\n<div class=\"chatting\">\n<div class=\"says\">\u306a\u304a\u3001URL\u30a8\u30f3\u30b3\u30fc\u30c9\u6a5f\u80fd\u306fExcel2013\u4ee5\u964d\u306e\u30d0\u30fc\u30b8\u30e7\u30f3\u304c\u5bfe\u8c61\u3068\u306a\u308a\u307e\u3059\u3053\u3068\u3054\u4e86\u627f\u304f\u3060\u3055\u3044\u3002<\/div>\n<\/div>\n<\/div>\n<p><!--\u5439\u304d\u51fa\u3057\u7d42\u308f\u308a--><\/p>\n<p>\u30b5\u30f3\u30d7\u30eb\u30b3\u30fc\u30c9\u306f\u4ee5\u4e0b\u306e\u901a\u308a\u3067\u3059\u3002<\/p>\n<pre style=\"padding: 0;\"><code class=\"language-visual-basic line-numbers\">Sub Outlook\u304b\u3089\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u9001\u4fe1\u3059\u308b__URL\u30a8\u30f3\u30b3\u30fc\u30c9\u8ffd\u52a0()\n\n    &#039;Outlook\u7528\u306e\u5b9a\u7fa9\n    Dim olApp As Outlook.Application\n    Dim olNamespace As Outlook.Namespace\n    Dim olFolder As Folder\n    Dim olConItems As Outlook.Items\n    Dim olItem  As AppointmentItem\n    Dim checkFlg As Long\n    \n    &#039;\u91cd\u8907\u30c1\u30a7\u30c3\u30af\u30d5\u30e9\u30b0\u521d\u671f\u5024\u8a2d\u5b9a\n    checkFlg = 0\n\n    &#039;Excel\u7528\u306e\u5b9a\u7fa9\n    Dim wbBook As Workbook\n    Dim wsSheet As Worksheet\n    Dim lnContactCount As Long\n    \n    &#039;\u62bd\u51fa\u671f\u9593\u306e\u5b9a\u7fa9\n    Dim strStart As String\n    Dim strEnd As String\n    Dim intKikan As Integer\n    \n    &#039;URL\u30a8\u30f3\u30b3\u30fc\u30c9\u306e\u6761\u4ef6\u3092\u5b9a\u7fa9\u3057\u307e\u3059\u3002\n    &#039;\u300chttp\u300d\u3092\u6307\u5b9a\u3002\u300chttp\u300d\u3084\u300chttps\u300d\u306b\u8a72\u5f53\u3002\n    Const myHyperlink = &quot;http&quot;\n    Dim objApp As New Excel.Application\n    Dim arrUrlLists As Variant\n    Dim strURL As Variant\n    \n    \n    &#039;\u5bfe\u8c61\u4e88\u5b9a\u8868\u306e\u62bd\u51fa\u671f\u9593\u3092\u6708\u5358\u4f4d\u3067\u6307\u5b9a\u3057\u307e\u3059\u3002\n    &#039;\u203b\u62bd\u51fa\u671f\u9593\u304c\u77ed\u3044\u3068\u4e88\u5b9a\u30a2\u30a4\u30c6\u30e0\u306e\u30c1\u30a7\u30c3\u30af\u304c\u3067\u304d\u305a\u767b\u9332\u3067\u304d\u306a\u3044\u5834\u5408\u304c\u3042\u308a\u307e\u3059\u306e\u3067\u6ce8\u610f\u3057\u3066\u304f\u3060\u3055\u3044\uff61\n    intKikan = 12  &#039;\u62bd\u51fa\u671f\u9593\u309212\u304b\u6708\u306b\u3057\u3066\u3044\u307e\u3059\u3002\n    \n    strStart = Format(DateAdd(&quot;m&quot;, -intKikan, Date), &quot;yyyy\/mm\/dd&quot;) &#039;\u62bd\u51fa\u3059\u308b\u30b9\u30b1\u30b8\u30e5\u30fc\u30eb\u306e\u958b\u59cb\u65e5\u3092\u6307\u5b9a\n    strEnd = Format(DateAdd(&quot;m&quot;, intKikan, Date), &quot;yyyy\/mm\/dd&quot;) &#039;\u62bd\u51fa\u3059\u308b\u30b9\u30b1\u30b8\u30e5\u30fc\u30eb\u306e\u7d42\u4e86\u65e5\u3092\u6307\u5b9a\n    \n    \n    &#039;\u30b9\u30af\u30ea\u30fc\u30f3\u306e\u66f4\u65b0\u306f\u884c\u308f\u308c\u307e\u305b\u3093\u3002\n    Application.ScreenUpdating = False\n    \n    &#039;Excel\u306e\u30d6\u30c3\u30af\u3068\u30ef\u30fc\u30af\u30b7\u30fc\u30c8\u306e\u30aa\u30d6\u30b8\u30a7\u30af\u30c8\u3092\u8a2d\u5b9a\u3057\u307e\u3059\u3002\n    Set wbBook = ThisWorkbook\n    Set wsSheet = wbBook.Worksheets(1)\n    \n    wsSheet.Activate\n    \n    &#039;Outlook\u30aa\u30d6\u30b8\u30a7\u30af\u30c8\u3092\u8a2d\u5b9a\u3057\u3001MAPI\u540d\u524d\u7a7a\u9593\u3092\u4ecb\u3057\u3066Outlook\u306e\u4e88\u5b9a\u8868\u3092\u53d6\u5f97\u3057\u307e\u3059\u3002\n    Set olApp = New Outlook.Application\n    Set olNamespace = olApp.GetNamespace(&quot;MAPI&quot;)\n    Set olFolder = olNamespace.GetDefaultFolder(olFolderCalendar)\n    Set olConItems = olFolder.Items\n\n    &#039;Restrict\u30e1\u30bd\u30c3\u30c9\u3067\u671f\u9593\u6307\u5b9a\u3057\u3066\u62bd\u51fa\u3059\u308b\u30e1\u30fc\u30eb\u30a2\u30a4\u30c6\u30e0\u3092\u7d5e\u308a\u8fbc\u307f\u307e\u3059\u3002\n    Set olConItems = olConItems.Restrict(&quot;[Start] &gt;= &#039;&quot; &amp; strStart &amp; &quot;&#039; And [End] &lt; &#039;&quot; &amp; strEnd &amp; &quot;&#039;&quot;)\n\n\n    &#039;\u53d6\u5f97\u7d50\u679c\u3092\u8a18\u8ff0\u3059\u308b\u884c\u756a\u53f7\u3092\u6307\u5b9a\u3057\u307e\u3059\u30022\u884c\u76ee\u306e\u30bb\u30eb\u304b\u3089\u958b\u59cb\u3055\u308c\u308b\u3053\u3068\u306b\u306a\u308a\u307e\u3059\u3002\n    lnContactCount = 2\n\n    Dim rc As Integer\n    rc = MsgBox(&quot;\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u9001\u4fe1\u3057\u307e\u3059\u304b\uff1f&quot;, vbYesNo + vbQuestion, &quot;\u78ba\u8a8d&quot;)\n    \n    If rc = vbYes Then\n    \n        &#039;\u4e88\u5b9a\u8868\u4e00\u89a7\u306e\u4ef6\u6570\u5206\u7e70\u308a\u8fd4\u3057\u307e\u3059\u3002\n        For i = lnContactCount To Cells(1, 1).End(xlDown).Row\n            Set olItem = olApp.CreateItem(olAppointmentItem)\n            \n            \n            &#039;\u672c\u6587\u306eURL\u30a8\u30f3\u30b3\u30fc\u30c9\u51e6\u7406---\u3053\u3053\u304b\u3089\n            arrUrlLists = Split(Cells(i, 5), vbLf)\n            \n            For Each strURL In arrUrlLists\n            \n                If InStr(strURL, myHyperlink) Then\n                \n                    &#039;\u4e00\u6587\u5b57\u3065\u3064\u53d6\u308a\u51fa\u3057\u3001\u534a\u89d2\u8a18\u53f7\u4ee5\u5916\u3092\u30a8\u30f3\u30b3\u30fc\u30c9\u3059\u308b\n                    For k = 1 To Len(strURL)\n                        strMoji = Mid(strURL, k, 1)\n                        If strMoji Like &quot;[ -\/:-@\\[-~]&quot; Then\n                        &#039;If strMoji Like &quot;[\u3041-\u3093\u30a1-\u30f4\u30fc\u4e9c-\u7199\u4e00-\u9fa0\u3005]&quot; Then\n                           strMojiTemp = strMojiTemp &amp; strMoji\n                        Else\n                            strMojiTemp = strMojiTemp &amp; objApp.WorksheetFunction.EncodeURL(strMoji)\n                        End If\n                    Next\n        \n                    &#039;\u30a8\u30f3\u30b3\u30fc\u30c9\u5f8c\u306e\u6587\u5b57\u5217\u3092\u7d50\u5408\u3059\u308b\n                    strBody = strBody &amp; vbCr &amp; strMojiTemp\n                    \n                Else\n                    strBody = strBody &amp; vbCr &amp; strURL\n                \n                End If\n            Next\n            &#039;\u672c\u6587\u306eURL\u30a8\u30f3\u30b3\u30fc\u30c9\u51e6\u7406----\u3053\u3053\u307e\u3067\n            \n            \n            \n            &#039;\u91cd\u8907\u30c1\u30a7\u30c3\u30af\uff06\u66f4\u65b0\u51e6\u7406\n            For Each olItemBefor In olConItems\n                If TypeName(olItemBefor) = &quot;AppointmentItem&quot; Then\n                \n                    &#039;ExcelI\u5217\u306eEntryID\u3068\u767b\u9332\u3055\u308c\u3066\u3044\u308bEntryID\u304c\u4e00\u81f4\u3057\u3066\u3044\u305f\u3089\u8a72\u5f53\u4e88\u5b9a\u8868\u3092\u66f4\u65b0\u3057\u307e\u3059\u3002\n                    If olItemBefor.EntryID = Cells(i, 9) Then\n                    \n                        &#039;\u6bd4\u8f03\u7528\u306b\u4e00\u6642\u7684\u306b\u4f5c\u6210\n                        With olItem\n                            .Subject = Cells(i, 1)\n                            .Start = Format(Cells(i, 3), &quot;yyyy\/mm\/dd hh:mm:ss&quot;)\n                            .End = Format(Cells(i, 4), &quot;yyyy\/mm\/dd hh:mm:ss&quot;)\n                        End With\n    \n                    \n                        &#039;\u91cd\u8907\u30d5\u30e9\u30b01\u3092\u30bb\u30c3\u30c8\n                         checkFlg = 1\n                    \n                        &#039;\u767b\u9332\u3055\u308c\u3066\u3044\u308b\u4e88\u5b9a\u8868\u306e\u4ef6\u540d\u3068\u958b\u59cb\u65e5\u6642\u53ca\u3073\u7d42\u4e86\u65e5\u6642\u304c\u4e00\u81f4\u3057\u3066\u3044\u306a\u304b\u3063\u305f\u5834\u5408\u306e\u307f\u66f4\u65b0\u3057\u307e\u3059\u3002\n                        &#039;\u203b\u66f4\u65b0\u306e\u6761\u4ef6\u306f\u3054\u90fd\u5408\u306b\u5fdc\u3058\u3066\u5909\u66f4\u3057\u3066\u304f\u3060\u3055\u3044\u3002\u3053\u306e\u6761\u4ef6\u304c\u7121\u3044\u5834\u5408\u306fExcel\u306e\u4e88\u5b9a\u8868\u3059\u3079\u3066\u66f4\u65b0\u3055\u308c\u307e\u3059\u306e\u3067\u3001\u3054\u6ce8\u610f\u304f\u3060\u3055\u3044\u3002\n                        If olItemBefor.Subject = olItem.Subject And olItemBefor.Start = olItem.Start And olItemBefor.End = olItem.End Then\n    \n    \n                        Else\n\n                            &#039;\u5b9a\u671f\u30a2\u30a4\u30c6\u30e0\u306f\u9664\u5916\u3057\u307e\u3059\u3002\n                            If Cells(i, 10) &lt;&gt; &quot;True&quot; Then\n                                 With olItemBefor\n                                    .Subject = Cells(i, 1)\n                                    .Location = Cells(i, 2)\n                                    .Start = Format(Cells(i, 3), &quot;yyyy\/mm\/dd hh:mm:ss&quot;)\n                                    .End = Format(Cells(i, 4), &quot;yyyy\/mm\/dd hh:mm:ss&quot;)\n                                    .BodyFormat = &quot;olFormatHTML&quot;\n                                    .Body = strBody\n                                    .RequiredAttendees = Cells(i, 7)\n                                    .OptionalAttendees = Cells(i, 8)\n                                    .Recipients.ResolveAll\n                                    \n                                    .MeetingStatus = 1  &#039;\u4e88\u5b9a\u3092 &quot;\u4f1a\u8b70&quot; \u306b\u8a2d\u5b9a\u3000\u203b\u300colMeeting\u300d\u3067\u3082OK\n                                    .Send  &#039;\u9001\u4fe1\n                                End With\n                            End If\n                        End If\n                        \n                        &#039;Null out the variables.\n                        Set olItem = Nothing\n                        \n                    End If\n                End If\n            Next\n            &#039;EntryID\u304c\u7a7a\u304b\u3064\u3001\u958b\u59cb\u65e5\u6642\u304c\u7a7a\u3067\u306a\u3044\u5834\u5408\u306e\u307f\u65b0\u898f\u767b\u9332\u3057\u307e\u3059\u3002\n            If checkFlg &lt;&gt; 1 And Cells(i, 9) = &quot;&quot; And Cells(i, 3).Text &lt;&gt; &quot;&quot; Then\n                With olItem\n                    .Subject = Cells(i, 1)\n                    .Location = Cells(i, 2)\n                    .Start = Format(Cells(i, 3), &quot;yyyy\/mm\/dd hh:mm:ss&quot;)\n                    .End = Format(Cells(i, 4), &quot;yyyy\/mm\/dd hh:mm:ss&quot;)\n                    .Body = strBody\n                    .RequiredAttendees = Cells(i, 7)\n                    .OptionalAttendees = Cells(i, 8)\n                    .Recipients.ResolveAll\n                    .MeetingStatus = 1\n                    .Send\n\n               End With\n               \n\n    \n               &#039;ExcelI\u5217\u3078\u767a\u884c\u3055\u308c\u305fEntryID\u3092\u66f8\u304d\u8fbc\u307f\u3092\u3057\u307e\u3059\u3002\n               Cells(i, 9) = olItem.EntryID\n               \n               &#039;ExcelF\u5217\u3078\u4e88\u7d04\u8005\u3092\u66f8\u304d\u8fbc\u307f\u3092\u3057\u307e\u3059\u3002\n               Cells(i, 6) = olItem.Organizer\n\n               \n            End If\n    \n        \n        &#039;\u91cd\u8907\u30d5\u30e9\u30b0\u30ea\u30bb\u30c3\u30c8\n        checkFlg = 0\n    \n    Next\n    \n    Else\n        MsgBox &quot;\u51e6\u7406\u3092\u4e2d\u65ad\u3057\u307e\u3059&quot;\n    End If\n    \n    &#039;Null out the variables.\n    Set olItem = Nothing\n    Set olApp = Nothing\n    Set wbBook = Nothing\n    Set wsSheet = Nothing\n    Set olNamespace = Nothing\n    Set olFolder = Nothing\n    Set olConItems = Nothing\n    \n    \n\n    &#039;Turn screen updating back on.\n    Application.ScreenUpdating = True\n    \n    MsgBox &quot;\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u306e\u9001\u4fe1\u304c\u5b8c\u4e86\u3057\u307e\u3057\u305f\uff01&quot;, vbInformation\n    \nEnd Sub<\/code><\/pre>\n<p>\u65e5\u672c\u8a9e\u6df7\u5408\u306eURL\u3092\u5165\u529b\u3057\u3001VBA\u3092\u5b9f\u884c\u3057\u3066\u307f\u307e\u3059\u3002<\/p>\n<p>\u306f\u3044\u3001\u65e5\u672c\u8a9e\u306e\u90e8\u5206\u304c\u30a8\u30f3\u30b3\u30fc\u30c9\u3055\u308c\u3001\u30cf\u30a4\u30d1\u30fc\u30ea\u30f3\u30af\u304c\u6587\u5b57\u5217\u306e\u6700\u5f8c\u307e\u3067\u3064\u304d\u307e\u3057\u305f\u306d\uff01<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-5302\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/09\/091221_1558_temp3.png\" alt=\"\" width=\"493\" height=\"219\" srcset=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/09\/091221_1558_temp3.png 493w, https:\/\/extan.jp\/wp-content\/uploads\/2021\/09\/091221_1558_temp3-300x133.png 300w\" sizes=\"auto, (max-width: 493px) 100vw, 493px\" \/><\/p>\n<p>\u30ea\u30f3\u30af\u3092\u30af\u30ea\u30c3\u30af\u3057\u3066\u307f\u307e\u3057\u3087\u3046\u3002<\/p>\n<p>\u306f\u3044\u3001\u300c\u65e5\u672c\u8a9e\u300d\u3068\u8868\u793a\u3055\u308c\u3066\u3044\u307e\u3059\u306d\uff01<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-5303\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/09\/091221_1558_temp4.png\" alt=\"\" width=\"448\" height=\"330\" srcset=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/09\/091221_1558_temp4.png 448w, https:\/\/extan.jp\/wp-content\/uploads\/2021\/09\/091221_1558_temp4-300x221.png 300w\" sizes=\"auto, (max-width: 448px) 100vw, 448px\" \/><\/p>\n<p><!--\u5439\u304d\u51fa\u3057\u306f\u3058\u307e\u308a--><\/p>\n<div class=\"balloon5\">\n<div class=\"faceicon\">\n<img loading=\"lazy\" decoding=\"async\" src=\"\/wp-content\/uploads\/2020\/11\/taka_kao.gif\" alt=\"\u30bf\u30ab\u30d2\u30ed\" width=\"110\" height=\"110\" \/>\n<div class=\"faceiconfont\">\u30bf\u30ab\u30d2\u30ed<\/div>\n<\/div>\n<div class=\"chatting\">\n<div class=\"says\">http\u3092\u542b\u3080\u884c\u5168\u4f53\u304c\u30cf\u30a4\u30d1\u30fc\u30ea\u30f3\u30af\u3068\u306a\u308a\u307e\u3059\u306e\u3067\u3001\u30cf\u30a4\u30d1\u30fc\u30ea\u30f3\u30af\u90e8\u5206\u306e\u6587\u5b57\u5217\u3068\u6587\u7ae0\u306e\u6587\u5b57\u5217\u3092\u6539\u884c\u3067\u308f\u3051\u308b\u3088\u3046\u304a\u9858\u3044\u3057\u307e\u3059\u3002<\/div>\n<\/div>\n<\/div>\n<p><!--\u5439\u304d\u51fa\u3057\u7d42\u308f\u308a--><\/p>\n<h2><span class=\"ez-toc-section\" id=\"%EF%BC%9C%E8%BF%BD%E5%8A%A0%EF%BC%9EExcel%E3%81%8B%E3%82%89%E7%99%BB%E9%8C%B2%E6%B8%88%E3%81%BF%E4%BC%9A%E8%AD%B0%E3%81%AE%E3%82%AD%E3%83%A3%E3%83%B3%E3%82%BB%E3%83%AB%E9%80%9A%E7%9F%A5%E3%82%92%E3%81%99%E3%82%8B\"><\/span>\uff1c\u8ffd\u52a0\uff1eExcel\u304b\u3089\u767b\u9332\u6e08\u307f\u4f1a\u8b70\u306e\u30ad\u30e3\u30f3\u30bb\u30eb\u901a\u77e5\u3092\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h2>\n<p>Excel\u304b\u3089\u4f1a\u8b70\u306e\u30ad\u30e3\u30f3\u30bb\u30eb\u901a\u77e5\u3092\u51fa\u3059\u65b9\u6cd5\u306b\u3064\u3044\u3066\u8aac\u660e\u3092\u3057\u307e\u3059\u3002<\/p>\n<p>Excel\u306eK\u5217\u306b\u30ad\u30e3\u30f3\u30bb\u30eb\u306e\u9805\u76ee\u3092\u4f5c\u6210\u3057\u307e\u3059\u3002<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-6725\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/12\/121921_1342_1.png\" alt=\"\" width=\"1229\" height=\"160\" srcset=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/12\/121921_1342_1.png 1229w, https:\/\/extan.jp\/wp-content\/uploads\/2021\/12\/121921_1342_1-300x39.png 300w, https:\/\/extan.jp\/wp-content\/uploads\/2021\/12\/121921_1342_1-1024x133.png 1024w, https:\/\/extan.jp\/wp-content\/uploads\/2021\/12\/121921_1342_1-768x100.png 768w, https:\/\/extan.jp\/wp-content\/uploads\/2021\/12\/121921_1342_1-718x93.png 718w\" sizes=\"auto, (max-width: 1229px) 100vw, 1229px\" \/><\/p>\n<p>\u3053\u3053\u306b\u30d5\u30e9\u30b0\u300cTrue\u300d\u3092\u5165\u308c\u308b\u3068\u8a72\u5f53\u3059\u308b\u4f1a\u8b70\u306e\u30ad\u30e3\u30f3\u30bb\u30eb\u901a\u77e5\u304c\u3055\u308c\u308b\u4ed5\u69d8\u3068\u3057\u307e\u3059\u3002<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-6726\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/12\/121921_1342_2.png\" alt=\"\" width=\"319\" height=\"163\" srcset=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/12\/121921_1342_2.png 319w, https:\/\/extan.jp\/wp-content\/uploads\/2021\/12\/121921_1342_2-300x153.png 300w\" sizes=\"auto, (max-width: 319px) 100vw, 319px\" \/><\/p>\n<h3><span class=\"ez-toc-section\" id=\"VBA%E3%82%92%E5%AE%9F%E8%A3%85%E3%81%99%E3%82%8B-2\"><\/span>VBA\u3092\u5b9f\u88c5\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n<p>\u30b5\u30f3\u30d7\u30eb\u30b3\u30fc\u30c9\u306f\u4ee5\u4e0b\u306e\u901a\u308a\u3067\u3059\u3002<\/p>\n<pre style=\"padding: 0;\"><code class=\"language-visual-basic line-numbers\">Sub Outlook\u304b\u3089\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u9001\u4fe1\u3059\u308b_\u30ad\u30e3\u30f3\u30bb\u30eb\u901a\u77e5\u8ffd\u52a0()\n\n    &#039;Outlook\u7528\u306e\u5b9a\u7fa9\n    Dim olApp As Outlook.Application\n    Dim olNamespace As Outlook.Namespace\n    Dim olFolder As Folder\n    Dim olConItems As Outlook.Items\n    Dim olItem  As AppointmentItem\n    Dim checkFlg As Long\n    \n    &#039;\u91cd\u8907\u30c1\u30a7\u30c3\u30af\u30d5\u30e9\u30b0\u521d\u671f\u5024\u8a2d\u5b9a\n    checkFlg = 0\n\n    &#039;Excel\u7528\u306e\u5b9a\u7fa9\n    Dim wbBook As Workbook\n    Dim wsSheet As Worksheet\n    Dim lnContactCount As Long\n    \n    &#039;\u62bd\u51fa\u671f\u9593\u306e\u5b9a\u7fa9\n    Dim strStart As String\n    Dim strEnd As String\n    Dim intKikan As Integer\n    \n    \n    &#039;\u5bfe\u8c61\u4e88\u5b9a\u8868\u306e\u62bd\u51fa\u671f\u9593\u3092\u6708\u5358\u4f4d\u3067\u6307\u5b9a\u3057\u307e\u3059\u3002\n    &#039;\u203b\u62bd\u51fa\u671f\u9593\u304c\u77ed\u3044\u3068\u4e88\u5b9a\u30a2\u30a4\u30c6\u30e0\u306e\u30c1\u30a7\u30c3\u30af\u304c\u3067\u304d\u305a\u767b\u9332\u3067\u304d\u306a\u3044\u5834\u5408\u304c\u3042\u308a\u307e\u3059\u306e\u3067\u6ce8\u610f\u3057\u3066\u304f\u3060\u3055\u3044\uff61\n    intKikan = 12  &#039;\u62bd\u51fa\u671f\u9593\u309212\u304b\u6708\u306b\u3057\u3066\u3044\u307e\u3059\u3002\n    \n    strStart = Format(DateAdd(&quot;m&quot;, -intKikan, Date), &quot;yyyy\/mm\/dd&quot;) &#039;\u62bd\u51fa\u3059\u308b\u30b9\u30b1\u30b8\u30e5\u30fc\u30eb\u306e\u958b\u59cb\u65e5\u3092\u6307\u5b9a\n    strEnd = Format(DateAdd(&quot;m&quot;, intKikan, Date), &quot;yyyy\/mm\/dd&quot;) &#039;\u62bd\u51fa\u3059\u308b\u30b9\u30b1\u30b8\u30e5\u30fc\u30eb\u306e\u7d42\u4e86\u65e5\u3092\u6307\u5b9a\n    \n    \n    &#039;\u30b9\u30af\u30ea\u30fc\u30f3\u306e\u66f4\u65b0\u306f\u884c\u308f\u308c\u307e\u305b\u3093\u3002\n    Application.ScreenUpdating = False\n    \n    &#039;Excel\u306e\u30d6\u30c3\u30af\u3068\u30ef\u30fc\u30af\u30b7\u30fc\u30c8\u306e\u30aa\u30d6\u30b8\u30a7\u30af\u30c8\u3092\u8a2d\u5b9a\u3057\u307e\u3059\u3002\n    Set wbBook = ThisWorkbook\n    Set wsSheet = wbBook.Worksheets(1)\n    \n    wsSheet.Activate\n    \n    &#039;Outlook\u30aa\u30d6\u30b8\u30a7\u30af\u30c8\u3092\u8a2d\u5b9a\u3057\u3001MAPI\u540d\u524d\u7a7a\u9593\u3092\u4ecb\u3057\u3066Outlook\u306e\u4e88\u5b9a\u8868\u3092\u53d6\u5f97\u3057\u307e\u3059\u3002\n    Set olApp = New Outlook.Application\n    Set olNamespace = olApp.GetNamespace(&quot;MAPI&quot;)\n    Set olFolder = olNamespace.GetDefaultFolder(olFolderCalendar)\n    Set olConItems = olFolder.Items\n\n    &#039;Restrict\u30e1\u30bd\u30c3\u30c9\u3067\u671f\u9593\u6307\u5b9a\u3057\u3066\u62bd\u51fa\u3059\u308b\u30e1\u30fc\u30eb\u30a2\u30a4\u30c6\u30e0\u3092\u7d5e\u308a\u8fbc\u307f\u307e\u3059\u3002\n    Set olConItems = olConItems.Restrict(&quot;[Start] &gt;= &#039;&quot; &amp; strStart &amp; &quot;&#039; And [End] &lt; &#039;&quot; &amp; strEnd &amp; &quot;&#039;&quot;)\n\n\n    &#039;\u53d6\u5f97\u7d50\u679c\u3092\u8a18\u8ff0\u3059\u308b\u884c\u756a\u53f7\u3092\u6307\u5b9a\u3057\u307e\u3059\u30022\u884c\u76ee\u306e\u30bb\u30eb\u304b\u3089\u958b\u59cb\u3055\u308c\u308b\u3053\u3068\u306b\u306a\u308a\u307e\u3059\u3002\n    lnContactCount = 2\n\n    Dim rc As Integer\n    rc = MsgBox(&quot;\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u9001\u4fe1\u3057\u307e\u3059\u304b\uff1f&quot;, vbYesNo + vbQuestion, &quot;\u78ba\u8a8d&quot;)\n    \n    If rc = vbYes Then\n    \n        &#039;\u4e88\u5b9a\u8868\u4e00\u89a7\u306e\u4ef6\u6570\u5206\u7e70\u308a\u8fd4\u3057\u307e\u3059\u3002\n        For i = lnContactCount To Cells(1, 1).End(xlDown).Row\n            Set olItem = olApp.CreateItem(olAppointmentItem)\n\n            &#039;\u91cd\u8907\u30c1\u30a7\u30c3\u30af\uff06\u66f4\u65b0\u51e6\u7406\n            For Each olItemBefor In olConItems\n                If TypeName(olItemBefor) = &quot;AppointmentItem&quot; Then\n                \n                    &#039;ExcelI\u5217\u306eEntryID\u3068\u767b\u9332\u3055\u308c\u3066\u3044\u308bEntryID\u304c\u4e00\u81f4\u3057\u3066\u3044\u305f\u3089\u8a72\u5f53\u4e88\u5b9a\u8868\u3092\u66f4\u65b0\u3057\u307e\u3059\u3002\n                    If olItemBefor.EntryID = Cells(i, 9) Then\n                    \n                        &#039;\u6bd4\u8f03\u7528\u306b\u4e00\u6642\u7684\u306b\u4f5c\u6210\n                        With olItem\n                            .Subject = Cells(i, 1)\n                            .Start = Format(Cells(i, 3), &quot;yyyy\/mm\/dd hh:mm:ss&quot;)\n                            .End = Format(Cells(i, 4), &quot;yyyy\/mm\/dd hh:mm:ss&quot;)\n                        End With\n    \n                    \n                        &#039;\u91cd\u8907\u30d5\u30e9\u30b01\u3092\u30bb\u30c3\u30c8\n                         checkFlg = 1\n                    \n                        &#039;\u767b\u9332\u3055\u308c\u3066\u3044\u308b\u4e88\u5b9a\u8868\u306e\u4ef6\u540d\u3068\u958b\u59cb\u65e5\u6642\u53ca\u3073\u7d42\u4e86\u65e5\u6642\u304c\u4e00\u81f4\u3057\u3066\u3044\u306a\u304b\u3063\u305f\u5834\u5408\u306e\u307f\u66f4\u65b0\u3057\u307e\u3059\u3002\n                        &#039;\u203b\u66f4\u65b0\u306e\u6761\u4ef6\u306f\u3054\u90fd\u5408\u306b\u5fdc\u3058\u3066\u5909\u66f4\u3057\u3066\u304f\u3060\u3055\u3044\u3002\u3053\u306e\u6761\u4ef6\u304c\u7121\u3044\u5834\u5408\u306fExcel\u306e\u4e88\u5b9a\u8868\u3059\u3079\u3066\u66f4\u65b0\u3055\u308c\u307e\u3059\u306e\u3067\u3001\u3054\u6ce8\u610f\u304f\u3060\u3055\u3044\u3002\n                        If olItemBefor.Subject = olItem.Subject And olItemBefor.Start = olItem.Start And olItemBefor.End = olItem.End Then\n\n                            &#039;\u30ad\u30e3\u30f3\u30bb\u30eb\u901a\u77e5\u51e6\u7406\u8ffd\u52a0\n                            If Cells(i, 11) Then\n                                 With olItemBefor\n                                    .MeetingStatus = 5  &#039;\u4e88\u5b9a\u3092 &quot;\u30ad\u30e3\u30f3\u30bb\u30eb&quot; \u306b\u8a2d\u5b9a\u3057\u307e\u3059\u3002\u3000\u203b\u300colMeetingCanceled\u300d\u3067\u3082OK\n                                    .Display &#039;\u4f1a\u8b70\u3092\u8868\u793a\u3055\u305b\u307e\u3059\u3002\n                                    .Send &#039;\u4f1a\u8b70\u3092\u9001\u4fe1\u3057\u307e\u3059\u3002\n                                    &#039;.Delete &#039;\u4f1a\u8b70\u30a2\u30a4\u30c6\u30e0\u3092\u524a\u9664\u3057\u307e\u3059\u3002\u6709\u52b9\u5316\u3059\u308b\u5834\u5408\u306f\u30b3\u30e1\u30f3\u30c8\u30a2\u30a6\u30c8\u3092\u5916\u3057\u3066\u304f\u3060\u3055\u3044\u3002\n                                    &#039;Cells(i, 9) = &quot;&quot; &#039;Excel\u306b\u66f8\u304d\u8fbc\u307e\u308c\u305fEntryID\u3092\u524a\u9664\u3057\u307e\u3059\u3002.Delete\u3092\u6709\u52b9\u5316\u3057\u305f\u5834\u5408\u306f\u3053\u3061\u3089\u3082\u6709\u52b9\u5316\u3057\u3066\u304f\u3060\u3055\u3044\u3002\n\n                                End With\n                            End If\n\n                        Else\n\n                            &#039;\u5b9a\u671f\u30a2\u30a4\u30c6\u30e0\u306f\u9664\u5916\u3057\u307e\u3059\u3002\n                            If Not olItemBefor.IsRecurring Then\n                                 With olItemBefor\n                                    .Subject = Cells(i, 1)\n                                    .Location = Cells(i, 2)\n                                    .Start = Format(Cells(i, 3), &quot;yyyy\/mm\/dd hh:mm:ss&quot;)\n                                    .End = Format(Cells(i, 4), &quot;yyyy\/mm\/dd hh:mm:ss&quot;)\n                                    .Body = Cells(i, 5)\n                                    .RequiredAttendees = Cells(i, 7)\n                                    .OptionalAttendees = Cells(i, 8)\n                                    .Recipients.ResolveAll\n\n                                    .MeetingStatus = 1  &#039;\u4e88\u5b9a\u3092 &quot;\u4f1a\u8b70&quot; \u306b\u8a2d\u5b9a\u3000\u203b\u300colMeeting\u300d\u3067\u3082OK\n                                    .Send  &#039;\u9001\u4fe1\n                                End With\n                            End If\n                        End If\n                    End If\n                End If\n            Next\n            &#039;EntryID\u304c\u7a7a\u304b\u3064\u3001\u958b\u59cb\u65e5\u6642\u304c\u7a7a\u3067\u306a\u3044\u5834\u5408\u306e\u307f\u65b0\u898f\u767b\u9332\u3057\u307e\u3059\u3002\n            If checkFlg &lt;&gt; 1 And Cells(i, 9) = &quot;&quot; And Cells(i, 3).Text &lt;&gt; &quot;&quot; Then\n                With olItem\n                    .Subject = Cells(i, 1)\n                    .Location = Cells(i, 2)\n                    .Start = Format(Cells(i, 3), &quot;yyyy\/mm\/dd hh:mm:ss&quot;)\n                    .End = Format(Cells(i, 4), &quot;yyyy\/mm\/dd hh:mm:ss&quot;)\n                    .Body = Cells(i, 5)\n                    .RequiredAttendees = Cells(i, 7)\n                    .OptionalAttendees = Cells(i, 8)\n                    .Recipients.ResolveAll\n                    .MeetingStatus = 1\n                    .Send\n\n               End With\n               \n               &#039;ExcelI\u5217\u3078\u767a\u884c\u3055\u308c\u305fEntryID\u3092\u66f8\u304d\u8fbc\u307f\u3092\u3057\u307e\u3059\u3002\n               Cells(i, 9) = olItem.EntryID\n               \n               &#039;ExcelF\u5217\u3078\u4e88\u7d04\u8005\u3092\u66f8\u304d\u8fbc\u307f\u3092\u3057\u307e\u3059\u3002\n               Cells(i, 6) = olItem.Organizer\n\n               \n            End If\n    \n        &#039;\u91cd\u8907\u30d5\u30e9\u30b0\u30ea\u30bb\u30c3\u30c8\n        checkFlg = 0\n    \n    Next\n    \n    Else\n        MsgBox &quot;\u51e6\u7406\u3092\u4e2d\u65ad\u3057\u307e\u3059&quot;\n    End If\n    \n    &#039;Null out the variables.\n    Set olItem = Nothing\n    Set olApp = Nothing\n    Set wbBook = Nothing\n    Set wsSheet = Nothing\n    Set olNamespace = Nothing\n    Set olFolder = Nothing\n    Set olConItems = Nothing\n\n    &#039;Turn screen updating back on.\n    Application.ScreenUpdating = True\n    \n    MsgBox &quot;\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u306e\u9001\u4fe1\u304c\u5b8c\u4e86\u3057\u307e\u3057\u305f\uff01&quot;, vbInformation\n    \nEnd Sub<\/code><\/pre>\n<h3><span class=\"ez-toc-section\" id=\"%E4%BC%9A%E8%AD%B0%E3%82%92%E6%96%B0%E8%A6%8F%E7%99%BB%E9%8C%B2%E3%81%99%E3%82%8B\"><\/span>\u4f1a\u8b70\u3092\u65b0\u898f\u767b\u9332\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n<p>\u7d9a\u3044\u3066\u30ad\u30e3\u30f3\u30bb\u30eb\u306f\u65e2\u5b58\u306e\u4f1a\u8b70\u4e88\u7d04\u304c\u5bfe\u8c61\u3068\u306a\u308a\u307e\u3059\u306e\u3067\u3001<br \/>\nExcel\u5074\u306e\u4f1a\u8b70\u60c5\u5831\u3092\u5165\u529b\u3057\u7d42\u3048\u305f\u3089VBA\u3092\u5b9f\u884c\u3057\u4f1a\u8b70\u3092\u767b\u9332\/\u9001\u4fe1\u3057\u307e\u3059\u3002<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-6728\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/12\/121921_1342_4.png\" alt=\"\" width=\"250\" height=\"340\" srcset=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/12\/121921_1342_4.png 250w, https:\/\/extan.jp\/wp-content\/uploads\/2021\/12\/121921_1342_4-221x300.png 221w\" sizes=\"auto, (max-width: 250px) 100vw, 250px\" \/><\/p>\n<h3><span class=\"ez-toc-section\" id=\"Excel%E3%81%B8%E3%82%AD%E3%83%A3%E3%83%B3%E3%82%BB%E3%83%AB%E3%83%95%E3%83%A9%E3%82%B0%E3%82%92%E5%85%A5%E5%8A%9B%E3%81%99%E3%82%8B\"><\/span>Excel\u3078\u30ad\u30e3\u30f3\u30bb\u30eb\u30d5\u30e9\u30b0\u3092\u5165\u529b\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n<p>\u6b21\u306b\u30ad\u30e3\u30f3\u30bb\u30eb\u3057\u305f\u3044\u4f1a\u8b70\u60c5\u5831\u304c\u3042\u308b\u884c\u306eK\u5217\u3078\u300cTRUE\u300d\u3068\u5165\u529b\u3057\u307e\u3059\u3002<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-6726\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/12\/121921_1342_2.png\" alt=\"\" width=\"319\" height=\"163\" srcset=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/12\/121921_1342_2.png 319w, https:\/\/extan.jp\/wp-content\/uploads\/2021\/12\/121921_1342_2-300x153.png 300w\" sizes=\"auto, (max-width: 319px) 100vw, 319px\" \/><\/p>\n<h3><span class=\"ez-toc-section\" id=\"VBA%E3%82%92%E5%AE%9F%E8%A1%8C%E3%81%99%E3%82%8B-2\"><\/span>VBA\u3092\u5b9f\u884c\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n<p>VBA\u3092\u5b9f\u884c\u3057\u3066\u307f\u307e\u3057\u3087\u3046\u3002<\/p>\n<p>\u306f\u3044\u3001\u4f1a\u8b70\u304c\u30ad\u30e3\u30f3\u30bb\u30eb\u3055\u308c\u307e\u3057\u305f\u306d\uff01<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-6729\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/12\/121921_1342_5.png\" alt=\"\" width=\"545\" height=\"556\" srcset=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/12\/121921_1342_5.png 545w, https:\/\/extan.jp\/wp-content\/uploads\/2021\/12\/121921_1342_5-294x300.png 294w\" sizes=\"auto, (max-width: 545px) 100vw, 545px\" \/><\/p>\n<p>\u901a\u77e5\u304c\u9001\u4fe1\u3055\u308c\u3066\u3044\u307e\u3059\u306d\u3002<\/p>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-6727\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/12\/121921_1342_3.png\" alt=\"\" width=\"436\" height=\"147\" srcset=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/12\/121921_1342_3.png 436w, https:\/\/extan.jp\/wp-content\/uploads\/2021\/12\/121921_1342_3-300x101.png 300w\" sizes=\"auto, (max-width: 436px) 100vw, 436px\" \/>\n<p>\u8a72\u5f53\u4f1a\u8b70\u304c\u30ad\u30e3\u30f3\u30bb\u30eb\u6271\u3044\u306b\u306a\u308a\u307e\u3057\u305f\u3002<\/p>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-6730\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/12\/121921_1342_6.png\" alt=\"\" width=\"249\" height=\"322\" srcset=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/12\/121921_1342_6.png 249w, https:\/\/extan.jp\/wp-content\/uploads\/2021\/12\/121921_1342_6-232x300.png 232w\" sizes=\"auto, (max-width: 249px) 100vw, 249px\" \/>\n<p>\u307e\u305f\u3001\u30ad\u30e3\u30f3\u30bb\u30eb\u5f8c\u306b\u4f1a\u8b70\u30a2\u30a4\u30c6\u30e0\u81ea\u4f53\u3092\u524a\u9664\u3057\u305f\u3044\u5834\u5408\u306f\u3001<\/p>\n<div class=\"info\"><code>&#039;.Delete &#039;\u4f1a\u8b70\u30a2\u30a4\u30c6\u30e0\u3092\u524a\u9664\u3057\u307e\u3059\u3002<\/code><\/div>\n<p>\u306e\u30b3\u30e1\u30f3\u30c8\u30a2\u30a6\u30c8\u3092\u5916\u3057\u6709\u52b9\u5316\u3057\u307e\u3059\u3002<\/p>\n<p>\u5b9f\u884c\u3057\u3066\u307f\u307e\u3057\u3087\u3046\u3002<\/p>\n<p>\u306f\u3044\u3001\u4f1a\u8b70\u30a2\u30a4\u30c6\u30e0\u304c\u524a\u9664\u3055\u308c\u3066\u3044\u307e\u3059\u306d\u3002<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-6731\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/12\/121921_1342_7.png\" alt=\"\" width=\"249\" height=\"352\" srcset=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/12\/121921_1342_7.png 249w, https:\/\/extan.jp\/wp-content\/uploads\/2021\/12\/121921_1342_7-212x300.png 212w\" sizes=\"auto, (max-width: 249px) 100vw, 249px\" \/><\/p>\n<h3><span class=\"ez-toc-section\" id=\"VBA%E3%81%AE%E8%AA%AC%E6%98%8E\"><\/span>VBA\u306e\u8aac\u660e<span class=\"ez-toc-section-end\"><\/span><\/h3>\n<p>\u30ad\u30e3\u30f3\u30bb\u30eb\u901a\u77e5\u306e\u6a5f\u80fd\u306b\u3064\u3044\u3066\u8aac\u660e\u3092\u3057\u307e\u3059\u3002<\/p>\n<p>Excel\u306e\u30ad\u30e3\u30f3\u30bb\u30eb\u901a\u77e5\u9805\u76ee\u306b\u5024\u304c\u3042\u308b\u304b\u78ba\u8a8d\u3057\u3001\u3042\u308c\u3070\u30ad\u30e3\u30f3\u30bb\u30eb\u901a\u77e5\u51e6\u7406\u3092\u304a\u3053\u306a\u3044\u307e\u3059\u3002<\/p>\n<div class=\"info\"><code>If Cells(i, 11) Then<\/code><\/div>\n<p>\u4e88\u5b9a\u3092 &#8220;\u30ad\u30e3\u30f3\u30bb\u30eb&#8221; \u306b\u8a2d\u5b9a\u3057\u307e\u3059\u3002\u3000\u203b\u300colMeetingCanceled\u300d\u3067\u3082OK\u3067\u3059\u3002<\/p>\n<div class=\"info\"><code>.MeetingStatus = 5 <\/code><\/div>\n<p>\u4f1a\u8b70\u3092\u8868\u793a\u3055\u305b\u307e\u3059\u3002<\/p>\n<div class=\"info\"><code>.Display<\/code><\/div>\n<p>\u4f1a\u8b70\u3092\u9001\u4fe1\u3057\u307e\u3059\u3002<\/p>\n<div class=\"info\"><code>.Send<\/code><\/div>\n<p>\u4f1a\u8b70\u30a2\u30a4\u30c6\u30e0\u3092\u524a\u9664\u3057\u307e\u3059\u3002<\/p>\n<div class=\"info\"><code>.Delete  <\/code><\/div>\n<p>Excel\u306b\u66f8\u304d\u8fbc\u307e\u308c\u305fEntryID\u3092\u524a\u9664\u3057\u307e\u3059\u3002.Delete\u3092\u6709\u52b9\u5316\u3057\u305f\u5834\u5408\u306f\u3053\u3061\u3089\u3082\u6709\u52b9\u5316\u3057\u3066\u304f\u3060\u3055\u3044\u3002<\/p>\n<div class=\"info\"><code>&#039;Cells(i, 9) = &quot;&quot;<\/code><\/div>\n<h2><span class=\"ez-toc-section\" id=\"%EF%BC%9C%E8%BF%BD%E5%8A%A0%EF%BC%9E%E4%BC%9A%E8%AD%B0%E3%81%B8%E3%82%A2%E3%83%A9%E3%83%BC%E3%83%A0%E3%82%92%E8%A8%AD%E5%AE%9A%E3%81%99%E3%82%8B\"><\/span>\uff1c\u8ffd\u52a0\uff1e\u4f1a\u8b70\u3078\u30a2\u30e9\u30fc\u30e0\u3092\u8a2d\u5b9a\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h2>\n<p>\u4f1a\u8b70\u3078\u30a2\u30e9\u30fc\u30e0\u3092\u8a2d\u5b9a\u3059\u308b\u65b9\u6cd5\u306b\u3064\u3044\u3066\u8aac\u660e\u3092\u3057\u307e\u3059\u3002<\/p>\n<p>\u8a2d\u5b9a\u3059\u308b\u30d7\u30ed\u30d1\u30c6\u30a3\u306f\u4ee5\u4e0b\u306e\u901a\u308a\u3067\u3059\u3002<\/p>\n<table>\n<tbody>\n<tr>\n<th>\u30d7\u30ed\u30d1\u30c6\u30a3<\/th>\n<th>\u8aac\u660e<\/th>\n<\/tr>\n<tr>\n<td>ReminderSet<\/td>\n<td>\u30a2\u30e9\u30fc\u30e0\u6709\u7121\u3092True\/False\u3067\u6307\u5b9a<\/td>\n<\/tr>\n<tr>\n<td>ReminderMinutesBeforeStart<\/td>\n<td>\u4f55\u5206\u524d\u306b\u30a2\u30e9\u30fc\u30e0\u3092\u9cf4\u3089\u3059\u30bf\u30a4\u30df\u30f3\u30b0\u3092\u6307\u5b9a\u203b\u5358\u4f4d\u306f\u5206\u306b\u306a\u308a\u307e\u3059\u3002<\/td>\n<\/tr>\n<\/tbody>\n<\/table>\n<p><!--\u5439\u304d\u51fa\u3057\u306f\u3058\u307e\u308a--><\/p>\n<div class=\"balloon5\">\n<div class=\"faceicon\">\n<img loading=\"lazy\" decoding=\"async\" src=\"\/wp-content\/uploads\/2020\/11\/taka_kao.gif\" alt=\"\u30bf\u30ab\u30d2\u30ed\" width=\"110\" height=\"110\" \/>\n<div class=\"faceiconfont\">\u30bf\u30ab\u30d2\u30ed<\/div>\n<\/div>\n<div class=\"chatting\">\n<div class=\"says\">\u30a2\u30e9\u30fc\u30e0\u306e\u6709\u7121\u3068\u4f55\u5206\u524d\u306b\u306a\u3089\u3059\u304b\u306e2\u7a2e\u985e\u306e\u8a2d\u5b9a\u3092\u884c\u3046\u5fc5\u8981\u304c\u3042\u308a\u307e\u3059\u3002<\/div>\n<\/div>\n<\/div>\n<p><!--\u5439\u304d\u51fa\u3057\u7d42\u308f\u308a--><\/p>\n<p>Excel\u306eL\u5217\u306b\u300c\u30a2\u30e9\u30fc\u30e0\u6709\u7121\u300d\u3001M\u5217\u306b\u300c\u30a2\u30e9\u30fc\u30e0\u767a\u751f\u6642\u9593\uff08\u4e88\u5b9a\u6642\u9593\u4f55\u5206\u524d\uff09\u300d\u3092\u8ffd\u52a0\u3057\u5024\u3092\u5165\u529b\u3057\u307e\u3059\u3002<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-6738\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/12\/121921_1524_1.png\" alt=\"\" width=\"500\" height=\"126\" srcset=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/12\/121921_1524_1.png 500w, https:\/\/extan.jp\/wp-content\/uploads\/2021\/12\/121921_1524_1-300x76.png 300w\" sizes=\"auto, (max-width: 500px) 100vw, 500px\" \/><\/p>\n<p><!--\u5439\u304d\u51fa\u3057\u306f\u3058\u307e\u308a--><\/p>\n<div class=\"balloon5\">\n<div class=\"faceicon\">\n<img loading=\"lazy\" decoding=\"async\" src=\"\/wp-content\/uploads\/2020\/11\/taka_kao.gif\" alt=\"\u30bf\u30ab\u30d2\u30ed\" width=\"110\" height=\"110\" \/>\n<div class=\"faceiconfont\">\u30bf\u30ab\u30d2\u30ed<\/div>\n<\/div>\n<div class=\"chatting\">\n<div class=\"says\">\u30b5\u30f3\u30d7\u30eb\u306e\u30a2\u30e9\u30fc\u30e0\u767a\u751f\u6642\u9593\u306e\u5024240\u306f\u5206\u5358\u4f4d\u3067\u3059\u306e\u30674\u6642\u9593\u3092\u6307\u5b9a\u3057\u3066\u3044\u308b\u5f62\u306b\u306a\u308a\u307e\u3059\u3002<\/div>\n<\/div>\n<\/div>\n<p><!--\u5439\u304d\u51fa\u3057\u7d42\u308f\u308a--><\/p>\n<p>olItem\u3001olItemBefor\u30aa\u30d6\u30b8\u30a7\u30af\u30c8\u306e\u30d7\u30ed\u30d1\u30c6\u30a3\u6307\u5b9a\u3078\u4ee5\u4e0b\u3092\u8ffd\u8a18\u3057\u307e\u3059\u3002<\/p>\n<div class=\"info\"><code>                    &#039;\u30a2\u30e9\u30fc\u30e0\u8ffd\u52a0<br \/>\n.ReminderSet = Cells(i, 12) &#039;\u30a2\u30e9\u30fc\u30e0\u6709\u7121\u3092\u6307\u5b9a\u3057\u307e\u3059\u3002<br \/>\n.ReminderMinutesBeforeStart = Cells(i, 13) &#039;\u30a2\u30e9\u30fc\u30e0\u3092\u9cf4\u3089\u3059\u30bf\u30a4\u30df\u30f3\u30b0\u3092\u3057\u3066\u3057\u307e\u3059\u3002<\/code><\/div>\n<p>VBA\u3092\u5b9f\u884c\u3059\u308b\u3068\u3001<\/p>\n<p>\u306f\u3044\u3001\u30a2\u30e9\u30fc\u30e0\u304c\u8a2d\u5b9a\u3055\u308c\u307e\u3057\u305f\u306d\uff01<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-6739\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/12\/121921_1524_2.png\" alt=\"\" width=\"497\" height=\"129\" srcset=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/12\/121921_1524_2.png 497w, https:\/\/extan.jp\/wp-content\/uploads\/2021\/12\/121921_1524_2-300x78.png 300w\" sizes=\"auto, (max-width: 497px) 100vw, 497px\" \/><\/p>\n<p>&nbsp;<\/p>\n<h2><span class=\"ez-toc-section\" id=\"%EF%BC%9C%E8%BF%BD%E5%8A%A0%EF%BC%9E%E4%BB%96%E4%BA%BA%E3%81%AE%E7%A9%BA%E3%81%8D%E6%99%82%E9%96%93%E3%82%92%E3%83%81%E3%82%A7%E3%83%83%E3%82%AF%E3%81%97%E7%A9%BA%E3%81%8D%E3%81%8C%E3%81%AA%E3%81%84%E5%A0%B4%E5%90%88%E3%81%AF%E5%AE%9B%E5%85%88%E3%81%8B%E3%82%89%E9%99%A4%E5%A4%96%E3%81%99%E3%82%8B\"><\/span>\uff1c\u8ffd\u52a0\uff1e\u4ed6\u4eba\u306e\u7a7a\u304d\u6642\u9593\u3092\u30c1\u30a7\u30c3\u30af\u3057\u7a7a\u304d\u304c\u306a\u3044\u5834\u5408\u306f\u5b9b\u5148\u304b\u3089\u9664\u5916\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h2>\n<p>\u4ed6\u4eba\u306e\u7a7a\u304d\u6642\u9593\u3092\u30c1\u30a7\u30c3\u30af\u3057\u7a7a\u304d\u304c\u306a\u3044\u5834\u5408\u306f\u5b9b\u5148\u304b\u3089\u9664\u5916\u3059\u308b\u65b9\u6cd5\u306b\u3064\u3044\u3066\u8aac\u660e\u3092\u3057\u307e\u3059\u3002<\/p>\n<p>\u6a5f\u80fd\u306e\u5185\u5bb9\u306f\u3001\u5fc5\u9808\u51fa\u5e2d\u8005\u306b\u6307\u5b9a\u3057\u305f\u30a2\u30c9\u30ec\u30b9\u3092\u5bfe\u8c61\u306b\u3001\u8a2d\u5b9a\u3057\u305f\u3044\u4f1a\u8b70\u6642\u9593\u5e2f\u306e\u7a7a\u304d\u6642\u9593\u3092\u8abf\u3079\u3001\u4e88\u5b9a\u304c\u7121\u3044\u304b\u3001\u4e88\u5b9a\u304c\u3042\u3063\u3066\u3082\u300c\u4e88\u5b9a\u3042\u308a\u300d\uff08\u5b9a\u65702\uff09\u4ee5\u5916\uff08\u4eee\u306e\u4e88\u5b9a\u306a\u3069\uff09\u306b\u306a\u3063\u3066\u3044\u308c\u3070\u5fc5\u9808\u51fa\u5e2d\u8005\u306e\u30a2\u30c9\u30ec\u30b9\u3068\u3057\u3066\u52a0\u3048\u3001\u4e88\u5b9a\u304c\u3042\u308b\u5834\u5408\u306f\u5fc5\u9808\u51fa\u5e2d\u8005\u306b\u542b\u3081\u306a\u3044\u5185\u5bb9\u3068\u3057\u307e\u3059\u3002<\/p>\n<p><!--\u5439\u304d\u51fa\u3057\u306f\u3058\u307e\u308a--><\/p>\n<div class=\"balloon5\">\n<div class=\"faceicon\">\n<img loading=\"lazy\" decoding=\"async\" src=\"\/wp-content\/uploads\/2020\/11\/taka_kao.gif\" alt=\"\u30bf\u30ab\u30d2\u30ed\" width=\"110\" height=\"110\" \/>\n<div class=\"faceiconfont\">\u30bf\u30ab\u30d2\u30ed<\/div>\n<\/div>\n<div class=\"chatting\">\n<div class=\"says\">\u4eca\u56de\u306eFunction\u30d7\u30ed\u30b7\u30fc\u30b8\u30e3\u4f7f\u7528\u306b\u3042\u305f\u308a\u3001\u7a7a\u304d\u6642\u9593\u53c2\u7167\u5148\u30a2\u30c9\u30ec\u30b9\u306e\u53c2\u7167\u6a29\u9650\u304c\u5fc5\u8981\u306b\u306a\u308a\u307e\u3059\u306e\u3067\u3001\u6a29\u9650\u306e\u8a2d\u5b9a\u3092\u3059\u308b\u3088\u3046\u304a\u9858\u3044\u3044\u305f\u3057\u307e\u3059\u3002<\/div>\n<\/div>\n<\/div>\n<p><!--\u5439\u304d\u51fa\u3057\u7d42\u308f\u308a--><\/p>\n<h3><span class=\"ez-toc-section\" id=\"Function%E3%83%97%E3%83%AD%E3%82%B7%E3%83%BC%E3%82%B8%E3%83%A3\"><\/span>Function\u30d7\u30ed\u30b7\u30fc\u30b8\u30e3<span class=\"ez-toc-section-end\"><\/span><\/h3>\n<p>\u4ed6\u4eba\u306e\u7a7a\u304d\u6642\u9593\u3092\u30c1\u30a7\u30c3\u30af\u3059\u308b\u6a5f\u80fd\u3092Function\u30d7\u30ed\u30b7\u30fc\u30b8\u30e3\u3067\u5b9f\u88c5\u3057\u307e\u3059\u3002<br \/>\n\u30b5\u30f3\u30d7\u30eb\u30b3\u30fc\u30c9\u306f\u4ee5\u4e0b\u306e\u901a\u308a\u3067\u3059\u3002<\/p>\n<pre style=\"padding: 0;\"><code class=\"language-visual-basic line-numbers\">Function \u4ed6\u4eba\u306e\u7a7a\u304d\u6642\u9593\u30c1\u30a7\u30c3\u30af\u3068\u306a\u3044\u5834\u5408\u9664\u5916\u3059\u308b(strAddresses As String, strStart As String, strEnd As String)\n\n    &#039;Outlook\u7528\u306e\u5b9a\u7fa9\n    Dim olApp As Outlook.Application\n    Dim olNamespace As Outlook.Namespace\n    Dim olFolder As Folder\n    Dim olConItems As Outlook.Items\n    Dim olItem  As AppointmentItem\n  \n     \n    &#039;\u4ed6\u4eba\u4e88\u5b9a\u8868\u306e\u5b9a\u7fa9\n    Dim strAddress As Variant\n    Dim recOther As Recipient\n    Dim objAppt As AppointmentItem\n    Dim strFlag As String\n    Dim arrAddress As Variant\n    Dim strTempAddresses As String\n    \n    &#039;\u6587\u5b57\u5217\u3092\u6642\u9593\u306e\u5f62\u5f0f\u306b\u5909\u63db\u3057\u307e\u3059\u3002\n    strStart = Format(strStart, &quot;yyyy\/mm\/dd hh:mm&quot;)\n    strEnd = Format(strEnd, &quot;yyyy\/mm\/dd hh:mm&quot;)\n    \n    &#039;\u4f1a\u8b70\u901a\u77e5\u5148\u30a2\u30c9\u30ec\u30b9\u3092\uff1b\u533a\u5207\u308a\u3067\u5206\u5272\u3057\u914d\u5217\u3078\u683c\u7d0d\u3057\u307e\u3059\u3002\n    arrAddress = Split(strAddresses, &quot;;&quot;)\n    \n    &#039;Outlook\u30aa\u30d6\u30b8\u30a7\u30af\u30c8\u3092\u8a2d\u5b9a\u3057\u3001MAPI\u540d\u524d\u7a7a\u9593\u3092\u4ecb\u3057\u3066Outlook\u306e\u4e88\u5b9a\u8868\u3092\u53d6\u5f97\u3057\u307e\u3059\u3002\n    Set olApp = New Outlook.Application\n    Set olNamespace = olApp.GetNamespace(&quot;MAPI&quot;)\n    \n    &#039;\u30a2\u30c9\u30ec\u30b9\u306e\u4ef6\u6570\u5206\u51e6\u7406\u3092\u7e70\u308a\u8fd4\u3057\u307e\u3059\u3002\n    For Each strAddress In arrAddress\n        Debug.Print strAddress\n        \n        &#039;\u4ed6\u4eba\u306e\u30aa\u30d6\u30b8\u30a7\u30af\u30c8\u3092\u6307\u5b9a\u3057\u53d6\u5f97\u3057\u307e\u3059\u3002\n        Set recOther = olNamespace.CreateRecipient(strAddress)\n    \n        &#039;\u53d6\u5f97\u3057\u305f\u4ed6\u4eba\u306e\u30aa\u30d6\u30b8\u30a7\u30af\u30c8\u306e\u5185\u3001\u4e88\u5b9a\u8868\u306e\u307f\u7d5e\u308a\u8fbc\u307f\u518d\u53d6\u5f97\u3057\u307e\u3059\u3002\n        Set olFolder = olNamespace.GetSharedDefaultFolder(recOther, olFolderCalendar)\n        Set olConItems = olFolder.Items\n\n        &#039;\u958b\u59cb\u65e5\u3067\u30bd\u30fc\u30c8\u3057\u307e\u3059\u3002\n        olConItems.Sort &quot;[Start]&quot;\n        \n        &#039;True\u3067\u5b9a\u671f\u7684\u306a\u4e88\u5b9a\u3092\u542b\u3080\u3088\u3046\u306b\u3057\u307e\u3059\u3002\u203bFalse\u3067\u3042\u308b\u3068\u5b9a\u671f\u7684\u306a\u4e88\u5b9a\u306f\u542b\u307e\u308c\u307e\u305b\u3093\u3002\n        olConItems.IncludeRecurrences = True\n\n    \n        &#039;Find\u30e1\u30bd\u30c3\u30c9\u3067\u671f\u9593\u6307\u5b9a\u3057\u3066\u62bd\u51fa\u3059\u308b\u4e88\u5b9a\u3092\u7d5e\u308a\u8fbc\u3080\n        Set olItem = olConItems.Find(&quot;[Start] &gt;= &quot;&quot;&quot; &amp; strStart &amp; &quot;&quot;&quot; AND [End] &lt;= &quot;&quot;&quot; &amp; strEnd &amp; &quot;&quot;&quot;&quot;) \n        While TypeName(olItem) = &quot;AppointmentItem&quot;\n            Debug.Print olItem.BusyStatus\n            Debug.Print olItem.Subject\n            Debug.Print olItem.Start\n            Debug.Print olItem.End\n\n            &#039;Find\u3067\u691c\u7d22\u3059\u308b\u3068\u671f\u9593\u7bc4\u56f2\u5916\u306e\u4f59\u8a08\u306a\u3082\u306e\u307e\u3067\u30d2\u30c3\u30c8\u3057\u3066\u3057\u307e\u3046\u306e\u3067\u3001\u518d\u5ea6\u30d5\u30a3\u30eb\u30bf\u30ea\u30f3\u30b0\u3057\u307e\u3059\u3002\n            If (olItem.Start &gt;= strStart And olItem.End &lt;= strEnd) Then\n\n                &#039;\u5bfe\u8c61\u671f\u9593\u306e\u4e88\u5b9a\u306e\u30d3\u30b8\u30fc\u72b6\u614b\u4e88\u5b9a\u3042\u308a\u306e\u5834\u5408\u3001\u30c1\u30a7\u30c3\u30af\u30d5\u30e9\u30b0\u306bNG\u3092\u8a2d\u5b9a\u3057\u307e\u3059\u3002\n                If olItem.BusyStatus = 2 Then\n                    strFlag = &quot;NG&quot;\n                End If\n\n            End If\n            \n            &#039;\u6b21\u306e\u691c\u7d22\u3092\u884c\u3044\u307e\u3059\u3002\n            Set olItem = olConItems.FindNext\n        Wend\n    \n        &#039;\u30c1\u30a7\u30c3\u30af\u30d5\u30e9\u30b0\u304c&quot;NG&quot;\u3067\u306a\u3044\u5834\u5408\u306e\u307f\u30a2\u30c9\u30ec\u30b9\u5bfe\u8c61\u30ea\u30b9\u30c8\u306b\u52a0\u3048\u307e\u3059\u3002\n        If strFlag &lt;&gt; &quot;NG&quot; Then\n            strTempAddresses = strTempAddresses &amp; &quot;;&quot; &amp; strAddress\n        End If\n        Debug.Print strFlag\n        &#039;\u30c1\u30a7\u30c3\u30af\u30d5\u30e9\u30b0\u3092\u521d\u671f\u5316\u3057\u307e\u3059\uff61\n        strFlag = &quot;&quot;\n\n    Next\n\n    &#039;\u7d50\u679c\u3092\u8fd4\u3057\u307e\u3059\u3002\n    \u4ed6\u4eba\u306e\u7a7a\u304d\u6642\u9593\u30c1\u30a7\u30c3\u30af\u3068\u306a\u3044\u5834\u5408\u9664\u5916\u3059\u308b = strTempAddresses\n\n    &#039;\u30aa\u30d6\u30b8\u30a7\u30af\u30c8\u3092\u89e3\u653e\u3057\u307e\u3059\u3002\n    Set olItem = Nothing\n    Set olConItems = Nothing\n    Set olFolder = Nothing\n    Set olNamespace = Nothing\n    Set olApp = Nothing\n    Set recOther = Nothing\n    \nEnd Function<\/code><\/pre>\n<p><!--\u5439\u304d\u51fa\u3057\u306f\u3058\u307e\u308a--><\/p>\n<div class=\"balloon5\">\n<div class=\"faceicon\">\n<img loading=\"lazy\" decoding=\"async\" src=\"\/wp-content\/uploads\/2020\/11\/taka_kao.gif\" alt=\"\u30bf\u30ab\u30d2\u30ed\" width=\"110\" height=\"110\" \/>\n<div class=\"faceiconfont\">\u30bf\u30ab\u30d2\u30ed<\/div>\n<\/div>\n<div class=\"chatting\">\n<div class=\"says\">\u7a7a\u304d\u6642\u9593\u78ba\u8a8d\u306e\u671f\u9593\u306f\u4f1a\u8b70\u8a2d\u5b9a\u6642\u9593\u4ee5\u5185\u3068\u306a\u308a\u307e\u3059\u3002<br \/>\n\u3082\u3057\u4f1a\u8b70\u958b\u59cb\u6642\u9593\u3084\u7d42\u4e86\u6642\u9593\u3092\u8de8\u3050\u4f1a\u8b70\u3084\u4e88\u5b9a\u3082\u78ba\u8a8d\u5bfe\u8c61\u3068\u3057\u305f\u3044\u5834\u5408\u306f\u7bc4\u56f2\u3092\u8ffd\u52a0\u3057\u3066\u304f\u3060\u3055\u3044\u3002<\/div>\n<\/div>\n<\/div>\n<p><!--\u5439\u304d\u51fa\u3057\u7d42\u308f\u308a--><\/p>\n<div class=\"info\"><code>Find(&quot;[Start] &gt;= &quot;&quot;&quot; &amp; strStart &amp; &quot;&quot;&quot; AND [End] &lt;= &quot;&quot;&quot; &amp; strEnd &amp; &quot;&quot;&quot;&quot;)<\/code><\/div>\n<h3><span class=\"ez-toc-section\" id=\"%E4%BC%9A%E8%AD%B0%E5%87%BA%E5%B8%AD%E4%BE%9D%E9%A0%BC%E3%82%92%E9%80%81%E4%BF%A1%E3%81%99%E3%82%8B%E3%82%B3%E3%83%BC%E3%83%89%E3%82%92%E5%A4%89%E6%9B%B4%E3%81%99%E3%82%8B\"><\/span>\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u9001\u4fe1\u3059\u308b\u30b3\u30fc\u30c9\u3092\u5909\u66f4\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n<p>\u7d9a\u3044\u3066\u3001\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u9001\u4fe1\u3059\u308b\u30b3\u30fc\u30c9\u306e\u4ee5\u4e0b\u306e\u7b87\u6240\u3092\u5909\u66f4\u3057\u307e\u3059\u3002<\/p>\n<p>\u25a0\u5909\u66f4\u524d<\/p>\n<div class=\"info\"><code>.RequiredAttendees = Cells(i, 7)<\/code><\/div>\n<p>\u25a0\u5909\u66f4\u5f8c<\/p>\n<div class=\"info\"><code>.RequiredAttendees = \u4ed6\u4eba\u306e\u7a7a\u304d\u6642\u9593\u30c1\u30a7\u30c3\u30af\u3068\u306a\u3044\u5834\u5408\u9664\u5916\u3059\u308b(Cells(i, 7), Cells(i, 3), Cells(i, 4))<\/code><\/div>\n<p>\u300c\u4ed6\u4eba\u306e\u7a7a\u304d\u6642\u9593\u30c1\u30a7\u30c3\u30af\u3068\u306a\u3044\u5834\u5408\u9664\u5916\u3059\u308b\u300dFunction\u30d7\u30ed\u30b7\u30fc\u30b8\u30e3\u306e\u66f8\u5f0f\u306f\u4ee5\u4e0b\u3068\u306a\u308a\u307e\u3059\u3002<\/p>\n<div class=\"info\"><code>.RequiredAttendees = \u4ed6\u4eba\u306e\u7a7a\u304d\u6642\u9593\u30c1\u30a7\u30c3\u30af\u3068\u306a\u3044\u5834\u5408\u9664\u5916\u3059\u308b(\uff1c\uff1b\u533a\u5207\u308a\u306e\u30a2\u30c9\u30ec\u30b9\u30ea\u30b9\u30c8\uff1e, \uff1c\u958b\u59cb\u65e5\u6642 &quot;yyyy\/mm\/dd hh:mm&quot;\uff1e, \uff1c\u7d42\u4e86\u65e5\u6642 &quot;yyyy\/mm\/dd hh:mm&quot;\uff1e)<\/code><\/div>\n<p>\u5fc5\u9808\u51fa\u5e2d\u8005\u8a2d\u5b9a\u306e\u3068\u3053\u308d\u3067\u4e0a\u8a18Function\u30d7\u30ed\u30b7\u30fc\u30b8\u30e3\u3092\u547c\u3073\u51fa\u3057\u30a2\u30c9\u30ec\u30b9\u306b\u5bfe\u3059\u308b\u7a7a\u304d\u6642\u9593\u3092\u30c1\u30a7\u30c3\u30af\u3057\u7a7a\u304d\u6642\u9593\u304c\u3042\u308b\u30a2\u30c9\u30ec\u30b9\u306e\u307f\u7d5e\u308a\u8fbc\u3093\u3060\u30ea\u30b9\u30c8\u3092\u4ee3\u5165\u3059\u308b\u5185\u5bb9\u3068\u306a\u308a\u307e\u3059\u3002<\/p>\n<h3><span class=\"ez-toc-section\" id=\"%E5%8B%95%E4%BD%9C%E7%A2%BA%E8%AA%8D%E3%82%92%E3%81%99%E3%82%8B\"><\/span>\u52d5\u4f5c\u78ba\u8a8d\u3092\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n<p>\u5fc5\u9808\u51fa\u5e2d\u8005\u306e\u4e00\u4eba\u3092\u3001\u4f1a\u8b70\u8a2d\u5b9a\u6642\u9593\u5e2f\u306b\u4e88\u5b9a\u3092\u5165\u308c\u3001\u305d\u306e\u30a2\u30c9\u30ec\u30b9\u304c\u9664\u5916\u3055\u308c\u308b\u304b\u78ba\u8a8d\u3092\u3057\u3066\u307f\u307e\u3057\u3087\u3046\u3002<\/p>\n<p>\u30b5\u30f3\u30d7\u30eb\u3067\u306f\u4e3b\u50ac\u8005\u306f\u4f1a\u8b70\u3092\u5165\u308c\u308b\u6642\u9593\u5e2f\u306b\u4e88\u5b9a\u306f\u306a\u3057\u3001\u5fc5\u9808\u51fa\u5e2d\u8005\u306euserA\u306f\u5225\u306e\u4f1a\u8b70\u3092\u5165\u308c\u3066\u3044\u307e\u3059\u3002<\/p>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-8154\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2022\/05\/050722_1617_1.png\" alt=\"\" width=\"1104\" height=\"312\" srcset=\"https:\/\/extan.jp\/wp-content\/uploads\/2022\/05\/050722_1617_1.png 1104w, https:\/\/extan.jp\/wp-content\/uploads\/2022\/05\/050722_1617_1-300x85.png 300w, https:\/\/extan.jp\/wp-content\/uploads\/2022\/05\/050722_1617_1-1024x289.png 1024w, https:\/\/extan.jp\/wp-content\/uploads\/2022\/05\/050722_1617_1-768x217.png 768w, https:\/\/extan.jp\/wp-content\/uploads\/2022\/05\/050722_1617_1-718x203.png 718w\" sizes=\"auto, (max-width: 1104px) 100vw, 1104px\" \/>\n<p>Excel\u5074\u306e\u4f1a\u8b70\u8a2d\u5b9a\u60c5\u5831\u306b\u5225\u4f1a\u8b70\u304c\u5b58\u5728\u3059\u308buserA\u3092\u542b\u3081\u307e\u3059\u3002<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-8155\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2022\/05\/050722_1617_2.png\" alt=\"\" width=\"740\" height=\"150\" srcset=\"https:\/\/extan.jp\/wp-content\/uploads\/2022\/05\/050722_1617_2.png 740w, https:\/\/extan.jp\/wp-content\/uploads\/2022\/05\/050722_1617_2-300x61.png 300w, https:\/\/extan.jp\/wp-content\/uploads\/2022\/05\/050722_1617_2-718x146.png 718w\" sizes=\"auto, (max-width: 740px) 100vw, 740px\" \/><\/p>\n<p>VBA\u3092\u5b9f\u884c\u3057\u3066\u307f\u307e\u3057\u3087\u3046\u3002<\/p>\n<p>\u306f\u3044\u3001\u5fc5\u9808\u51fa\u5e2d\u8005\u304b\u3089\u4e88\u5b9a\u304c\u3042\u308buserA\u304c\u9664\u5916\u3055\u308c\u4f1a\u8b70\u8a2d\u5b9a\u3055\u308c\u3066\u3044\u307e\u3059\u306d\u3002<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-8156\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2022\/05\/050722_1617_3.png\" alt=\"\" width=\"1101\" height=\"312\" srcset=\"https:\/\/extan.jp\/wp-content\/uploads\/2022\/05\/050722_1617_3.png 1101w, https:\/\/extan.jp\/wp-content\/uploads\/2022\/05\/050722_1617_3-300x85.png 300w, https:\/\/extan.jp\/wp-content\/uploads\/2022\/05\/050722_1617_3-1024x290.png 1024w, https:\/\/extan.jp\/wp-content\/uploads\/2022\/05\/050722_1617_3-768x218.png 768w, https:\/\/extan.jp\/wp-content\/uploads\/2022\/05\/050722_1617_3-718x203.png 718w\" sizes=\"auto, (max-width: 1101px) 100vw, 1101px\" \/><\/p>\n<h2><span class=\"ez-toc-section\" id=\"%EF%BC%9C%E8%BF%BD%E5%8A%A0%EF%BC%9E%E4%BC%9A%E8%AD%B0%E5%87%BA%E5%B8%AD%E4%BE%9D%E9%A0%BC%E3%81%ABTeams%E4%BC%9A%E8%AD%B0%E3%82%92VBA%E3%81%A7%E8%A8%AD%E5%AE%9A%E3%81%99%E3%82%8B\"><\/span>\uff1c\u8ffd\u52a0\uff1e\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u306bTeams\u4f1a\u8b70\u3092VBA\u3067\u8a2d\u5b9a\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h2>\n<p>\u8aad\u8005\u69d8\u3088\u308a\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u6642\u306b\u4f75\u305b\u3066Teams\u4f1a\u8b70\u3092VBA\u3067\u8a2d\u5b9a\u3059\u308b\u65b9\u6cd5\u306f\u306a\u3044\u304b\u8cea\u554f\u304c\u3042\u308a\u307e\u3057\u305f\u306e\u3067\u3001\u305d\u306e\u65b9\u6cd5\u3092\u8ffd\u8a18\u3044\u305f\u3057\u307e\u3059\u3002<\/p>\n<p>\u64cd\u4f5c\u306e\u5185\u5bb9\u3068\u3057\u3066\u306f\u3001\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u306e\u30e1\u30cb\u30e5\u30fc\u306b\u3042\u308b\u300cTeams\u4f1a\u8b70\u300d\u30dc\u30bf\u30f3\u3092\u62bc\u3057\u305f\u3068\u304d\u306b\u672c\u6587\u3078Teams\u4f1a\u8b70\u306e\u30ea\u30f3\u30af\u304c\u633f\u5165\u3055\u308c\u308b\u3068\u3044\u3063\u305f\u5185\u5bb9\u3068\u306a\u308a\u307e\u3059\u3002<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-8939\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2022\/08\/080322_1316_2.png\" alt=\"\" width=\"330\" height=\"115\" srcset=\"https:\/\/extan.jp\/wp-content\/uploads\/2022\/08\/080322_1316_2.png 330w, https:\/\/extan.jp\/wp-content\/uploads\/2022\/08\/080322_1316_2-300x105.png 300w\" sizes=\"auto, (max-width: 330px) 100vw, 330px\" \/><br \/>\n\u305f\u3060\u4eca\u306e\u3068\u3053\u308dVBA\u3067\u306f\u3001Teams\u3092\u6271\u3046\u30e9\u30a4\u30d6\u30e9\u30ea\u306f\u3042\u308a\u307e\u305b\u3093\u306e\u3067\u3001\u30e9\u30a4\u30d6\u30e9\u30ea\u3092\u4f7f\u308f\u306a\u3044\u65b9\u6cd5\u3067\u5b9f\u73fe\u3092\u3059\u308b\u5fc5\u8981\u304c\u3042\u308a\u307e\u3059\u3002<\/p>\n<p>\u305d\u3053\u3067\u3001\u4eca\u56de\u63a1\u7528\u3057\u305f\u65b9\u6cd5\u306f\u3001\u300cTeams\u4f1a\u8b70\u300d\u30dc\u30bf\u30f3\u3092\u62bc\u4e0b\u3059\u308b\u30b7\u30e7\u30fc\u30c8\u30ab\u30c3\u30c8\u30ad\u30fc\u3092VBA\u3067\u518d\u73fe\u3059\u308b\u3068\u3044\u3063\u305f\u5f62\u3067\u6a5f\u80fd\u3092\u5b9f\u73fe\u3057\u3066\u3044\u304d\u307e\u3059\u3002<\/p>\n<p>\u300cAlt\u300d\u30ad\u30fc\u3092\u62bc\u3059\u3068\u3001\u30ea\u30dc\u30f3\u306e\u30bf\u30d6\u304c\u9078\u629e\u3055\u308c\u305f\u72b6\u614b\u306b\u306a\u308a\u3001\u300cHTM\u300d\u30ad\u30fc\u3092\u62bc\u3059\u3068\u300cTeams\u4f1a\u8b70\u300d\u30dc\u30bf\u30f3\u306b\u305f\u3069\u308a\u7740\u3044\u3066\u62bc\u3057\u305f\u72b6\u614b\u306b\u306a\u308b\u306e\u3067\u3001\u3053\u306e\u5185\u5bb9\u3092VBA\u3078\u30bb\u30c3\u30c8\u3057\u307e\u3059\u3002<\/p>\n<h3><span class=\"ez-toc-section\" id=\"VBA%E3%82%92%E5%AE%9F%E8%A3%85%E3%81%99%E3%82%8B-3\"><\/span>VBA\u3092\u5b9f\u88c5\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n<p>\u30b5\u30f3\u30d7\u30eb\u30b3\u30fc\u30c9\u306f\u4ee5\u4e0b\u306e\u901a\u308a\u3067\u3059\u3002<br \/>\n\u65b0\u898f\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u306eSend\u30e1\u30bd\u30c3\u30c9\u306e\u524d\u306b\u30b3\u30fc\u30c9\u3092\u8ffd\u52a0\u3057\u307e\u3059\u3002<\/p>\n<p>\u25a0\u5909\u66f4\u524d<\/p>\n<div class=\"info\"><code>.Send  &#039;\u9001\u4fe1<\/code><\/div>\n<p>\u25a0\u5909\u66f4\u5f8c<\/p>\n<div class=\"info\"><code>&#039;---Teams\u4f1a\u8b70\u633f\u5165\u51e6\u7406\u8ffd\u52a0<br \/>\n.Display  &#039;\u4f1a\u8b70\u901a\u77e5\u3092\u8868\u793a\u3057\u307e\u3059\u3002<br \/>\nApplication.Wait (Now + TimeValue(&quot;00:00:02&quot;)) &#039;\u8868\u793a\u3055\u308c\u308b\u307e\u3067\u5f85\u3061\u307e\u3059\u3002<br \/>\nSendKeys &quot;%&quot;, True &#039;Alt\u30ad\u30fc\u3092\u62bc\u3057\u3066\u30bf\u30d6\u3092\u9078\u629e\u3057\u307e\u3059\u3002<br \/>\nApplication.Wait (Now + TimeValue(&quot;00:00:01&quot;)) &#039;\u8868\u793a\u3055\u308c\u308b\u307e\u3067\u5f85\u3061\u307e\u3059\u3002<br \/>\nSendKeys &quot;HTM&quot; &#039;Teams\u4f1a\u8b70\u30dc\u30bf\u30f3\u306e\u30b7\u30e7\u30fc\u30c8\u30ab\u30c3\u30c8\u30ad\u30fc\u3092\u62bc\u3057\u307e\u3059\u3002<br \/>\nApplication.Wait (Now + TimeValue(&quot;00:00:02&quot;)) &#039;\u8868\u793a\u3055\u308c\u308b\u307e\u3067\u5f85\u3061\u307e\u3059\u3002<br \/>\n&#039;---\u3053\u3053\u307e\u3067<br \/>\n.Send &#039;\u9001\u4fe1<\/code><\/div>\n<p><!--\u5439\u304d\u51fa\u3057\u306f\u3058\u307e\u308a--><\/p>\n<div class=\"balloon5\">\n<div class=\"faceicon\">\n<img loading=\"lazy\" decoding=\"async\" src=\"\/wp-content\/uploads\/2020\/11\/taka_kao.gif\" alt=\"\u30bf\u30ab\u30d2\u30ed\" width=\"110\" height=\"110\" \/>\n<div class=\"faceiconfont\">\u30bf\u30ab\u30d2\u30ed<\/div>\n<\/div>\n<div class=\"chatting\">\n<div class=\"says\">\u4f1a\u8b70\u51fa\u5e2d\u306e\u5909\u66f4\u51e6\u7406\u306e\u65b9\u306b\u8ffd\u52a0\u3059\u308b\u3068\u3001\u65e2\u5b58\u306eTeams\u4f1a\u8b70\u304c\u3042\u308b\u5834\u5408\u30a8\u30e9\u30fc\u3068\u306a\u308a\u307e\u3059\u306e\u3067\u3001\u65b0\u898f\u4f5c\u6210\u5074\u306e\u307f\u306b\u8ffd\u52a0\u3059\u308b\u3088\u3046\u304a\u9858\u3044\u3057\u307e\u3059\u3002<\/div>\n<\/div>\n<\/div>\n<p><!--\u5439\u304d\u51fa\u3057\u7d42\u308f\u308a--><\/p>\n<h3><span class=\"ez-toc-section\" id=\"VBA%E3%82%92%E5%AE%9F%E8%A1%8C%E3%81%99%E3%82%8B-3\"><\/span>VBA\u3092\u5b9f\u884c\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n<p>VBA\u3092\u5b9f\u884c\u3057\u3066\u307f\u307e\u3057\u3087\u3046\u3002<br \/>\n\u306f\u3044\u3001Teams\u4f1a\u8b70\u304c\u8a2d\u5b9a\u3055\u308c\u3066\u3044\u307e\u3059\u306d\uff01<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-8938\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2022\/08\/080322_1316_1.png\" alt=\"\" width=\"519\" height=\"243\" srcset=\"https:\/\/extan.jp\/wp-content\/uploads\/2022\/08\/080322_1316_1.png 519w, https:\/\/extan.jp\/wp-content\/uploads\/2022\/08\/080322_1316_1-300x140.png 300w\" sizes=\"auto, (max-width: 519px) 100vw, 519px\" \/><\/p>\n<p><!--\u5439\u304d\u51fa\u3057\u306f\u3058\u307e\u308a--><\/p>\n<div class=\"balloon5\">\n<div class=\"faceicon\">\n<img loading=\"lazy\" decoding=\"async\" src=\"\/wp-content\/uploads\/2020\/11\/taka_kao.gif\" alt=\"\u30bf\u30ab\u30d2\u30ed\" width=\"110\" height=\"110\" \/>\n<div class=\"faceiconfont\">\u30bf\u30ab\u30d2\u30ed<\/div>\n<\/div>\n<div class=\"chatting\">\n<div class=\"says\">\u300cTeams\u4f1a\u8b70\u300d\u30dc\u30bf\u30f3\u3092\u62bc\u3057\u305f\u969b\u300c\u5834\u6240\u300d\u306f\u81ea\u52d5\u633f\u5165\u3055\u308c\u307e\u3059\u304c\u3001Excel\u5074\u306e\u300c\u5834\u6240\u300d\u306b\u5024\u304c\u3042\u308b\u5834\u5408\u306f\u3053\u3061\u3089\u304c\u512a\u5148\u3055\u308c\u81ea\u52d5\u633f\u5165\u3055\u308c\u307e\u305b\u3093\u306e\u3067\u3001Excel\u5074\u306e\u300c\u5834\u6240\u300d\u306e\u30bb\u30eb\u306f\u7a7a\u6b04\u306b\u3057\u3066\u304a\u304d\u307e\u3057\u3087\u3046\u3002<\/div>\n<\/div>\n<\/div>\n<p><!--\u5439\u304d\u51fa\u3057\u7d42\u308f\u308a--><\/p>\n<h3><span class=\"ez-toc-section\" id=\"VBA%E3%81%AE%E8%AA%AC%E6%98%8E-2\"><\/span>VBA\u306e\u8aac\u660e<span class=\"ez-toc-section-end\"><\/span><\/h3>\n<p>Teams\u4f1a\u8b70\u3092\u8a2d\u5b9a\u3059\u308b\u6a5f\u80fd\u306b\u3064\u3044\u3066\u8aac\u660e\u3092\u3057\u307e\u3059\u3002<\/p>\n<p>\u4f1a\u8b70\u901a\u77e5\u3092\u4e00\u5ea6\u8868\u793a\u3055\u305b\u307e\u3059\u3002\u3053\u308c\u306f\u30b7\u30e7\u30fc\u30c8\u30ab\u30c3\u30c8\u30ad\u30fc\u306b\u3088\u308b\u30dc\u30bf\u30f3\u64cd\u4f5c\u3092\u6709\u52b9\u5316\u3059\u308b\u305f\u3081\u306b\u306a\u308a\u307e\u3059\u3002<\/p>\n<div class=\"info\"><code>.Display <\/code><\/div>\n<p>\u8868\u793a\u3055\u308c\u308b\u307e\u3067\u6570\u79d2\u51e6\u7406\u3092\u4fdd\u7559\u306b\u3057\u307e\u3059\u3002\u3053\u308c\u304c\u306a\u3044\u5834\u5408\u306f\u8868\u793a\u3055\u308c\u308b\u524d\u306b\u30b7\u30e7\u30fc\u30c8\u30ab\u30c3\u30c8\u30ad\u30fc\u304c\u62bc\u4e0b\u3055\u308c\u308b\u3053\u3068\u304c\u3042\u308a\u307e\u3059\u306e\u3067\u3001\u5fc5\u305a\u5165\u308c\u308b\u3088\u3046\u306b\u3057\u3066\u304f\u3060\u3055\u3044\u3002<\/p>\n<div class=\"info\"><code>Application.Wait (Now + TimeValue(&quot;00:00:02&quot;)) <\/code><\/div>\n<p><!--\u5439\u304d\u51fa\u3057\u306f\u3058\u307e\u308a--><\/p>\n<div class=\"balloon5\">\n<div class=\"faceicon\">\n<img loading=\"lazy\" decoding=\"async\" src=\"\/wp-content\/uploads\/2020\/11\/taka_kao.gif\" alt=\"\u30bf\u30ab\u30d2\u30ed\" width=\"110\" height=\"110\" \/>\n<div class=\"faceiconfont\">\u30bf\u30ab\u30d2\u30ed<\/div>\n<\/div>\n<div class=\"chatting\">\n<div class=\"says\">\u8868\u793a\u304c\u3055\u3089\u306b\u9045\u3044\u5834\u5408\u306f&#8221;00:00:02&#8243;\u306e\u90e8\u5206\u3092&#8221;00:00:04&#8243;\u306a\u3069\u5897\u3084\u3057\u3001\u5f85\u3061\u6642\u9593\u3092\u5897\u3084\u3057\u3066\u8abf\u6574\u3092\u3057\u3066\u304f\u3060\u3055\u3044\u3002<\/div>\n<\/div>\n<\/div>\n<p><!--\u5439\u304d\u51fa\u3057\u7d42\u308f\u308a--><\/p>\n<p>Alt\u30ad\u30fc\u3092\u62bc\u3057\u3066\u30bf\u30d6\u3092\u9078\u629e\u3057\u307e\u3059\u3002&#8221;%&#8221;\u306fAlt\u306e\u610f\u5473\u3068\u306a\u308a\u307e\u3059\u3002<\/p>\n<div class=\"info\"><code>SendKeys &quot;%&quot;, True <\/code><\/div>\n<p>Teams\u4f1a\u8b70\u30dc\u30bf\u30f3\u306e\u30b7\u30e7\u30fc\u30c8\u30ab\u30c3\u30c8\u30ad\u30fc\uff08&#8221;HTM&#8221;\uff09\u3092\u62bc\u3057\u307e\u3059\u3002<\/p>\n<div class=\"info\"><code>SendKeys &quot;HTM&quot; <\/code><\/div>\n<h2><span class=\"ez-toc-section\" id=\"%EF%BC%9C%E8%BF%BD%E5%8A%A0%EF%BC%9E%E4%BC%9A%E8%AD%B0%E5%87%BA%E5%B8%AD%E4%BE%9D%E9%A0%BC%E3%81%AB%E5%88%86%E9%A1%9E%E9%A0%85%E7%9B%AE%E3%81%A7%E8%A8%AD%E5%AE%9A%E3%81%99%E3%82%8B\"><\/span>\uff1c\u8ffd\u52a0\uff1e\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u306b\u5206\u985e\u9805\u76ee\u3067\u8a2d\u5b9a\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h2>\n<p>\u8aad\u8005\u69d8\u3088\u308a\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u6642\u306b\u4f75\u305b\u3066\u30ab\u30c6\u30b4\u30ea\u5206\u985e\u9805\u76ee\u3092VBA\u3067\u8a2d\u5b9a\u3059\u308b\u65b9\u6cd5\u306f\u306a\u3044\u304b\u8cea\u554f\u304c\u3042\u308a\u307e\u3057\u305f\u306e\u3067\u3001\u305d\u306e\u65b9\u6cd5\u3092\u8ffd\u8a18\u3044\u305f\u3057\u307e\u3059\u3002<\/p>\n<p>\u5185\u5bb9\u3068\u3057\u3066\u306f\u3001\u8272\u5206\u3051\u3055\u308c\u3066\u3044\u308b\u5206\u985e\u9805\u76ee\u306e\u540d\u524d\u3092Excel\u5074\u306eM\u5217\u306b\u6307\u5b9a\u3057\u3001<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-9097\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2022\/08\/082422_1743_2.png\" alt=\"\" width=\"258\" height=\"147\" \/><br \/>\n\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u751f\u6210\u6642\u306b\u8a72\u5f53\u3059\u308b\u5206\u985e\u9805\u76ee\u3092\u8a2d\u5b9a\u3059\u308b\u51e6\u7406\u3068\u306a\u308a\u307e\u3059\u3002<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-9096\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2022\/08\/082422_1743_1.png\" alt=\"\" width=\"502\" height=\"318\" srcset=\"https:\/\/extan.jp\/wp-content\/uploads\/2022\/08\/082422_1743_1.png 502w, https:\/\/extan.jp\/wp-content\/uploads\/2022\/08\/082422_1743_1-300x190.png 300w\" sizes=\"auto, (max-width: 502px) 100vw, 502px\" \/><\/p>\n<h3><span class=\"ez-toc-section\" id=\"VBA%E3%82%92%E5%AE%9F%E8%A3%85%E3%81%99%E3%82%8B-4\"><\/span>VBA\u3092\u5b9f\u88c5\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n<p>\u30b5\u30f3\u30d7\u30eb\u30b3\u30fc\u30c9\u306f\u4ee5\u4e0b\u306e\u901a\u308a\u3067\u3059\u3002<br \/>\n\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u306eOptionalAttendees\u30d7\u30ed\u30d1\u30c6\u30a3\u306e\u5f8c\u306b\u30b3\u30fc\u30c9\u3092\u8ffd\u52a0\u3057\u307e\u3059\u3002<\/p>\n<p>\u25a0\u5909\u66f4\u524d<\/p>\n<div class=\"info\"><code>.OptionalAttendees = Cells(i, 8)<\/code><\/div>\n<p>\u25a0\u5909\u66f4\u5f8c<\/p>\n<div class=\"info\"><code>.OptionalAttendees = Cells(i, 8)<br \/>\n.Categories = Cells(i, 13)<\/code><\/div>\n<p><!--\u5439\u304d\u51fa\u3057\u306f\u3058\u307e\u308a--><\/p>\n<div class=\"balloon5\">\n<div class=\"faceicon\">\n<img loading=\"lazy\" decoding=\"async\" src=\"\/wp-content\/uploads\/2020\/11\/taka_kao.gif\" alt=\"\u30bf\u30ab\u30d2\u30ed\" width=\"110\" height=\"110\" \/>\n<div class=\"faceiconfont\">\u30bf\u30ab\u30d2\u30ed<\/div>\n<\/div>\n<div class=\"chatting\">\n<div class=\"says\">\u4eca\u56de\u306e\u5909\u66f4\u7b87\u6240\u306f\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u306e\u65b0\u898f\u4f5c\u6210\u3068\u5909\u66f4\u51e6\u7406\u306e2\u304b\u6240\u306e\u5909\u66f4\u3068\u306a\u308a\u307e\u3059\u3002<\/div>\n<\/div>\n<\/div>\n<p><!--\u5439\u304d\u51fa\u3057\u7d42\u308f\u308a--><\/p>\n<h3><span class=\"ez-toc-section\" id=\"VBA%E3%82%92%E5%AE%9F%E8%A1%8C%E3%81%99%E3%82%8B-4\"><\/span>VBA\u3092\u5b9f\u884c\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n<p>\u307e\u305a\u306f\u30aa\u30ec\u30f3\u30b8\u306e\u5206\u985e\u3092\u6307\u5b9a\u3057\u3066\u3001\u65b0\u898f\u9001\u4fe1\u3092\u3057\u3066\u3044\u307e\u3059\u3002<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-9097\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2022\/08\/082422_1743_2.png\" alt=\"\" width=\"258\" height=\"147\" \/><br \/>\nVBA\u3092\u5b9f\u884c\u3057\u3066\u307f\u307e\u3057\u3087\u3046\u3002<br \/>\n\u306f\u3044\u3001\u30aa\u30ec\u30f3\u30b8\u306e\u5206\u985e\u304c\u8a2d\u5b9a\u3055\u308c\u3001\u30aa\u30ec\u30f3\u30b8\u8272\u306b\u306a\u308a\u307e\u3057\u305f\u306d\uff01<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-9098\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2022\/08\/082422_1743_3.png\" alt=\"\" width=\"524\" height=\"484\" srcset=\"https:\/\/extan.jp\/wp-content\/uploads\/2022\/08\/082422_1743_3.png 524w, https:\/\/extan.jp\/wp-content\/uploads\/2022\/08\/082422_1743_3-300x277.png 300w\" sizes=\"auto, (max-width: 524px) 100vw, 524px\" \/><\/p>\n<p>\u7d9a\u3044\u3066\u3001\u9752\u306e\u5206\u985e\u306b\u8a2d\u5b9a\u3057\u3066\u307f\u307e\u3057\u3087\u3046\u3002<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-9099\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2022\/08\/082422_1743_4.png\" alt=\"\" width=\"173\" height=\"134\" \/><\/p>\n<p>\u4f1a\u8b70\u901a\u77e5\u5909\u66f4\u306e\u5834\u5408\u306f\u4ef6\u540d\u3084\u65e5\u4ed8\u3092\u5909\u3048\u306a\u3044\u3068\u9001\u4fe1\u3055\u308c\u307e\u305b\u3093\u306e\u3067\u3001\u4eca\u56de\u306f\u4ef6\u540d\u3092\u5909\u66f4\u3057\u307e\u3059\u3002<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-9100\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2022\/08\/082422_1743_5.png\" alt=\"\" width=\"186\" height=\"124\" \/><\/p>\n<p>VBA\u3092\u5b9f\u884c\u3057\u3066\u307f\u307e\u3057\u3087\u3046\u3002<\/p>\n<p>\u306f\u3044\u3001\u9752\u306e\u5206\u985e\u304c\u8a2d\u5b9a\u3055\u308c\u3001\u9752\u8272\u306b\u306a\u308a\u307e\u3057\u305f\u306d\uff01<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-9102\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2022\/08\/082422_1756_1.png\" alt=\"\" width=\"525\" height=\"350\" srcset=\"https:\/\/extan.jp\/wp-content\/uploads\/2022\/08\/082422_1756_1.png 525w, https:\/\/extan.jp\/wp-content\/uploads\/2022\/08\/082422_1756_1-300x200.png 300w\" sizes=\"auto, (max-width: 525px) 100vw, 525px\" \/><\/p>\n<h3><span class=\"ez-toc-section\" id=\"VBA%E3%81%AE%E8%AA%AC%E6%98%8E-3\"><\/span>VBA\u306e\u8aac\u660e<span class=\"ez-toc-section-end\"><\/span><\/h3>\n<p>\u5206\u985e\u9805\u76ee\u3092\u8a2d\u5b9a\u3059\u308b\u6a5f\u80fd\u306b\u3064\u3044\u3066\u8aac\u660e\u3092\u3057\u307e\u3059\u3002<\/p>\n<p>\u4eca\u56de\u4f7f\u7528\u3057\u305f\u30d7\u30ed\u30d1\u30c6\u30a3\u306fCategories\u3068\u3044\u3044\u3001\u5206\u985e\u9805\u76ee\u3092\u8a2d\u5b9a\u3059\u308b\u3053\u3068\u304c\u3067\u304d\u307e\u3059\u3002<\/p>\n<table>\n<thead>\n<tr>\n<th>\u540d\u524d<\/th>\n<th>\u8aac\u660e<\/th>\n<\/tr>\n<tr>\n<td>Categories<\/td>\n<td>Outlook \u30a2\u30a4\u30c6\u30e0\u306b\u5272\u308a\u5f53\u3066\u3089\u308c\u305f\u5206\u985e\u9805\u76ee\u3092\u8868\u3059\u6587\u5b57\u5217\u3092\u8a2d\u5b9a\u307e\u305f\u306f\u8fd4\u3057\u307e\u3059\u3002 \u5024\u306e\u53d6\u5f97\u3068\u8a2d\u5b9a\u304c\u53ef\u80fd\u3067\u3059\u3002<\/td>\n<\/tr>\n<\/thead>\n<\/table>\n<p>\u3053\u306e\u30d7\u30ed\u30d1\u30c6\u30a3\u306b13\u5217\u76ee\u306eM\u5217\u306e\u30bb\u30eb\u306e\u5024\u3092\u6307\u5b9a\u3059\u308b\u3053\u3068\u306b\u3088\u308a\u3001\u5206\u985e\u9805\u76ee\u3092\u8a2d\u5b9a\u3059\u308b\u3053\u3068\u304c\u3067\u304d\u307e\u3059\u3002<\/p>\n<div class=\"info\"><code>.Categories = Cells(i, 13)<\/code><\/div>\n<p><!--\u5439\u304d\u51fa\u3057\u306f\u3058\u307e\u308a--><\/p>\n<div class=\"balloon5\">\n<div class=\"faceicon\">\n<img loading=\"lazy\" decoding=\"async\" src=\"\/wp-content\/uploads\/2020\/11\/taka_kao.gif\" alt=\"\u30bf\u30ab\u30d2\u30ed\" width=\"110\" height=\"110\" \/>\n<div class=\"faceiconfont\">\u30bf\u30ab\u30d2\u30ed<\/div>\n<\/div>\n<div class=\"chatting\">\n<div class=\"says\">\u4eca\u56de\u306fM\u5217\u306b\u8a2d\u5b9a\u3057\u307e\u3057\u305f\u304c\u3001\u5217\u306e\u4f4d\u7f6e\u306f\u9069\u5b9c\u5909\u66f4\u9802\u3051\u308c\u3070\u3068\u601d\u3044\u307e\u3059\u3002<\/div>\n<\/div>\n<\/div>\n<p><!--\u5439\u304d\u51fa\u3057\u7d42\u308f\u308a--><\/p>\n<h2><span class=\"ez-toc-section\" id=\"%EF%BC%9C%E8%BF%BD%E5%8A%A0%EF%BC%9E%E4%BC%9A%E8%AD%B0%E5%87%BA%E5%B8%AD%E4%BE%9D%E9%A0%BC%E3%81%AB%E8%A4%87%E6%95%B0%E3%81%AE%E3%83%95%E3%82%A1%E3%82%A4%E3%83%AB%E3%82%92%E6%B7%BB%E4%BB%98%E3%81%99%E3%82%8B\"><\/span>\uff1c\u8ffd\u52a0\uff1e\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u306b\u8907\u6570\u306e\u30d5\u30a1\u30a4\u30eb\u3092\u6dfb\u4ed8\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h2>\n<p>\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u306b\u8907\u6570\u306e\u30d5\u30a1\u30a4\u30eb\u3092\u6dfb\u4ed8\u3059\u308b\u65b9\u6cd5\u306b\u3064\u3044\u3066\u8aac\u660e\u3092\u3057\u307e\u3059\u3002<\/p>\n<h3><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%BA%96%E5%82%99%E3%81%99%E3%82%8B\"><\/span>\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u3092\u6e96\u5099\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n<p>\u307e\u305a\u306f\u6dfb\u4ed8\u3059\u308b\u30d5\u30a1\u30a4\u30eb\u3092\u7528\u610f\u3057\u307e\u3059\u3002<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-10525\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2023\/01\/012123_0356_1.png\" alt=\"\" width=\"249\" height=\"163\" \/><\/p>\n<p>\u5404\u30d5\u30a1\u30a4\u30eb\u306e\u30d1\u30b9\u306f\u4ee5\u4e0b\u306e\u901a\u308a\u3067\u3059\u3002<\/p>\n<div class=\"info\"><code>F:\\\u30c9\u30ad\u30e5\u30e1\u30f3\u30c8\\TEST\\\u30d5\u30a1\u30a4\u30eb1.xlsx<br \/>\nF:\\\u30c9\u30ad\u30e5\u30e1\u30f3\u30c8\\TEST\\\u30d5\u30a1\u30a4\u30eb2.xlsx<\/code><\/div>\n<p>\u6b21\u306b\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u60c5\u5831\u304c\u8a18\u8f09\u3055\u308c\u3066\u3044\u308bExcel\u306eN\u5217\u306b\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u306e\u30d1\u30b9\u3092\u8ffd\u8a18\u3057\u307e\u3059\u3002<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-10529\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2023\/01\/012123_0356_5.png\" alt=\"\" width=\"385\" height=\"174\" srcset=\"https:\/\/extan.jp\/wp-content\/uploads\/2023\/01\/012123_0356_5.png 385w, https:\/\/extan.jp\/wp-content\/uploads\/2023\/01\/012123_0356_5-300x136.png 300w\" sizes=\"auto, (max-width: 385px) 100vw, 385px\" \/><br \/>\n1\u3064\u3060\u3051\u6dfb\u4ed8\u3059\u308b\u30d1\u30bf\u30fc\u30f3\u30682\u3064\u6dfb\u4ed8\u3059\u308b\u30d1\u30bf\u30fc\u30f3\u3092\u8a2d\u5b9a\u3057\u3066\u3044\u307e\u3059\u3002<\/p>\n<table width=\"303\">\n<tbody>\n<tr>\n<th width=\"303\">\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\uff08\u8907\u6570\u306e\u5834\u5408\u300c\uff1b\u300d\u3067\u533a\u5207\u308b\uff09<\/th>\n<\/tr>\n<tr>\n<td width=\"303\">F:\\\u30c9\u30ad\u30e5\u30e1\u30f3\u30c8\\TEST\\\u30d5\u30a1\u30a4\u30eb1.xlsx<\/td>\n<\/tr>\n<tr>\n<td width=\"303\">F:\\\u30c9\u30ad\u30e5\u30e1\u30f3\u30c8\\TEST\\\u30d5\u30a1\u30a4\u30eb1.xlsx;F:\\\u30c9\u30ad\u30e5\u30e1\u30f3\u30c8\\TEST\\\u30d5\u30a1\u30a4\u30eb2.xlsx<\/td>\n<\/tr>\n<\/tbody>\n<\/table>\n<h3><span class=\"ez-toc-section\" id=\"VBA%E3%82%92%E5%AE%9F%E8%A3%85%E3%81%99%E3%82%8B-5\"><\/span>VBA\u3092\u5b9f\u88c5\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n<p>\u4ee5\u4e0b\u306e\u30b3\u30fc\u30c9\u3092\u65b0\u898f\u4f5c\u6210\u306e\u5834\u5408\u306f\u300cWith olItem\u300d\u914d\u4e0b\u306b\u3001\u5909\u66f4\u306e\u5834\u5408\u306f\u300colItemBefor\u300d\u914d\u4e0b\u306b\u8ffd\u8a18\u3057\u307e\u3059\u3002<\/p>\n<pre style=\"padding: 0;\"><code class=\"language-visual-basic line-numbers\">                        &#039;\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u306e\u30d1\u30b9\u3092&quot;;&quot;\u533a\u5207\u308a\u3067\u5206\u5272\u3057\u914d\u5217\u3078\u683c\u7d0d\u3057\u307e\u3059\u3002\n                        arrTemp = Split(wsSheet.Cells(i, 14).Value, &quot;;&quot;)\n                        \n                        &#039;\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u306e\u30d1\u30b9\u3092\u6307\u5b9a\u3057Add\u30e1\u30bd\u30c3\u30c9\u3067\u6dfb\u4ed8\u3057\u307e\u3059\u3002\n                        For j = 0 To UBound(arrTemp)\n                            .Attachments.Add arrTemp(j)\n                        Next<\/code><\/pre>\n<h3><span class=\"ez-toc-section\" id=\"VBA%E3%82%92%E5%AE%9F%E8%A1%8C%E3%81%99%E3%82%8B-5\"><\/span>VBA\u3092\u5b9f\u884c\u3059\u308b<span class=\"ez-toc-section-end\"><\/span><\/h3>\n<p>VBA\u3092\u5b9f\u884c\u3057\u307e\u3059\u3002<br \/>\n\u4f1a\u8b70\u304c\u9001\u4fe1\u3055\u308c\u307e\u3057\u305f\u3002<br \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-10526\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2023\/01\/012123_0356_2.png\" alt=\"\" width=\"232\" height=\"113\" \/><\/p>\n<p>\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u3092\u78ba\u8a8d\u3057\u3066\u307f\u307e\u3057\u3087\u3046\u3002<\/p>\n<p>\u306f\u3044\u3001\u305d\u308c\u305e\u308c\u306e\u30d1\u30bf\u30fc\u30f3\u3067\u30d5\u30a1\u30a4\u30eb\u304c\u6dfb\u4ed8\u3055\u308c\u3066\u3044\u307e\u3059\u306d\uff01<\/p>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-10527\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2023\/01\/012123_0356_3.png\" alt=\"\" width=\"280\" height=\"196\" \/>\n<img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-10528\" src=\"https:\/\/extan.jp\/wp-content\/uploads\/2023\/01\/012123_0356_4.png\" alt=\"\" width=\"376\" height=\"210\" srcset=\"https:\/\/extan.jp\/wp-content\/uploads\/2023\/01\/012123_0356_4.png 376w, https:\/\/extan.jp\/wp-content\/uploads\/2023\/01\/012123_0356_4-300x168.png 300w\" sizes=\"auto, (max-width: 376px) 100vw, 376px\" \/>\n<h3><span class=\"ez-toc-section\" id=\"VBA%E3%81%AE%E8%AA%AC%E6%98%8E-4\"><\/span>VBA\u306e\u8aac\u660e<span class=\"ez-toc-section-end\"><\/span><\/h3>\n<p>\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u3092\u51e6\u7406\u3059\u308bVBA\u306b\u3064\u3044\u3066\u8aac\u660e\u3092\u3057\u307e\u3059\u3002<br \/>\nCells(i, 14)\u3067Excel\u306eN\u5217\u3092\u5bfe\u8c61\u306b\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u306e\u60c5\u5831\u3092\u53d6\u5f97\u3057\u307e\u3059\u3002<br \/>\n\u7d9a\u3044\u3066\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u306e\u30d1\u30b9\u3092&#8221;;&#8221;\u533a\u5207\u308a\u3067\u5206\u5272\u3057\u914d\u5217\u3078\u683c\u7d0d\u3057\u307e\u3059\u3002<\/p>\n<div class=\"info\"><code>arrTemp = Split(wsSheet.Cells(i, 14).Value, &quot;;&quot;)<\/code><\/div>\n<p>\u6dfb\u4ed8\u30d5\u30a1\u30a4\u30eb\u306e\u30d1\u30b9\u3092\u6307\u5b9a\u3057Add\u30e1\u30bd\u30c3\u30c9\u3067\u5bfe\u8c61\u30a2\u30a4\u30c6\u30e0\u3078\u6dfb\u4ed8\u3057\u307e\u3059\u3002<\/p>\n<div class=\"info\"><code>For j = 0 To UBound(arrTemp)<br \/>\n                            .Attachments.Add arrTemp(j)<br \/>\n                        Next<\/code><\/div>\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<\/p>\n<p>\u4eca\u56de\u306f<\/p>\n<div class=\"endinfo\">Excel\u306b\u307e\u3068\u3081\u305f\u4f1a\u8b70\u60c5\u5831\u304b\u3089Outlook\u306e\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u9001\u4fe1\u3059\u308b\u65b9\u6cd5\u3068\u3001\u4f1a\u8b70\u5185\u5bb9\u3084\u30b9\u30b1\u30b8\u30e5\u30fc\u30eb\u3092\u5909\u66f4\u3057\u3066\u518d\u9001\u4fe1\u3059\u308b\u65b9\u6cd5<\/div>\n<p>\u306b\u3064\u3044\u3066\u307e\u3068\u3081\u307e\u3057\u305f\u3002<\/p>\n<p>Outlook\u306e\u64cd\u4f5c\u306f\u624b\u4f5c\u696d\u304c\u591a\u3044\u3067\u3059\u304b\u3089\u306a\u308b\u3079\u304f\u81ea\u52d5\u5316\u3057\u3066\u52b9\u7387\u5316\u3092\u56f3\u308a\u305f\u3044\u3067\u3059\u306d\u3002<\/p>\n","protected":false},"excerpt":{"rendered":"<p>Outlook\u306e\u4e88\u5b9a\u8868\u3067\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u9001\u4fe1\u3059\u308b\u6a5f\u4f1a\u306f\u591a\u3044\u304b\u3068\u601d\u3044\u307e\u3059\u3002 \u305d\u3093\u306a\u4e2d\u3067\u56f0\u308b\u3053\u3068\u3053\u3068\u306f\u3001 \u30fb\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u306e\u5b9b\u5148\u3092\u624b\u5165\u529b\u3059\u308b\u306e\u306f\u9762\u5012 \u30fb\u8907\u6570\u306e\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u51fa\u3059\u5834\u5408\u306f\u3001\u4ef6\u6570\u5206\u65b0\u898f\u4f5c\u6210\u3057\u306a\u3051\u308c\u3070\u306a\u3089\u306a\u3044\u306e\u3067\u9762\u5012 \u3067&#8230;<\/p>\n","protected":false},"author":1,"featured_media":3672,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[6,7],"tags":[16],"class_list":{"0":"post-3636","1":"post","2":"type-post","3":"status-publish","4":"format-standard","5":"has-post-thumbnail","7":"category-excelvba","8":"category-exceloutlook","9":"tag-16","10":"article cf"},"yoast_head":"<!-- This site is optimized with the Yoast SEO plugin v18.1 - https:\/\/yoast.com\/wordpress\/plugins\/seo\/ -->\n<meta name=\"description\" content=\"Excel\u306b\u307e\u3068\u3081\u305f\u4f1a\u8b70\u60c5\u5831\u304b\u3089Outlook\u306e\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u9001\u4fe1\u3059\u308b\u65b9\u6cd5\u3068\u3001\u4f1a\u8b70\u5185\u5bb9\u3084\u30b9\u30b1\u30b8\u30e5\u30fc\u30eb\u3092\u5909\u66f4\u3057\u3066\u518d\u9001\u4fe1\u3059\u308b\u65b9\u6cd5\u306b\u3064\u3044\u3066\u307e\u3068\u3081\u307e\u3059\u3002\" \/>\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=3636\" \/>\n<meta property=\"og:locale\" content=\"ja_JP\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"\u3010VBA\u3011Excel \u304b\u3089Outlook\u306e\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u9001\u4fe1\u3059\u308b\u65b9\u6cd5\uff01\u4f1a\u8b70\u5909\u66f4\u5f8c\u306e\u9001\u4fe1\u3082\u5bfe\u5fdc\uff01 - \u30a8\u30af\u77ed\uff5cExtan.jp\" \/>\n<meta property=\"og:description\" content=\"Excel\u306b\u307e\u3068\u3081\u305f\u4f1a\u8b70\u60c5\u5831\u304b\u3089Outlook\u306e\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u9001\u4fe1\u3059\u308b\u65b9\u6cd5\u3068\u3001\u4f1a\u8b70\u5185\u5bb9\u3084\u30b9\u30b1\u30b8\u30e5\u30fc\u30eb\u3092\u5909\u66f4\u3057\u3066\u518d\u9001\u4fe1\u3059\u308b\u65b9\u6cd5\u306b\u3064\u3044\u3066\u307e\u3068\u3081\u307e\u3059\u3002\" \/>\n<meta property=\"og:url\" content=\"https:\/\/extan.jp\/?p=3636\" \/>\n<meta property=\"og:site_name\" content=\"\u30a8\u30af\u77ed\uff5cExtan.jp\" \/>\n<meta property=\"article:published_time\" content=\"2023-01-20T16:45:31+00:00\" \/>\n<meta property=\"article:modified_time\" content=\"2023-01-21T04:11:01+00:00\" \/>\n<meta property=\"og:image\" content=\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/04\/040221_1557_10.png\" \/>\n\t<meta property=\"og:image:width\" content=\"1612\" \/>\n\t<meta property=\"og:image:height\" content=\"836\" \/>\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=\"67\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=3636#primaryimage\",\"inLanguage\":\"ja\",\"url\":\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/04\/040221_1557_10.png\",\"contentUrl\":\"https:\/\/extan.jp\/wp-content\/uploads\/2021\/04\/040221_1557_10.png\",\"width\":1612,\"height\":836},{\"@type\":\"WebPage\",\"@id\":\"https:\/\/extan.jp\/?p=3636#webpage\",\"url\":\"https:\/\/extan.jp\/?p=3636\",\"name\":\"\u3010VBA\u3011Excel \u304b\u3089Outlook\u306e\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u9001\u4fe1\u3059\u308b\u65b9\u6cd5\uff01\u4f1a\u8b70\u5909\u66f4\u5f8c\u306e\u9001\u4fe1\u3082\u5bfe\u5fdc\uff01 - \u30a8\u30af\u77ed\uff5cExtan.jp\",\"isPartOf\":{\"@id\":\"https:\/\/extan.jp\/#website\"},\"primaryImageOfPage\":{\"@id\":\"https:\/\/extan.jp\/?p=3636#primaryimage\"},\"datePublished\":\"2023-01-20T16:45:31+00:00\",\"dateModified\":\"2023-01-21T04:11:01+00:00\",\"author\":{\"@id\":\"https:\/\/extan.jp\/#\/schema\/person\/ccb8849fcf749d5f74439b1af7d4df1a\"},\"description\":\"Excel\u306b\u307e\u3068\u3081\u305f\u4f1a\u8b70\u60c5\u5831\u304b\u3089Outlook\u306e\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u9001\u4fe1\u3059\u308b\u65b9\u6cd5\u3068\u3001\u4f1a\u8b70\u5185\u5bb9\u3084\u30b9\u30b1\u30b8\u30e5\u30fc\u30eb\u3092\u5909\u66f4\u3057\u3066\u518d\u9001\u4fe1\u3059\u308b\u65b9\u6cd5\u306b\u3064\u3044\u3066\u307e\u3068\u3081\u307e\u3059\u3002\",\"breadcrumb\":{\"@id\":\"https:\/\/extan.jp\/?p=3636#breadcrumb\"},\"inLanguage\":\"ja\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\/\/extan.jp\/?p=3636\"]}]},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\/\/extan.jp\/?p=3636#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"\u30db\u30fc\u30e0\",\"item\":\"https:\/\/extan.jp\/\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"\u3010VBA\u3011Excel \u304b\u3089Outlook\u306e\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u9001\u4fe1\u3059\u308b\u65b9\u6cd5\uff01\u4f1a\u8b70\u5909\u66f4\u5f8c\u306e\u9001\u4fe1\u3082\u5bfe\u5fdc\uff01\"}]},{\"@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":{"description":"Excel\u306b\u307e\u3068\u3081\u305f\u4f1a\u8b70\u60c5\u5831\u304b\u3089Outlook\u306e\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u9001\u4fe1\u3059\u308b\u65b9\u6cd5\u3068\u3001\u4f1a\u8b70\u5185\u5bb9\u3084\u30b9\u30b1\u30b8\u30e5\u30fc\u30eb\u3092\u5909\u66f4\u3057\u3066\u518d\u9001\u4fe1\u3059\u308b\u65b9\u6cd5\u306b\u3064\u3044\u3066\u307e\u3068\u3081\u307e\u3059\u3002","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=3636","og_locale":"ja_JP","og_type":"article","og_title":"\u3010VBA\u3011Excel \u304b\u3089Outlook\u306e\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u9001\u4fe1\u3059\u308b\u65b9\u6cd5\uff01\u4f1a\u8b70\u5909\u66f4\u5f8c\u306e\u9001\u4fe1\u3082\u5bfe\u5fdc\uff01 - \u30a8\u30af\u77ed\uff5cExtan.jp","og_description":"Excel\u306b\u307e\u3068\u3081\u305f\u4f1a\u8b70\u60c5\u5831\u304b\u3089Outlook\u306e\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u9001\u4fe1\u3059\u308b\u65b9\u6cd5\u3068\u3001\u4f1a\u8b70\u5185\u5bb9\u3084\u30b9\u30b1\u30b8\u30e5\u30fc\u30eb\u3092\u5909\u66f4\u3057\u3066\u518d\u9001\u4fe1\u3059\u308b\u65b9\u6cd5\u306b\u3064\u3044\u3066\u307e\u3068\u3081\u307e\u3059\u3002","og_url":"https:\/\/extan.jp\/?p=3636","og_site_name":"\u30a8\u30af\u77ed\uff5cExtan.jp","article_published_time":"2023-01-20T16:45:31+00:00","article_modified_time":"2023-01-21T04:11:01+00:00","og_image":[{"width":1612,"height":836,"url":"https:\/\/extan.jp\/wp-content\/uploads\/2021\/04\/040221_1557_10.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":"67\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=3636#primaryimage","inLanguage":"ja","url":"https:\/\/extan.jp\/wp-content\/uploads\/2021\/04\/040221_1557_10.png","contentUrl":"https:\/\/extan.jp\/wp-content\/uploads\/2021\/04\/040221_1557_10.png","width":1612,"height":836},{"@type":"WebPage","@id":"https:\/\/extan.jp\/?p=3636#webpage","url":"https:\/\/extan.jp\/?p=3636","name":"\u3010VBA\u3011Excel \u304b\u3089Outlook\u306e\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u9001\u4fe1\u3059\u308b\u65b9\u6cd5\uff01\u4f1a\u8b70\u5909\u66f4\u5f8c\u306e\u9001\u4fe1\u3082\u5bfe\u5fdc\uff01 - \u30a8\u30af\u77ed\uff5cExtan.jp","isPartOf":{"@id":"https:\/\/extan.jp\/#website"},"primaryImageOfPage":{"@id":"https:\/\/extan.jp\/?p=3636#primaryimage"},"datePublished":"2023-01-20T16:45:31+00:00","dateModified":"2023-01-21T04:11:01+00:00","author":{"@id":"https:\/\/extan.jp\/#\/schema\/person\/ccb8849fcf749d5f74439b1af7d4df1a"},"description":"Excel\u306b\u307e\u3068\u3081\u305f\u4f1a\u8b70\u60c5\u5831\u304b\u3089Outlook\u306e\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u9001\u4fe1\u3059\u308b\u65b9\u6cd5\u3068\u3001\u4f1a\u8b70\u5185\u5bb9\u3084\u30b9\u30b1\u30b8\u30e5\u30fc\u30eb\u3092\u5909\u66f4\u3057\u3066\u518d\u9001\u4fe1\u3059\u308b\u65b9\u6cd5\u306b\u3064\u3044\u3066\u307e\u3068\u3081\u307e\u3059\u3002","breadcrumb":{"@id":"https:\/\/extan.jp\/?p=3636#breadcrumb"},"inLanguage":"ja","potentialAction":[{"@type":"ReadAction","target":["https:\/\/extan.jp\/?p=3636"]}]},{"@type":"BreadcrumbList","@id":"https:\/\/extan.jp\/?p=3636#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"\u30db\u30fc\u30e0","item":"https:\/\/extan.jp\/"},{"@type":"ListItem","position":2,"name":"\u3010VBA\u3011Excel \u304b\u3089Outlook\u306e\u4f1a\u8b70\u51fa\u5e2d\u4f9d\u983c\u3092\u9001\u4fe1\u3059\u308b\u65b9\u6cd5\uff01\u4f1a\u8b70\u5909\u66f4\u5f8c\u306e\u9001\u4fe1\u3082\u5bfe\u5fdc\uff01"}]},{"@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\/3636","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=3636"}],"version-history":[{"count":55,"href":"https:\/\/extan.jp\/index.php?rest_route=\/wp\/v2\/posts\/3636\/revisions"}],"predecessor-version":[{"id":10532,"href":"https:\/\/extan.jp\/index.php?rest_route=\/wp\/v2\/posts\/3636\/revisions\/10532"}],"wp:featuredmedia":[{"embeddable":true,"href":"https:\/\/extan.jp\/index.php?rest_route=\/wp\/v2\/media\/3672"}],"wp:attachment":[{"href":"https:\/\/extan.jp\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=3636"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/extan.jp\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=3636"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/extan.jp\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=3636"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}