{"html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fakashi-keirin.hatenablog.com%2Fentry%2F2019%2F01%2F04%2F172404\" title=\"\u6307\u5b9a\u30d5\u30a9\u30eb\u30c0\u304b\u3089\u30d5\u30a1\u30a4\u30eb\u540d\u3092\u53d6\u308a\u51fa\u3059\u30af\u30e9\u30b9 - \u7d20\u4eba\u304cExcelVBA\u306b\u3088\u308b\u300c\u4e00\u4eba\u50cd\u304d\u65b9\u6539\u9769\u300d\u306b\u6311\u3080\u30d6\u30ed\u30b0\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","provider_url":"https://hatena.blog","title":"\u6307\u5b9a\u30d5\u30a9\u30eb\u30c0\u304b\u3089\u30d5\u30a1\u30a4\u30eb\u540d\u3092\u53d6\u308a\u51fa\u3059\u30af\u30e9\u30b9","author_url":"https://blog.hatena.ne.jp/akashi_keirin/","image_url":"https://cdn-ak.f.st-hatena.com/images/fotolife/a/akashi_keirin/20190104/20190104172034.jpg","categories":["VBA\u30af\u30e9\u30b9\u30fb\u30e2\u30b8\u30e5\u30fc\u30eb","VBA\u81ea\u4f5c\u30af\u30e9\u30b9"],"author_name":"akashi_keirin","url":"https://akashi-keirin.hatenablog.com/entry/2019/01/04/172404","provider_name":"Hatena Blog","blog_url":"https://akashi-keirin.hatenablog.com/","description":"\u6307\u5b9a\u3057\u305f\u30d5\u30a9\u30eb\u30c0\u304b\u3089\u30d5\u30a1\u30a4\u30eb\u540d\u3092\u53d6\u5f97\u3059\u308b\u30af\u30e9\u30b9 Twitter\u3067\u306f\u3051\u305f\u3055\u3093\u304c\u304a\u3063\u3057\u3083\u3063\u3066\u3044\u305f\u3082\u306e\u3092\u79c1\u3082\u4f5c\u3063\u3066\u307f\u305f\u3002 \u3042\u307e\u308a\u3046\u307e\u304f\u306a\u3044\u304b\u3082\u77e5\u308c\u306a\u3044\u3051\u308c\u3069\u2026\u2026\u3002 \u6307\u5b9a\u30d5\u30a9\u30eb\u30c0\u304b\u3089\u30d5\u30a1\u30a4\u30eb\u540d\u3092\u53d6\u5f97\u3059\u308b\u30af\u30e9\u30b9 \u30aa\u30d6\u30b8\u30a7\u30af\u30c8\u540d\u306f\u300cTargetFiles\u300d\u3068\u3057\u305f\u3002 \u30ea\u30b9\u30c8\uff11 \u30af\u30e9\u30b9\u30e2\u30b8\u30e5\u30fc\u30eb Option Explicit 'Variables' Private FoundFiles() As String Private Count_ As Long Private currentFolder As String Private currentIndex As Long Private HasNext_\u2026","width":"100%","type":"rich","height":"190","published":"2019-01-04 17:24:04","blog_title":"\u7d20\u4eba\u304cExcelVBA\u306b\u3088\u308b\u300c\u4e00\u4eba\u50cd\u304d\u65b9\u6539\u9769\u300d\u306b\u6311\u3080\u30d6\u30ed\u30b0","version":"1.0"}