{"image_url":"https://cdn-ak.f.st-hatena.com/images/fotolife/I/Infoment/20180731/20180731001102.png","provider_url":"https://hatena.blog","author_name":"Infoment","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Finfoment.hatenablog.com%2Fentry%2F2018%2F07%2F31%2F001624\" title=\"\u6307\u5b9a\u65e5\u304b\u3089\u76f4\u8fd1\u306e\u7fcc\u55b6\u696d\u65e5\u3092\u6c42\u3081\u308b - Infoment\u306e\u30d6\u30ed\u30b0 \uff5eExcel VBA\u596e\u95d8\u8a18\uff5e\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","url":"https://infoment.hatenablog.com/entry/2018/07/31/001624","title":"\u6307\u5b9a\u65e5\u304b\u3089\u76f4\u8fd1\u306e\u7fcc\u55b6\u696d\u65e5\u3092\u6c42\u3081\u308b","provider_name":"Hatena Blog","type":"rich","author_url":"https://blog.hatena.ne.jp/Infoment/","blog_url":"https://infoment.hatenablog.com/","categories":["Excel","VBA","\u30e6\u30fc\u30b6\u30fc\u5b9a\u7fa9\u95a2\u6570","\u4f5c\u3063\u3066\u307f\u305f"],"blog_title":"Infoment\u306e\u30d6\u30ed\u30b0 \uff5eExcel VBA\u596e\u95d8\u8a18\uff5e","height":"190","version":"1.0","description":"\u6628\u65e5\u306f\u3001\u6307\u5b9a\u6708\u306e\u6700\u7d42\u91d1\u66dc\u65e5\u3092\u6c42\u3081\u308b\u95a2\u6570\u3092\u7d39\u4ecb\u3057\u307e\u3057\u305f\u3002infoment.hatenablog.com\u3053\u306e\u6642\u306e\u52c9\u5f37\u4f1a\u3067\u3001\u6700\u5f8c\u306b\u3053\u3093\u306a\u8cea\u554f\u304c\u51fa\u307e\u3057\u305f\u3002\u300c\u6bce\u670820\u65e5\u306b\u306a\u3063\u305f\u3089\u3001MsgBox \u3067\u30e1\u30c3\u30bb\u30fc\u30b8\u3092\u51fa\u3057\u305f\u3044\u300d\u8a73\u7d30\u306f\u3001\u6b21\u306e\u901a\u308a\u3067\u3059\u3002 \u30a2\u30c9\u30a4\u30f3\u306b\u7d44\u307f\u8fbc\u3080\u3053\u3068\u3067\u3001\u7279\u5b9a\u306e\u65e5\u4ed8\u306b\u30e1\u30c3\u30bb\u30fc\u30b8\u3092\u51fa\u3059\u3068\u3053\u308d\u307e\u3067\u5b9f\u88c5\u6e08\u307f\u3002 20\u65e5\u304c\u571f\u65e5\u3060\u3068\u3001\u6c17\u4ed8\u304b\u305a\u306b20\u65e5\u3092\u901a\u308a\u904e\u304e\u3066\u3057\u307e\u3046\u305f\u3081\u3001\u3053\u308c\u3092\u4f55\u3068\u304b\u3057\u305f\u3044\u3002 \u305d\u3053\u3067\u3001\u7fcc\u6708\uff11\u65e5\u304b\u3089\u9006\u7b97\u3057\u3066\u6700\u7d42\u91d1\u66dc\u65e5\u3092\u6c42\u3081\u305f\u65b9\u6cd5\u3092\u5fdc\u7528\u3057\u3066\u3001\uff12\uff10\u65e5\u306e\u7fcc\u55b6\u696d\u65e5\u3092\u6c42\u3081\u3066\u307f\u307e\u3057\u305f\u3002 Function GetNextWorkday(target_date As Date) As Date Dim \u2026","published":"2018-07-31 00:16:24","width":"100%"}