{"id":4395,"date":"2023-07-11T10:50:32","date_gmt":"2023-07-11T10:50:32","guid":{"rendered":"https:\/\/statorials.org\/id\/vba-mengubah-urutan\/"},"modified":"2023-07-11T10:50:32","modified_gmt":"2023-07-11T10:50:32","slug":"vba-mengubah-urutan","status":"publish","type":"post","link":"https:\/\/statorials.org\/id\/vba-mengubah-urutan\/","title":{"rendered":"Cara mengubah urutan rentang di vba (dengan contoh)"},"content":{"rendered":"<p><\/p>\n<hr>\n<p><span style=\"color: #000000;\">Anda dapat menggunakan sintaks dasar berikut untuk mengubah urutan rentang menggunakan VBA:<\/span><\/p>\n<pre style=\"background-color: #ececec; font-size: 15px;\"> <span style=\"color: #000000;\"><strong><span style=\"color: #0000ff;\">SubTransposeRange<\/span> ()\n\n    <span style=\"color: #008000;\">'specify range to transpose<\/span>\n    MyRange = Range(\" <span style=\"color: #ff0000;\">A1:B5<\/span> \")\n    \n    <span style=\"color: #008000;\">'find dimensions of range<\/span>\n    XUpper = UBound(MyRange, 1)\n    XLower = LBound(MyRange, 1)\n    YUpper = UBound(MyRange, 2)\n    YLower = LBound(MyRange, 2)\n    \n    <span style=\"color: #008000;\">'transpose range<\/span>\n    Range(\" <span style=\"color: #ff0000;\">D1<\/span> \").Resize(YUpper - YLower + 1, XUpper - XLower + 1).Value = _\n      WorksheetFunction.Transpose(MyRange)\n      \n<span style=\"color: #0000ff;\">End Sub\n<\/span><\/strong><\/span><\/pre>\n<p> <span style=\"color: #000000;\">Contoh khusus ini akan mengubah posisi sel dalam rentang <strong>A1:B5<\/strong> dan menampilkan rentang yang dialihkan mulai dari sel <strong>D1<\/strong> .<\/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: Cara mengubah urutan rentang di VBA<\/strong><\/span><\/h2>\n<p> <span style=\"color: #000000;\">Katakanlah kita memiliki kumpulan data berikut di Excel yang berisi informasi tentang berbagai pemain bola basket:<\/span> <\/p>\n<p><img decoding=\"async\" loading=\"lazy\" class=\" wp-image-34474 aligncenter\" src=\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/vt1.jpg\" alt=\"\" width=\"502\" height=\"411\" srcset=\"\" sizes=\"\"><\/p>\n<p> <span style=\"color: #000000;\">Katakanlah kita ingin mengubah urutan rentang A1:B5 dan menampilkan rentang yang dialihkan mulai dari sel <strong>D1<\/strong> .<\/span><\/p>\n<p> <span style=\"color: #000000;\">Kita dapat membuat makro berikut untuk melakukan ini:<\/span><\/p>\n<pre style=\"background-color: #ececec; font-size: 15px;\"> <span style=\"color: #000000;\"><strong><span style=\"color: #0000ff;\">SubTransposeRange<\/span> ()\n\n    <span style=\"color: #008000;\">'specify range to transpose<\/span>\n    MyRange = Range(\" <span style=\"color: #ff0000;\">A1:B5<\/span> \")\n    \n    <span style=\"color: #008000;\">'find dimensions of range<\/span>\n    XUpper = UBound(MyRange, 1)\n    XLower = LBound(MyRange, 1)\n    YUpper = UBound(MyRange, 2)\n    YLower = LBound(MyRange, 2)\n    \n    <span style=\"color: #008000;\">'transpose range<\/span>\n    Range(\" <span style=\"color: #ff0000;\">D1<\/span> \").Resize(YUpper - YLower + 1, XUpper - XLower + 1).Value = _\n      WorksheetFunction.Transpose(MyRange)\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-34475 aligncenter\" src=\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/vt2.jpg\" alt=\"\" width=\"619\" height=\"396\" srcset=\"\" sizes=\"\"><\/p>\n<p> <span style=\"color: #000000;\"><span style=\"color: #000000;\">Perhatikan bahwa rentang yang dialihkan ditampilkan mulai dari sel <strong>D1<\/strong> .<\/span><\/span><\/p>\n<p> <span style=\"color: #000000;\">Dengan kata lain, baris dan kolomnya dibalik.<\/span><\/p>\n<p> <span style=\"color: #000000;\">Untuk mengubah urutan rentang yang berbeda, cukup ganti <strong>A1:B5<\/strong> di makro dengan rentang yang berbeda.<\/span><\/p>\n<p> <span style=\"color: #000000;\"><strong>Catatan<\/strong> : Anda dapat menemukan dokumentasi lengkap untuk metode VBA <strong>Transpose<\/strong> <a href=\"https:\/\/learn.microsoft.com\/en-us\/office\/vba\/api\/excel.worksheetfunction.transpose\" target=\"_blank\" rel=\"noopener\">di sini<\/a> .<\/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-sel-dengan-teks-tertentu\/\" target=\"_blank\" rel=\"noopener\">VBA: Cara menghitung sel dengan teks tertentu<\/a><br \/> <a href=\"https:\/\/statorials.org\/id\/vba-menghitung-baris-dalam-jangkauan\/\" target=\"_blank\" rel=\"noopener\">VBA: Cara menghitung jumlah baris dalam jangkauan<\/a><br \/> VBA: Cara menulis fungsi COUNTIF dan COUNTIFS<\/span><\/p>\n","protected":false},"excerpt":{"rendered":"<p>Anda dapat menggunakan sintaks dasar berikut untuk mengubah urutan rentang menggunakan VBA: SubTransposeRange () &#8216;specify range to transpose MyRange = Range(&#8221; A1:B5 &#8220;) &#8216;find dimensions of range XUpper = UBound(MyRange, 1) XLower = LBound(MyRange, 1) YUpper = UBound(MyRange, 2) YLower = LBound(MyRange, 2) &#8216;transpose range Range(&#8221; D1 &#8220;).Resize(YUpper &#8211; YLower + 1, XUpper &#8211; XLower [&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>Cara Mengubah Urutan Rentang di VBA (dengan Contoh) - Statorials<\/title>\n<meta name=\"description\" content=\"Tutorial ini menjelaskan cara mengubah urutan rentang di VBA, dengan 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-mengubah-urutan\/\" \/>\n<meta property=\"og:locale\" content=\"id_ID\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"Cara Mengubah Urutan Rentang di VBA (dengan Contoh) - Statorials\" \/>\n<meta property=\"og:description\" content=\"Tutorial ini menjelaskan cara mengubah urutan rentang di VBA, dengan sebuah contoh.\" \/>\n<meta property=\"og:url\" content=\"https:\/\/statorials.org\/id\/vba-mengubah-urutan\/\" \/>\n<meta property=\"og:site_name\" content=\"Statorials\" \/>\n<meta property=\"article:published_time\" content=\"2023-07-11T10:50:32+00:00\" \/>\n<meta property=\"og:image\" content=\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/vt1.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=\"1 menit\" \/>\n<script type=\"application\/ld+json\" class=\"yoast-schema-graph\">{\"@context\":\"https:\/\/schema.org\",\"@graph\":[{\"@type\":\"WebPage\",\"@id\":\"https:\/\/statorials.org\/id\/vba-mengubah-urutan\/\",\"url\":\"https:\/\/statorials.org\/id\/vba-mengubah-urutan\/\",\"name\":\"Cara Mengubah Urutan Rentang di VBA (dengan Contoh) - Statorials\",\"isPartOf\":{\"@id\":\"https:\/\/statorials.org\/id\/#website\"},\"datePublished\":\"2023-07-11T10:50:32+00:00\",\"dateModified\":\"2023-07-11T10:50:32+00:00\",\"author\":{\"@id\":\"https:\/\/statorials.org\/id\/#\/schema\/person\/3d17a1160dd2d052b7c78e502cb9ec81\"},\"description\":\"Tutorial ini menjelaskan cara mengubah urutan rentang di VBA, dengan sebuah contoh.\",\"breadcrumb\":{\"@id\":\"https:\/\/statorials.org\/id\/vba-mengubah-urutan\/#breadcrumb\"},\"inLanguage\":\"id\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\/\/statorials.org\/id\/vba-mengubah-urutan\/\"]}]},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\/\/statorials.org\/id\/vba-mengubah-urutan\/#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"Home\",\"item\":\"https:\/\/statorials.org\/id\/\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"Cara mengubah urutan rentang di vba (dengan contoh)\"}]},{\"@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":"Cara Mengubah Urutan Rentang di VBA (dengan Contoh) - Statorials","description":"Tutorial ini menjelaskan cara mengubah urutan rentang di VBA, dengan 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-mengubah-urutan\/","og_locale":"id_ID","og_type":"article","og_title":"Cara Mengubah Urutan Rentang di VBA (dengan Contoh) - Statorials","og_description":"Tutorial ini menjelaskan cara mengubah urutan rentang di VBA, dengan sebuah contoh.","og_url":"https:\/\/statorials.org\/id\/vba-mengubah-urutan\/","og_site_name":"Statorials","article_published_time":"2023-07-11T10:50:32+00:00","og_image":[{"url":"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/vt1.jpg"}],"author":"Benjamin anderson","twitter_card":"summary_large_image","twitter_misc":{"Ditulis oleh":"Benjamin anderson","Estimasi waktu membaca":"1 menit"},"schema":{"@context":"https:\/\/schema.org","@graph":[{"@type":"WebPage","@id":"https:\/\/statorials.org\/id\/vba-mengubah-urutan\/","url":"https:\/\/statorials.org\/id\/vba-mengubah-urutan\/","name":"Cara Mengubah Urutan Rentang di VBA (dengan Contoh) - Statorials","isPartOf":{"@id":"https:\/\/statorials.org\/id\/#website"},"datePublished":"2023-07-11T10:50:32+00:00","dateModified":"2023-07-11T10:50:32+00:00","author":{"@id":"https:\/\/statorials.org\/id\/#\/schema\/person\/3d17a1160dd2d052b7c78e502cb9ec81"},"description":"Tutorial ini menjelaskan cara mengubah urutan rentang di VBA, dengan sebuah contoh.","breadcrumb":{"@id":"https:\/\/statorials.org\/id\/vba-mengubah-urutan\/#breadcrumb"},"inLanguage":"id","potentialAction":[{"@type":"ReadAction","target":["https:\/\/statorials.org\/id\/vba-mengubah-urutan\/"]}]},{"@type":"BreadcrumbList","@id":"https:\/\/statorials.org\/id\/vba-mengubah-urutan\/#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"Home","item":"https:\/\/statorials.org\/id\/"},{"@type":"ListItem","position":2,"name":"Cara mengubah urutan rentang di vba (dengan contoh)"}]},{"@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\/4395"}],"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=4395"}],"version-history":[{"count":0,"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/posts\/4395\/revisions"}],"wp:attachment":[{"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/media?parent=4395"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/categories?post=4395"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/tags?post=4395"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}