{"id":948,"date":"2022-02-12T11:44:09","date_gmt":"2022-02-12T02:44:09","guid":{"rendered":"https:\/\/beiyan-tool.info\/?p=948"},"modified":"2022-02-12T12:10:55","modified_gmt":"2022-02-12T03:10:55","slug":"%e4%bb%96%e3%81%ae%e3%83%95%e3%82%a1%e3%82%a4%e3%83%ab%e3%81%ae%e4%b8%80%e9%83%a8%e3%82%92%e3%82%b3%e3%83%94%e3%83%bc%e3%81%99%e3%82%8b%e3%82%b3%e3%83%bc%e3%83%89%ef%bc%88excel-vba%ef%bc%89","status":"publish","type":"post","link":"https:\/\/beiyan-tool.info\/?p=948","title":{"rendered":"\u4ed6\u306e\u30d5\u30a1\u30a4\u30eb\u306e\u4e00\u90e8\u3092\u30b3\u30d4\u30fc\u3057\u3066\u8cbc\u308a\u4ed8\u3051\u308b\u30b3\u30fc\u30c9\uff08Excel VBA\uff09"},"content":{"rendered":"<p>Excel VBA\u3067\u4ed6\u306e\u30a8\u30af\u30bb\u30eb\u30d5\u30a1\u30a4\u30eb\u3092\u958b\u304d\u3001\u4e00\u90e8\u3092\u66f8\u5f0f\u3092\u542b\u3081\u3066\u30b3\u30d4\u30da\u3059\u308b\u30b3\u30fc\u30c9\u3092\u66f8\u304d\u307e\u3057\u305f\u3002<\/p>\n<p>&nbsp;<\/p>\n<pre class=\"lang:default decode:true\">    Dim strPath As String\r\n    Dim wbOpen As Workbook\r\n    \r\n    strPath = \"\u30d5\u30a1\u30a4\u30eb\u306e\u30d1\u30b9\"\r\n    \r\n    Set wbOpen = Workbooks.Open(strPath)\r\n    wbOpen.Worksheets(\"Sheet1\").Columns(\"A:D\").Copy\r\n\r\n    ThisWorkbook.Worksheets(\"Sheet1\").Range(\"A1\").PasteSpecial xlPasteAll\r\n    \r\n    Application.CutCopyMode = False\r\n    \r\n    wbOpen.Close<\/pre>\n<p>\u30b3\u30d4\u30fc\u5bfe\u8c61\u306e\u30d5\u30a1\u30a4\u30eb\u3092\u958b\u304dA\uff5eD\u5217\u3092\u30b3\u30d4\u30fc\u3057\u3066\u3001\u5143\u306e\u30d5\u30a1\u30a4\u30eb\u306b\u8cbc\u308a\u4ed8\u3051\u3057\u3066\u304b\u3089\u3001\u9589\u3058\u307e\u3059\u3002<\/p>\n<p>Application.CutCopyMode = False\u3000\u3068\u3059\u308b\u3053\u3068\u3067\u3001\u300c\u30af\u30ea\u30c3\u30d7\u30dc\u30fc\u30c9\u306b\u5927\u304d\u306a\u60c5\u5831\u304c\u3042\u308a\u307e\u3059\u3002\u2026\u300d\u3068\u3044\u3063\u305f\u30e1\u30c3\u30bb\u30fc\u30b8\u304c\u3067\u306a\u304f\u306a\u308a\u307e\u3059\u3002<br \/>\n\u4ee5\u4e0b\u306e\u3088\u3046\u306b\u3059\u308b\u3053\u3068\u3067\u3001\u30e1\u30c3\u30bb\u30fc\u30b8\u305d\u306e\u3082\u306e\u3092\u6291\u5236\u3059\u308b\u3053\u3068\u3082\u3067\u304d\u307e\u3059\u3002<\/p>\n<p>&nbsp;<\/p>\n<pre class=\"lang:default decode:true \">    Application.DisplayAlerts = False\r\n    \r\n    wbOpen.Close\r\n    \r\n    Application.DisplayAlerts = True\r\n<\/pre>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n","protected":false},"excerpt":{"rendered":"<p>Excel VBA\u3067\u4ed6\u306e\u30a8\u30af\u30bb\u30eb\u30d5\u30a1\u30a4\u30eb\u3092\u958b\u304d\u3001\u4e00\u90e8\u3092\u66f8\u5f0f\u3092\u542b\u3081\u3066\u30b3\u30d4\u30da\u3059\u308b\u30b3\u30fc\u30c9\u3092\u66f8\u304d\u307e\u3057\u305f\u3002 &nbsp; Dim strPath As String Dim wbOpen As Workbook &#8230; <\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"closed","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[23],"tags":[],"class_list":["post-948","post","type-post","status-publish","format-standard","hentry","category-programming"],"_links":{"self":[{"href":"https:\/\/beiyan-tool.info\/index.php?rest_route=\/wp\/v2\/posts\/948","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/beiyan-tool.info\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/beiyan-tool.info\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/beiyan-tool.info\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/beiyan-tool.info\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=948"}],"version-history":[{"count":2,"href":"https:\/\/beiyan-tool.info\/index.php?rest_route=\/wp\/v2\/posts\/948\/revisions"}],"predecessor-version":[{"id":950,"href":"https:\/\/beiyan-tool.info\/index.php?rest_route=\/wp\/v2\/posts\/948\/revisions\/950"}],"wp:attachment":[{"href":"https:\/\/beiyan-tool.info\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=948"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/beiyan-tool.info\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=948"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/beiyan-tool.info\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=948"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}