{"id":4512,"date":"2023-07-10T12:13:27","date_gmt":"2023-07-10T12:13:27","guid":{"rendered":"https:\/\/statorials.org\/id\/vba-menyalin-baris-ke-lembar-lain-berdasarkan-kriteria\/"},"modified":"2023-07-10T12:13:27","modified_gmt":"2023-07-10T12:13:27","slug":"vba-menyalin-baris-ke-lembar-lain-berdasarkan-kriteria","status":"publish","type":"post","link":"https:\/\/statorials.org\/id\/vba-menyalin-baris-ke-lembar-lain-berdasarkan-kriteria\/","title":{"rendered":"Vba: menyalin baris ke lembar lain berdasarkan kriteria"},"content":{"rendered":"

<\/p>\n

\n

Anda dapat menggunakan sintaks berikut di VBA untuk menyalin setiap baris dalam lembar yang memenuhi kriteria tertentu ke lembar lain:<\/span><\/p>\n

 Sub<\/span> CopyToAnotherSheet()\n\n   Dim<\/span> LastRow As<\/span> Long\n\n  'Find last used row in a Column A of Sheet1<\/span>\n   With<\/span> Worksheets(\" Sheet1<\/span> \")\n      LastRow = .Cells(.Rows.Count, \" A<\/span> \").End(xlUp).Row\n   End With<\/span>\n\n   'Find first row where values should be posted in Sheet2<\/span>\n   With<\/span> Worksheets(\" Sheet2<\/span> \")\n      j = .Cells(.Rows.Count, \" A<\/span> \").End(xlUp).Row + 1\n   End With<\/span>\n   \n   'Paste each row that contains \"Mavs\" in column A of Sheet1 into Sheet2<\/span>\n   For<\/span> i = 1 TB<\/span> LastRow\n       With<\/span> Worksheets(\" Sheet1<\/span> \")\n           If<\/span> .Cells(i, 1).Value = \"Mavs\" Then<\/span>\n               .Rows(i).Copy Destination:=Worksheets(\" Sheet2<\/span> \").Range(\" A<\/span> \" & j)\n               j = j + 1\n           End If<\/span>\n       End With<\/span>\n   Next<\/span> i\n   \nEnd Sub\n<\/span><\/strong><\/span><\/pre>\n
 Makro khusus ini akan menyalin setiap baris Sheet1<\/strong> di mana kolom A sama dengan “Mavs” dan menempelkan setiap baris tersebut ke baris Sheet2<\/strong> berikutnya yang tersedia.<\/span><\/p>\n
 Contoh berikut menunjukkan cara menggunakan sintaksis ini dalam praktiknya.<\/span><\/p>\n
 Contoh: Salin baris ke sheet lain berdasarkan kriteria menggunakan VBA<\/strong><\/span><\/h2>\n
 Misalkan kita memiliki kumpulan data berikut di Lembar 1<\/strong> yang berisi informasi tentang berbagai pemain bola basket:<\/span> <\/p>\n
\"\"<\/p>\n
 Dan misalkan kita memiliki kumpulan data berikut di Sheet2<\/strong> :<\/span> <\/p>\n
\"\"<\/p>\n
 Perhatikan bahwa Sheet2<\/strong> hanya berisi data pemain tim Warriors.<\/span><\/p>\n
 Katakanlah kita ingin menyalin setiap baris dari Sheet1<\/strong> di mana kolom Team sama dengan Mavs dan menempelkan setiap baris tersebut ke baris berikutnya yang tersedia di Sheet2<\/strong> .<\/span><\/p>\n
 Kita dapat membuat makro berikut untuk melakukan ini:<\/span><\/p>\n
 Sub<\/span> CopyToAnotherSheet()\n\n   Dim<\/span> LastRow As<\/span> Long\n\n  'Find last used row in a Column A of Sheet1<\/span>\n   With<\/span> Worksheets(\" Sheet1<\/span> \")\n      LastRow = .Cells(.Rows.Count, \" A<\/span> \").End(xlUp).Row\n   End With<\/span>\n\n   'Find first row where values should be posted in Sheet2<\/span>\n   With<\/span> Worksheets(\" Sheet2<\/span> \")\n      j = .Cells(.Rows.Count, \" A<\/span> \").End(xlUp).Row + 1\n   End With<\/span>\n   \n   'Paste each row that contains \"Mavs\" in column A of Sheet1 into Sheet2<\/span>\n   For<\/span> i = 1 TB<\/span> LastRow\n       With<\/span> Worksheets(\" Sheet1<\/span> \")\n           If<\/span> .Cells(i, 1).Value = \"Mavs\" Then<\/span>\n               .Rows(i).Copy Destination:=Worksheets(\" Sheet2<\/span> \").Range(\" A<\/span> \" & j)\n               j = j + 1\n           End If<\/span>\n       End With<\/span>\n   Next<\/span> i\n   \nEnd Sub<\/span><\/strong><\/span><\/pre>\n
 Saat kami menjalankan makro ini, kami menerima output berikut di Sheet2<\/strong> :<\/span> <\/p>\n
\"\"<\/p>\n
 Perhatikan bahwa setiap baris di Sheet1<\/strong> yang nama timnya sama dengan Mavs ditempelkan ke baris berikutnya yang tersedia di Sheet2<\/strong> .<\/span><\/p>\n
 Catatan<\/strong> : Anda dapat menemukan dokumentasi lengkap untuk metode VBA Copy<\/b> di sini<\/a> .<\/span><\/p>\n
 Sumber daya tambahan<\/strong><\/span><\/h2>\n
 Tutorial berikut menjelaskan cara melakukan tugas umum lainnya di VBA:<\/span><\/p>\n
 VBA: Cara menemukan baris yang terakhir digunakan<\/a>
 VBA: Cara menghitung jumlah baris dalam jangkauan<\/a>
 VBA: Cara menghitung jumlah kolom yang digunakan<\/a><\/span><\/p>\n","protected":false},"excerpt":{"rendered":"
Anda dapat menggunakan sintaks berikut di VBA untuk menyalin setiap baris dalam lembar yang memenuhi kriteria tertentu ke lembar lain: Sub CopyToAnotherSheet() Dim LastRow As Long ‘Find last used row in a Column A of Sheet1 With Worksheets(” Sheet1 “) LastRow = .Cells(.Rows.Count, ” A “).End(xlUp).Row End With ‘Find first row where values should be […]<\/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":"\nVBA: menyalin baris ke lembar lain berdasarkan kriteria - Statorial<\/title>\n<meta name=\"description\" content=\"Tutorial ini menjelaskan cara menyalin baris dari satu lembar ke lembar lainnya berdasarkan kriteria menggunakan VBA, beserta sebuah contoh.\" \/>\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\/vba-menyalin-baris-ke-lembar-lain-berdasarkan-kriteria\/\" \/>\n<meta property=\"og:locale\" content=\"id_ID\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"VBA: menyalin baris ke lembar lain berdasarkan kriteria - Statorial\" \/>\n<meta property=\"og:description\" content=\"Tutorial ini menjelaskan cara menyalin baris dari satu lembar ke lembar lainnya berdasarkan kriteria menggunakan VBA, beserta sebuah contoh.\" \/>\n<meta property=\"og:url\" content=\"https:\/\/statorials.org\/id\/vba-menyalin-baris-ke-lembar-lain-berdasarkan-kriteria\/\" \/>\n<meta property=\"og:site_name\" content=\"Statorials\" \/>\n<meta property=\"article:published_time\" content=\"2023-07-10T12:13:27+00:00\" \/>\n<meta property=\"og:image\" content=\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/cb1.png\" \/>\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\/vba-menyalin-baris-ke-lembar-lain-berdasarkan-kriteria\/\",\"url\":\"https:\/\/statorials.org\/id\/vba-menyalin-baris-ke-lembar-lain-berdasarkan-kriteria\/\",\"name\":\"VBA: menyalin baris ke lembar lain berdasarkan kriteria - Statorial\",\"isPartOf\":{\"@id\":\"https:\/\/statorials.org\/id\/#website\"},\"datePublished\":\"2023-07-10T12:13:27+00:00\",\"dateModified\":\"2023-07-10T12:13:27+00:00\",\"author\":{\"@id\":\"https:\/\/statorials.org\/id\/#\/schema\/person\/3d17a1160dd2d052b7c78e502cb9ec81\"},\"description\":\"Tutorial ini menjelaskan cara menyalin baris dari satu lembar ke lembar lainnya berdasarkan kriteria menggunakan VBA, beserta sebuah contoh.\",\"breadcrumb\":{\"@id\":\"https:\/\/statorials.org\/id\/vba-menyalin-baris-ke-lembar-lain-berdasarkan-kriteria\/#breadcrumb\"},\"inLanguage\":\"id\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\/\/statorials.org\/id\/vba-menyalin-baris-ke-lembar-lain-berdasarkan-kriteria\/\"]}]},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\/\/statorials.org\/id\/vba-menyalin-baris-ke-lembar-lain-berdasarkan-kriteria\/#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"Home\",\"item\":\"https:\/\/statorials.org\/id\/\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"Vba: menyalin baris ke lembar lain berdasarkan kriteria\"}]},{\"@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: menyalin baris ke lembar lain berdasarkan kriteria - Statorial","description":"Tutorial ini menjelaskan cara menyalin baris dari satu lembar ke lembar lainnya berdasarkan kriteria menggunakan VBA, beserta sebuah contoh.","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\/vba-menyalin-baris-ke-lembar-lain-berdasarkan-kriteria\/","og_locale":"id_ID","og_type":"article","og_title":"VBA: menyalin baris ke lembar lain berdasarkan kriteria - Statorial","og_description":"Tutorial ini menjelaskan cara menyalin baris dari satu lembar ke lembar lainnya berdasarkan kriteria menggunakan VBA, beserta sebuah contoh.","og_url":"https:\/\/statorials.org\/id\/vba-menyalin-baris-ke-lembar-lain-berdasarkan-kriteria\/","og_site_name":"Statorials","article_published_time":"2023-07-10T12:13:27+00:00","og_image":[{"url":"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/cb1.png"}],"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\/vba-menyalin-baris-ke-lembar-lain-berdasarkan-kriteria\/","url":"https:\/\/statorials.org\/id\/vba-menyalin-baris-ke-lembar-lain-berdasarkan-kriteria\/","name":"VBA: menyalin baris ke lembar lain berdasarkan kriteria - Statorial","isPartOf":{"@id":"https:\/\/statorials.org\/id\/#website"},"datePublished":"2023-07-10T12:13:27+00:00","dateModified":"2023-07-10T12:13:27+00:00","author":{"@id":"https:\/\/statorials.org\/id\/#\/schema\/person\/3d17a1160dd2d052b7c78e502cb9ec81"},"description":"Tutorial ini menjelaskan cara menyalin baris dari satu lembar ke lembar lainnya berdasarkan kriteria menggunakan VBA, beserta sebuah contoh.","breadcrumb":{"@id":"https:\/\/statorials.org\/id\/vba-menyalin-baris-ke-lembar-lain-berdasarkan-kriteria\/#breadcrumb"},"inLanguage":"id","potentialAction":[{"@type":"ReadAction","target":["https:\/\/statorials.org\/id\/vba-menyalin-baris-ke-lembar-lain-berdasarkan-kriteria\/"]}]},{"@type":"BreadcrumbList","@id":"https:\/\/statorials.org\/id\/vba-menyalin-baris-ke-lembar-lain-berdasarkan-kriteria\/#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"Home","item":"https:\/\/statorials.org\/id\/"},{"@type":"ListItem","position":2,"name":"Vba: menyalin baris ke lembar lain berdasarkan kriteria"}]},{"@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\/4512"}],"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=4512"}],"version-history":[{"count":0,"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/posts\/4512\/revisions"}],"wp:attachment":[{"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/media?parent=4512"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/categories?post=4512"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/tags?post=4512"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}