{"id":4410,"date":"2023-07-11T08:00:56","date_gmt":"2023-07-11T08:00:56","guid":{"rendered":"https:\/\/statorials.org\/id\/tanggal-ekstrak-vba-dari-buku-kerja-lain\/"},"modified":"2023-07-11T08:00:56","modified_gmt":"2023-07-11T08:00:56","slug":"tanggal-ekstrak-vba-dari-buku-kerja-lain","status":"publish","type":"post","link":"https:\/\/statorials.org\/id\/tanggal-ekstrak-vba-dari-buku-kerja-lain\/","title":{"rendered":"Vba: cara mengekstrak data dari buku kerja lain"},"content":{"rendered":"<p><\/p>\n<hr>\n<p><span style=\"color: #000000;\">Anda bisa menggunakan sintaks berikut di VBA untuk mengekstrak data dari buku kerja lain:<\/span><\/p>\n<pre style=\"background-color: #ececec; font-size: 15px;\"> <span style=\"color: #000000;\"><strong><span style=\"color: #0000ff;\">SubExtractData<\/span> ()\n    \n    <span style=\"color: #008000;\">'turn off screen updates to make this run faster<\/span>\n    Application.ScreenUpdating = False\n    \n    <span style=\"color: #008000;\">'specify workbook we want to extract data from<\/span>\n    Set wb = Workbooks.Open(\" <span style=\"color: #ff0000;\">C:\\Users\\bobbi\\OneDrive\\Desktop\\my_data.xlsx<\/span> \")\n    \n    <span style=\"color: #008000;\">'extract all data from Sheet1 and paste as new sheet in current workbook<\/span>\n    wb.Sheets(\" <span style=\"color: #ff0000;\">Sheet1<\/span> \").Copy After:=ThisWorkbook.Sheets(1)\n    \n    <span style=\"color: #008000;\">'do not save any changes to workbook we extract data from<\/span>\n    wb.Close SaveChanges:=False\n    \n    <span style=\"color: #008000;\">'turn screen updating back on<\/span>\n    Application.ScreenUpdating = True\n    \n<span style=\"color: #0000ff;\">End Sub\n<\/span><\/strong><\/span><\/pre>\n<p> <span style=\"color: #000000;\">Makro khusus ini membuka buku kerja bernama <strong>my_data.xlsx<\/strong> yang terletak di lokasi berikut:<\/span><\/p>\n<p> <span style=\"color: #000000;\"><strong>C:\\Users\\Bob\\Desktop\\my_data.xlsx<\/strong><\/span><\/p>\n<p> <span style=\"color: #000000;\">Kemudian menyalin semua data dari sheet yang disebut <strong>Sheet1<\/strong> ke dalam buku kerja ini dan menyalinnya ke dalam sheet langsung setelah sheet pertama di buku kerja kita yang sedang aktif.<\/span><\/p>\n<p> <span style=\"color: #000000;\"><strong>Catatan<\/strong> : Baris <strong>Application.ScreenUpdating = False<\/strong> memberitahu VBA untuk menjalankan proses ini di latar belakang agar berjalan lebih cepat.<\/span><\/p>\n<p> <span style=\"color: #000000;\">Contoh berikut menunjukkan cara menggunakan sintaksis ini dalam praktiknya.<\/span><\/p>\n<h2> <span style=\"color: #000000;\"><strong>Contoh: Ekstrak data dari buku kerja lain menggunakan VBA<\/strong><\/span><\/h2>\n<p> <span style=\"color: #000000;\">Katakanlah kita membuka buku kerja Excel berikut dan kita melihatnya:<\/span> <\/p>\n<p><img decoding=\"async\" loading=\"lazy\" class=\" wp-image-34574 aligncenter\" src=\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/poste1.jpg\" alt=\"\" width=\"492\" height=\"387\" srcset=\"\" sizes=\"\"><\/p>\n<p> <span style=\"color: #000000;\">Sekarang anggaplah kita mempunyai buku kerja lain yang ditutup tetapi berisi data berikut:<\/span> <\/p>\n<p><img decoding=\"async\" loading=\"lazy\" class=\" wp-image-34575 aligncenter\" src=\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/poste2.jpg\" alt=\"\" width=\"511\" height=\"404\" srcset=\"\" sizes=\"\"><\/p>\n<p> <span style=\"color: #000000;\">Kita bisa menggunakan makro berikut untuk mengekstrak data dari <strong>lembar 1<\/strong> buku kerja tertutup ini dan menempelkannya ke lembar baru langsung setelah lembar pertama buku kerja kita yang sedang terbuka:<\/span><\/p>\n<pre style=\"background-color: #ececec; font-size: 15px;\"> <span style=\"color: #000000;\"><strong><span style=\"color: #0000ff;\">SubExtractData<\/span> ()\n    \n    <span style=\"color: #008000;\">'turn off screen updates to make this run faster<\/span>\n    Application.ScreenUpdating = False\n    \n    <span style=\"color: #008000;\">'specify workbook we want to extract data from<\/span>\n    Set wb = Workbooks.Open(\" <span style=\"color: #ff0000;\">C:\\Users\\bobbi\\OneDrive\\Desktop\\my_data.xlsx<\/span> \")\n    \n    <span style=\"color: #008000;\">'extract all data from Sheet1 and paste as new sheet in current workbook<\/span>\n    wb.Sheets(\" <span style=\"color: #ff0000;\">Sheet1<\/span> \").Copy After:=ThisWorkbook.Sheets(1)\n    \n    <span style=\"color: #008000;\">'do not save any changes to workbook we extract data from<\/span>\n    wb.Close SaveChanges:=False\n    \n    <span style=\"color: #008000;\">'turn screen updating back on<\/span>\n    Application.ScreenUpdating = True\n    \n<span style=\"color: #0000ff;\">End Sub<\/span><\/strong><\/span><\/pre>\n<p> <span style=\"color: #000000;\">Saat kami menjalankan makro ini, kami menerima keluaran berikut:<\/span> <\/p>\n<p><img decoding=\"async\" loading=\"lazy\" class=\" wp-image-34576 aligncenter\" src=\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/poste3.jpg\" alt=\"\" width=\"480\" height=\"383\" srcset=\"\" sizes=\"\"><\/p>\n<p> <span style=\"color: #000000;\"><span style=\"color: #000000;\">Perhatikan bahwa data dari buku kerja tertutup telah diekstraksi dan ditempelkan sebagai lembar baru ke dalam buku kerja kami yang sedang aktif.<\/span><\/span><\/p>\n<p> <span style=\"color: #000000;\">Jangan ragu untuk mengganti nama sheet baru karena identik dengan sheet saat ini.<\/span><\/p>\n<h2> <span style=\"color: #000000;\"><strong>Sumber daya tambahan<\/strong><\/span><\/h2>\n<p> <span style=\"color: #000000;\">Tutorial berikut menjelaskan cara melakukan tugas umum lainnya di VBA:<\/span><\/p>\n<p> <span style=\"color: #000000;\"><a href=\"https:\/\/statorials.org\/id\/vba-menghitung-jumlah-lembar\/\" target=\"_blank\" rel=\"noopener\">VBA: Cara menghitung jumlah lembar dalam buku kerja<\/a><br \/> <a href=\"https:\/\/statorials.org\/id\/vba-menyisipkan-beberapa-kolom\/\" target=\"_blank\" rel=\"noopener\">VBA: cara menyisipkan banyak kolom<\/a><br \/> <a href=\"https:\/\/statorials.org\/id\/vba-menyisipkan-banyak-baris\/\" target=\"_blank\" rel=\"noopener\">VBA: cara menyisipkan banyak baris<\/a><\/span><\/p>\n","protected":false},"excerpt":{"rendered":"<p>Anda bisa menggunakan sintaks berikut di VBA untuk mengekstrak data dari buku kerja lain: SubExtractData () &#8216;turn off screen updates to make this run faster Application.ScreenUpdating = False &#8216;specify workbook we want to extract data from Set wb = Workbooks.Open(&#8221; C:\\Users\\bobbi\\OneDrive\\Desktop\\my_data.xlsx &#8220;) &#8216;extract all data from Sheet1 and paste as new sheet in current workbook [&hellip;]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[11],"tags":[],"yoast_head":"<!-- This site is optimized with the Yoast SEO plugin v21.5 - https:\/\/yoast.com\/wordpress\/plugins\/seo\/ -->\n<title>VBA: Cara mengekstrak data dari buku kerja lain - Statorials<\/title>\n<meta name=\"description\" content=\"Tutorial ini menjelaskan cara menggunakan VBA untuk mengekstrak data dari buku kerja lain, termasuk contoh lengkapnya.\" \/>\n<meta name=\"robots\" content=\"index, follow, max-snippet:-1, max-image-preview:large, max-video-preview:-1\" \/>\n<link rel=\"canonical\" href=\"https:\/\/statorials.org\/id\/tanggal-ekstrak-vba-dari-buku-kerja-lain\/\" \/>\n<meta property=\"og:locale\" content=\"id_ID\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"VBA: Cara mengekstrak data dari buku kerja lain - Statorials\" \/>\n<meta property=\"og:description\" content=\"Tutorial ini menjelaskan cara menggunakan VBA untuk mengekstrak data dari buku kerja lain, termasuk contoh lengkapnya.\" \/>\n<meta property=\"og:url\" content=\"https:\/\/statorials.org\/id\/tanggal-ekstrak-vba-dari-buku-kerja-lain\/\" \/>\n<meta property=\"og:site_name\" content=\"Statorials\" \/>\n<meta property=\"article:published_time\" content=\"2023-07-11T08:00:56+00:00\" \/>\n<meta property=\"og:image\" content=\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/poste1.jpg\" \/>\n<meta name=\"author\" content=\"Benjamin anderson\" \/>\n<meta name=\"twitter:card\" content=\"summary_large_image\" \/>\n<meta name=\"twitter:label1\" content=\"Ditulis oleh\" \/>\n\t<meta name=\"twitter:data1\" content=\"Benjamin anderson\" \/>\n\t<meta name=\"twitter:label2\" content=\"Estimasi waktu membaca\" \/>\n\t<meta name=\"twitter:data2\" content=\"2 menit\" \/>\n<script type=\"application\/ld+json\" class=\"yoast-schema-graph\">{\"@context\":\"https:\/\/schema.org\",\"@graph\":[{\"@type\":\"WebPage\",\"@id\":\"https:\/\/statorials.org\/id\/tanggal-ekstrak-vba-dari-buku-kerja-lain\/\",\"url\":\"https:\/\/statorials.org\/id\/tanggal-ekstrak-vba-dari-buku-kerja-lain\/\",\"name\":\"VBA: Cara mengekstrak data dari buku kerja lain - Statorials\",\"isPartOf\":{\"@id\":\"https:\/\/statorials.org\/id\/#website\"},\"datePublished\":\"2023-07-11T08:00:56+00:00\",\"dateModified\":\"2023-07-11T08:00:56+00:00\",\"author\":{\"@id\":\"https:\/\/statorials.org\/id\/#\/schema\/person\/3d17a1160dd2d052b7c78e502cb9ec81\"},\"description\":\"Tutorial ini menjelaskan cara menggunakan VBA untuk mengekstrak data dari buku kerja lain, termasuk contoh lengkapnya.\",\"breadcrumb\":{\"@id\":\"https:\/\/statorials.org\/id\/tanggal-ekstrak-vba-dari-buku-kerja-lain\/#breadcrumb\"},\"inLanguage\":\"id\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\/\/statorials.org\/id\/tanggal-ekstrak-vba-dari-buku-kerja-lain\/\"]}]},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\/\/statorials.org\/id\/tanggal-ekstrak-vba-dari-buku-kerja-lain\/#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"Home\",\"item\":\"https:\/\/statorials.org\/id\/\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"Vba: cara mengekstrak data dari buku kerja lain\"}]},{\"@type\":\"WebSite\",\"@id\":\"https:\/\/statorials.org\/id\/#website\",\"url\":\"https:\/\/statorials.org\/id\/\",\"name\":\"Statorials\",\"description\":\"Panduan anda untuk kompetensi statistik!\",\"potentialAction\":[{\"@type\":\"SearchAction\",\"target\":{\"@type\":\"EntryPoint\",\"urlTemplate\":\"https:\/\/statorials.org\/id\/?s={search_term_string}\"},\"query-input\":\"required name=search_term_string\"}],\"inLanguage\":\"id\"},{\"@type\":\"Person\",\"@id\":\"https:\/\/statorials.org\/id\/#\/schema\/person\/3d17a1160dd2d052b7c78e502cb9ec81\",\"name\":\"Benjamin anderson\",\"image\":{\"@type\":\"ImageObject\",\"inLanguage\":\"id\",\"@id\":\"https:\/\/statorials.org\/id\/#\/schema\/person\/image\/\",\"url\":\"http:\/\/statorials.org\/id\/wp-content\/uploads\/2023\/10\/Dr.-Benjamin-Anderson-96x96.jpg\",\"contentUrl\":\"http:\/\/statorials.org\/id\/wp-content\/uploads\/2023\/10\/Dr.-Benjamin-Anderson-96x96.jpg\",\"caption\":\"Benjamin anderson\"},\"description\":\"Halo, saya Benjamin, pensiunan profesor statistika yang menjadi guru Statorial yang berdedikasi. Dengan pengalaman dan keahlian yang luas di bidang statistika, saya ingin berbagi ilmu untuk memberdayakan mahasiswa melalui Statorials. Baca selengkapnya\",\"sameAs\":[\"http:\/\/statorials.org\/id\"]}]}<\/script>\n<!-- \/ Yoast SEO plugin. -->","yoast_head_json":{"title":"VBA: Cara mengekstrak data dari buku kerja lain - Statorials","description":"Tutorial ini menjelaskan cara menggunakan VBA untuk mengekstrak data dari buku kerja lain, termasuk contoh lengkapnya.","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:\/\/statorials.org\/id\/tanggal-ekstrak-vba-dari-buku-kerja-lain\/","og_locale":"id_ID","og_type":"article","og_title":"VBA: Cara mengekstrak data dari buku kerja lain - Statorials","og_description":"Tutorial ini menjelaskan cara menggunakan VBA untuk mengekstrak data dari buku kerja lain, termasuk contoh lengkapnya.","og_url":"https:\/\/statorials.org\/id\/tanggal-ekstrak-vba-dari-buku-kerja-lain\/","og_site_name":"Statorials","article_published_time":"2023-07-11T08:00:56+00:00","og_image":[{"url":"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/poste1.jpg"}],"author":"Benjamin anderson","twitter_card":"summary_large_image","twitter_misc":{"Ditulis oleh":"Benjamin anderson","Estimasi waktu membaca":"2 menit"},"schema":{"@context":"https:\/\/schema.org","@graph":[{"@type":"WebPage","@id":"https:\/\/statorials.org\/id\/tanggal-ekstrak-vba-dari-buku-kerja-lain\/","url":"https:\/\/statorials.org\/id\/tanggal-ekstrak-vba-dari-buku-kerja-lain\/","name":"VBA: Cara mengekstrak data dari buku kerja lain - Statorials","isPartOf":{"@id":"https:\/\/statorials.org\/id\/#website"},"datePublished":"2023-07-11T08:00:56+00:00","dateModified":"2023-07-11T08:00:56+00:00","author":{"@id":"https:\/\/statorials.org\/id\/#\/schema\/person\/3d17a1160dd2d052b7c78e502cb9ec81"},"description":"Tutorial ini menjelaskan cara menggunakan VBA untuk mengekstrak data dari buku kerja lain, termasuk contoh lengkapnya.","breadcrumb":{"@id":"https:\/\/statorials.org\/id\/tanggal-ekstrak-vba-dari-buku-kerja-lain\/#breadcrumb"},"inLanguage":"id","potentialAction":[{"@type":"ReadAction","target":["https:\/\/statorials.org\/id\/tanggal-ekstrak-vba-dari-buku-kerja-lain\/"]}]},{"@type":"BreadcrumbList","@id":"https:\/\/statorials.org\/id\/tanggal-ekstrak-vba-dari-buku-kerja-lain\/#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"Home","item":"https:\/\/statorials.org\/id\/"},{"@type":"ListItem","position":2,"name":"Vba: cara mengekstrak data dari buku kerja lain"}]},{"@type":"WebSite","@id":"https:\/\/statorials.org\/id\/#website","url":"https:\/\/statorials.org\/id\/","name":"Statorials","description":"Panduan anda untuk kompetensi statistik!","potentialAction":[{"@type":"SearchAction","target":{"@type":"EntryPoint","urlTemplate":"https:\/\/statorials.org\/id\/?s={search_term_string}"},"query-input":"required name=search_term_string"}],"inLanguage":"id"},{"@type":"Person","@id":"https:\/\/statorials.org\/id\/#\/schema\/person\/3d17a1160dd2d052b7c78e502cb9ec81","name":"Benjamin anderson","image":{"@type":"ImageObject","inLanguage":"id","@id":"https:\/\/statorials.org\/id\/#\/schema\/person\/image\/","url":"http:\/\/statorials.org\/id\/wp-content\/uploads\/2023\/10\/Dr.-Benjamin-Anderson-96x96.jpg","contentUrl":"http:\/\/statorials.org\/id\/wp-content\/uploads\/2023\/10\/Dr.-Benjamin-Anderson-96x96.jpg","caption":"Benjamin anderson"},"description":"Halo, saya Benjamin, pensiunan profesor statistika yang menjadi guru Statorial yang berdedikasi. Dengan pengalaman dan keahlian yang luas di bidang statistika, saya ingin berbagi ilmu untuk memberdayakan mahasiswa melalui Statorials. Baca selengkapnya","sameAs":["http:\/\/statorials.org\/id"]}]}},"yoast_meta":{"yoast_wpseo_title":"","yoast_wpseo_metadesc":"","yoast_wpseo_canonical":""},"_links":{"self":[{"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/posts\/4410"}],"collection":[{"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/comments?post=4410"}],"version-history":[{"count":0,"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/posts\/4410\/revisions"}],"wp:attachment":[{"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/media?parent=4410"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/categories?post=4410"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/tags?post=4410"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}