{"id":4443,"date":"2023-07-11T01:58:30","date_gmt":"2023-07-11T01:58:30","guid":{"rendered":"https:\/\/statorials.org\/id\/vba-menyorot-n-nilai-teratas-di-kolom\/"},"modified":"2023-07-11T01:58:30","modified_gmt":"2023-07-11T01:58:30","slug":"vba-menyorot-n-nilai-teratas-di-kolom","status":"publish","type":"post","link":"https:\/\/statorials.org\/id\/vba-menyorot-n-nilai-teratas-di-kolom\/","title":{"rendered":"Vba: cara menyorot n nilai pertama di kolom"},"content":{"rendered":"<p><\/p>\n<hr>\n<p><span style=\"color: #000000;\">Anda dapat menggunakan sintaks berikut di VBA untuk menyorot N nilai pertama kolom di Excel:<\/span><\/p>\n<pre style=\"background-color: #ececec; font-size: 15px;\"> <span style=\"color: #000000;\"><strong><span style=\"color: #0000ff;\">SubHighlightTopN<\/span> ()\n\n    <span style=\"color: #0000ff;\">Dim<\/span> rng <span style=\"color: #0000ff;\">As<\/span> Range\n    <span style=\"color: #0000ff;\">Dim<\/span> EntireRange <span style=\"color: #0000ff;\">As<\/span> Range\n    \n    <span style=\"color: #008000;\">'specify range to use<\/span>\n    Set EntireRange = Range(\" <span style=\"color: #ff0000;\">A2:A11<\/span> \")\n    \n    <span style=\"color: #008000;\">'highlight top 3 values in range<\/span>\n    <span style=\"color: #0000ff;\">For Each<\/span> rng <span style=\"color: #0000ff;\">In<\/span> EntireRange\n        \n        <span style=\"color: #0000ff;\">For<\/span> i = 1 <span style=\"color: #0000ff;\">To<\/span> 3\n        \n        <span style=\"color: #0000ff;\">If<\/span> rng.Value = WorksheetFunction.Large(EntireRange, i) <span style=\"color: #0000ff;\">Then<\/span>\n        rng.Interior.Color = vbYellow\n        <span style=\"color: #0000ff;\">End If<\/span>\n        <span style=\"color: #0000ff;\">Next<\/span>\n    \n    <span style=\"color: #0000ff;\">Next rng<\/span>\n\n<span style=\"color: #0000ff;\">End Sub\n<\/span><\/strong><\/span><\/pre>\n<p> <span style=\"color: #000000;\">Makro khusus ini akan menyorot 3 nilai tertinggi dalam rentang <strong>A2:A11<\/strong> .<\/span><\/p>\n<p> <span style=\"color: #000000;\">Untuk menyorot sejumlah nilai atas yang berbeda, cukup edit baris <strong>Untuk i = 1 Sampai 3<\/strong> untuk mendapatkan batas atas yang berbeda.<\/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: Sorot N Nilai Pertama di Kolom Menggunakan VBA<\/strong><\/span><\/h2>\n<p> <span style=\"color: #000000;\"><span style=\"color: #000000;\">Misalkan kita memiliki nilai berikut di kolom A spreadsheet Excel kita:<\/span><\/span> <\/p>\n<p><img decoding=\"async\" loading=\"lazy\" class=\" wp-image-34796 aligncenter\" src=\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/topn1.png\" alt=\"\" width=\"502\" height=\"429\" srcset=\"\" sizes=\"\"><\/p>\n<p> <span style=\"color: #000000;\">Kita dapat membuat makro berikut untuk menyorot 3 nilai terbesar pertama dalam rentang <strong>A2:A11<\/strong> :<\/span><\/p>\n<pre style=\"background-color: #ececec; font-size: 15px;\"> <span style=\"color: #000000;\"><strong><span style=\"color: #0000ff;\">SubHighlightTopN<\/span> ()\n\n    <span style=\"color: #0000ff;\">Dim<\/span> rng <span style=\"color: #0000ff;\">As<\/span> Range\n    <span style=\"color: #0000ff;\">Dim<\/span> EntireRange <span style=\"color: #0000ff;\">As<\/span> Range\n    \n    <span style=\"color: #008000;\">'specify range to use<\/span>\n    Set EntireRange = Range(\" <span style=\"color: #ff0000;\">A2:A11<\/span> \")\n    \n    <span style=\"color: #008000;\">'highlight top 3 values in range<\/span>\n    <span style=\"color: #0000ff;\">For Each<\/span> rng <span style=\"color: #0000ff;\">In<\/span> EntireRange\n        \n        <span style=\"color: #0000ff;\">For<\/span> i = 1 <span style=\"color: #0000ff;\">To<\/span> 3\n        \n        <span style=\"color: #0000ff;\">If<\/span> rng.Value = WorksheetFunction.Large(EntireRange, i) <span style=\"color: #0000ff;\">Then<\/span>\n        rng.Interior.Color = vbYellow\n        <span style=\"color: #0000ff;\">End If<\/span>\n        <span style=\"color: #0000ff;\">Next<\/span>\n    \n    <span style=\"color: #0000ff;\">Next rng<\/span>\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=\"aligncenter wp-image-34797\" src=\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/topn2.png\" alt=\"VBA menyoroti N nilai pertama di kolom\" width=\"522\" height=\"444\" srcset=\"\" sizes=\"\"><\/p>\n<p> <span style=\"color: #000000;\">Perhatikan bahwa sel yang berisi 3 nilai tertinggi di kolom A sekarang disorot.<\/span><\/p>\n<p> <span style=\"color: #000000;\">Perhatikan bahwa Anda juga dapat mengubah warna yang akan digunakan untuk menyorot serta jumlah nilai utama yang akan disorot.<\/span><\/p>\n<p> <span style=\"color: #000000;\">Misalnya, kita bisa menggunakan makro berikut untuk menyorot 5 nilai pertama di kolom A dengan warna hijau:<\/span><\/p>\n<pre style=\"background-color: #ececec; font-size: 15px;\"> <span style=\"color: #000000;\"><strong><span style=\"color: #0000ff;\">SubHighlightTopN<\/span> ()\n\n    <span style=\"color: #0000ff;\">Dim<\/span> rng <span style=\"color: #0000ff;\">As<\/span> Range\n    <span style=\"color: #0000ff;\">Dim<\/span> EntireRange <span style=\"color: #0000ff;\">As<\/span> Range\n    \n    <span style=\"color: #008000;\">'specify range to use<\/span>\n    Set EntireRange = Range(\" <span style=\"color: #ff0000;\">A2:A11<\/span> \")\n    \n    <span style=\"color: #008000;\">'highlight top 5 values in range<\/span>\n    <span style=\"color: #0000ff;\">For Each<\/span> rng <span style=\"color: #0000ff;\">In<\/span> EntireRange\n        \n        <span style=\"color: #0000ff;\">For<\/span> i = 1 <span style=\"color: #0000ff;\">To<\/span> 5\n        \n        <span style=\"color: #0000ff;\">If<\/span> rng.Value = WorksheetFunction.Large(EntireRange, i) <span style=\"color: #0000ff;\">Then<\/span>\n        rng.Interior.Color = vbGreen\n        <span style=\"color: #0000ff;\">End If<\/span>\n        <span style=\"color: #0000ff;\">Next<\/span>\n    \n    <span style=\"color: #0000ff;\">Next rng<\/span>\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-34798 aligncenter\" src=\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/topn3.png\" alt=\"\" width=\"500\" height=\"423\" srcset=\"\" sizes=\"\"><\/p>\n<p> <span style=\"color: #000000;\">Perhatikan bahwa sel yang berisi 5 nilai tertinggi di kolom A sekarang disorot dengan warna hijau.<\/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> <a href=\"https:\/\/statorials.org\/id\/pemformatan-bersyarat-vba\/\" target=\"_blank\" rel=\"noopener\">VBA: Cara menerapkan pemformatan bersyarat ke sel<\/a><br \/> <a href=\"https:\/\/statorials.org\/id\/vba-memformat-nilai-duplikat-bersyarat\/\" target=\"_blank\" rel=\"noopener\">VBA: Cara menerapkan pemformatan bersyarat ke nilai duplikat<\/a><br \/> <a href=\"https:\/\/statorials.org\/id\/pencarian-vba-di-kolom\/\" target=\"_blank\" rel=\"noopener\">VBA: Cara mencari nilai dalam kolom<\/a><\/p>\n","protected":false},"excerpt":{"rendered":"<p>Anda dapat menggunakan sintaks berikut di VBA untuk menyorot N nilai pertama kolom di Excel: SubHighlightTopN () Dim rng As Range Dim EntireRange As Range &#8216;specify range to use Set EntireRange = Range(&#8221; A2:A11 &#8220;) &#8216;highlight top 3 values in range For Each rng In EntireRange For i = 1 To 3 If rng.Value = [&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 menyorot N nilai pertama dalam kolom \u2013 Statorials<\/title>\n<meta name=\"description\" content=\"Tutorial ini menjelaskan cara menyorot N nilai pertama kolom di Excel menggunakan VBA, beserta contohnya.\" \/>\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-menyorot-n-nilai-teratas-di-kolom\/\" \/>\n<meta property=\"og:locale\" content=\"id_ID\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"VBA: Cara menyorot N nilai pertama dalam kolom \u2013 Statorials\" \/>\n<meta property=\"og:description\" content=\"Tutorial ini menjelaskan cara menyorot N nilai pertama kolom di Excel menggunakan VBA, beserta contohnya.\" \/>\n<meta property=\"og:url\" content=\"https:\/\/statorials.org\/id\/vba-menyorot-n-nilai-teratas-di-kolom\/\" \/>\n<meta property=\"og:site_name\" content=\"Statorials\" \/>\n<meta property=\"article:published_time\" content=\"2023-07-11T01:58:30+00:00\" \/>\n<meta property=\"og:image\" content=\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/topn1.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-menyorot-n-nilai-teratas-di-kolom\/\",\"url\":\"https:\/\/statorials.org\/id\/vba-menyorot-n-nilai-teratas-di-kolom\/\",\"name\":\"VBA: Cara menyorot N nilai pertama dalam kolom \u2013 Statorials\",\"isPartOf\":{\"@id\":\"https:\/\/statorials.org\/id\/#website\"},\"datePublished\":\"2023-07-11T01:58:30+00:00\",\"dateModified\":\"2023-07-11T01:58:30+00:00\",\"author\":{\"@id\":\"https:\/\/statorials.org\/id\/#\/schema\/person\/3d17a1160dd2d052b7c78e502cb9ec81\"},\"description\":\"Tutorial ini menjelaskan cara menyorot N nilai pertama kolom di Excel menggunakan VBA, beserta contohnya.\",\"breadcrumb\":{\"@id\":\"https:\/\/statorials.org\/id\/vba-menyorot-n-nilai-teratas-di-kolom\/#breadcrumb\"},\"inLanguage\":\"id\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\/\/statorials.org\/id\/vba-menyorot-n-nilai-teratas-di-kolom\/\"]}]},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\/\/statorials.org\/id\/vba-menyorot-n-nilai-teratas-di-kolom\/#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"Home\",\"item\":\"https:\/\/statorials.org\/id\/\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"Vba: cara menyorot n nilai pertama di kolom\"}]},{\"@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 menyorot N nilai pertama dalam kolom \u2013 Statorials","description":"Tutorial ini menjelaskan cara menyorot N nilai pertama kolom di Excel menggunakan VBA, beserta contohnya.","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-menyorot-n-nilai-teratas-di-kolom\/","og_locale":"id_ID","og_type":"article","og_title":"VBA: Cara menyorot N nilai pertama dalam kolom \u2013 Statorials","og_description":"Tutorial ini menjelaskan cara menyorot N nilai pertama kolom di Excel menggunakan VBA, beserta contohnya.","og_url":"https:\/\/statorials.org\/id\/vba-menyorot-n-nilai-teratas-di-kolom\/","og_site_name":"Statorials","article_published_time":"2023-07-11T01:58:30+00:00","og_image":[{"url":"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/topn1.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-menyorot-n-nilai-teratas-di-kolom\/","url":"https:\/\/statorials.org\/id\/vba-menyorot-n-nilai-teratas-di-kolom\/","name":"VBA: Cara menyorot N nilai pertama dalam kolom \u2013 Statorials","isPartOf":{"@id":"https:\/\/statorials.org\/id\/#website"},"datePublished":"2023-07-11T01:58:30+00:00","dateModified":"2023-07-11T01:58:30+00:00","author":{"@id":"https:\/\/statorials.org\/id\/#\/schema\/person\/3d17a1160dd2d052b7c78e502cb9ec81"},"description":"Tutorial ini menjelaskan cara menyorot N nilai pertama kolom di Excel menggunakan VBA, beserta contohnya.","breadcrumb":{"@id":"https:\/\/statorials.org\/id\/vba-menyorot-n-nilai-teratas-di-kolom\/#breadcrumb"},"inLanguage":"id","potentialAction":[{"@type":"ReadAction","target":["https:\/\/statorials.org\/id\/vba-menyorot-n-nilai-teratas-di-kolom\/"]}]},{"@type":"BreadcrumbList","@id":"https:\/\/statorials.org\/id\/vba-menyorot-n-nilai-teratas-di-kolom\/#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"Home","item":"https:\/\/statorials.org\/id\/"},{"@type":"ListItem","position":2,"name":"Vba: cara menyorot n nilai pertama di kolom"}]},{"@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\/4443"}],"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=4443"}],"version-history":[{"count":0,"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/posts\/4443\/revisions"}],"wp:attachment":[{"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/media?parent=4443"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/categories?post=4443"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/tags?post=4443"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}