{"id":4464,"date":"2023-07-10T21:51:41","date_gmt":"2023-07-10T21:51:41","guid":{"rendered":"https:\/\/statorials.org\/id\/vba-pada-kesalahan-sub-keluaran\/"},"modified":"2023-07-10T21:51:41","modified_gmt":"2023-07-10T21:51:41","slug":"vba-pada-kesalahan-sub-keluaran","status":"publish","type":"post","link":"https:\/\/statorials.org\/id\/vba-pada-kesalahan-sub-keluaran\/","title":{"rendered":"Vba: cara keluar dari sub jika terjadi kesalahan"},"content":{"rendered":"<p><\/p>\n<hr>\n<p><span style=\"color: #000000;\">Anda dapat menggunakan pernyataan <b>Exit Sub<\/b> di VBA untuk keluar dari subprosedur ketika terjadi kesalahan.<\/span><\/p>\n<p> <span style=\"color: #000000;\">Berikut adalah cara umum untuk menggunakan pernyataan ini dalam praktik:<\/span><\/p>\n<pre style=\"background-color: #ececec; font-size: 15px;\"> <span style=\"color: #000000;\"><strong><span style=\"color: #0000ff;\">Sub<\/span> DivideValues()\n\n<span style=\"color: #0000ff;\">Dim<\/span> i <span style=\"color: #0000ff;\">As<\/span> Integer\n<span style=\"color: #0000ff;\">On Error GoTo<\/span> ErrorMessage\n\n<span style=\"color: #0000ff;\">For<\/span> i = 1 <span style=\"color: #0000ff;\">To<\/span> 10\n    Range(\" <span style=\"color: #ff0000;\">C<\/span> \" &amp; i) = Range(\" <span style=\"color: #ff0000;\">A<\/span> \" &amp; i) \/ Range(\" <span style=\"color: #ff0000;\">B<\/span> \" &amp; i)\n<span style=\"color: #0000ff;\">Next<\/span> i\n    \n<span style=\"color: #0000ff;\">Exit Sub\n<\/span>\nError Message:\n    MsgBox \u201c <span style=\"color: #ff0000;\">An Error Occurred<\/span> \u201d\n    <span style=\"color: #0000ff;\">Exit Sub<\/span>\n    \n<span style=\"color: #0000ff;\">End Sub\n<\/span><\/strong><\/span><\/pre>\n<p> <span style=\"color: #000000;\">Makro khusus ini mencoba membagi setiap nilai dalam rentang <strong>A1:A10<\/strong> dengan nilai terkait dalam rentang <strong>B1:B10<\/strong> .<\/span><\/p>\n<p> <span style=\"color: #000000;\">Jika terjadi kesalahan (misalnya, kita mencoba membagi dengan nol), maka pernyataan <strong>On Error GoTo<\/strong> memberitahu VBA untuk mengakses <strong>ErrorMessage<\/strong> , yang memerintahkan untuk menghasilkan kotak pesan yang memberi tahu pengguna bahwa terjadi kesalahan dan menghentikan subprosedur menggunakan <strong>Exist Sub<\/strong> . pernyataan.pernyataan.<\/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: Bagaimana cara membuat sub jika terjadi error pada VBA<\/strong><\/span><\/h2>\n<p> <span style=\"color: #000000;\">Misalkan kita memiliki daftar nilai berikut di kolom A dan B:<\/span> <\/p>\n<p><img decoding=\"async\" loading=\"lazy\" class=\" wp-image-34945 aligncenter\" src=\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/uneerreur1.png\" alt=\"\" width=\"504\" height=\"407\" srcset=\"\" sizes=\"\"><\/p>\n<p> <span style=\"color: #000000;\">Sekarang misalkan kita membuat makro berikut untuk membagi setiap nilai di kolom A dengan nilai terkait di kolom B dan menampilkan hasilnya di kolom C:<\/span><\/p>\n<pre style=\"background-color: #ececec; font-size: 15px;\"> <span style=\"color: #000000;\"><strong><span style=\"color: #0000ff;\">Sub<\/span> DivideValues()\n\n<span style=\"color: #0000ff;\">Dim<\/span> i <span style=\"color: #0000ff;\">As<\/span> Integer\n\n<span style=\"color: #0000ff;\">For<\/span> i = 1 <span style=\"color: #0000ff;\">To<\/span> 10\n    Range(\" <span style=\"color: #ff0000;\">C<\/span> \" &amp; i) = Range(\" <span style=\"color: #ff0000;\">A<\/span> \" &amp; i) \/ Range(\" <span style=\"color: #ff0000;\">B<\/span> \" &amp; i)\n<span style=\"color: #0000ff;\">Next<\/span> i\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 kesalahan berikut:<\/span> <\/p>\n<p><img decoding=\"async\" loading=\"lazy\" class=\" wp-image-34946 aligncenter\" src=\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/uneerreur2.png\" alt=\"\" width=\"403\" height=\"245\" srcset=\"\" sizes=\"\"><\/p>\n<p> <span style=\"color: #000000;\"><span style=\"color: #000000;\">Kami menerima kesalahan ini karena pada baris keempat lembar Excel kami mencoba membagi dengan nol.<\/span><\/span><\/p>\n<p> <span style=\"color: #000000;\">Jika kita hanya ingin keluar dari subprosedur ketika kesalahan ini terjadi, kita dapat menggunakan pernyataan <strong>Exit Sub<\/strong> sebagai berikut:<\/span><\/p>\n<pre style=\"background-color: #ececec; font-size: 15px;\"> <span style=\"color: #000000;\"><strong><span style=\"color: #0000ff;\">Sub<\/span> DivideValues()\n\n<span style=\"color: #0000ff;\">Dim<\/span> i <span style=\"color: #0000ff;\">As<\/span> Integer\n<span style=\"color: #0000ff;\">On Error GoTo<\/span> ErrorMessage\n\n<span style=\"color: #0000ff;\">For<\/span> i = 1 <span style=\"color: #0000ff;\">To<\/span> 10\n    Range(\" <span style=\"color: #ff0000;\">C<\/span> \" &amp; i) = Range(\" <span style=\"color: #ff0000;\">A<\/span> \" &amp; i) \/ Range(\" <span style=\"color: #ff0000;\">B<\/span> \" &amp; i)\n<span style=\"color: #0000ff;\">Next<\/span> i\n    \n<span style=\"color: #0000ff;\">Exit Sub\n<\/span>\nError Message:\n    MsgBox \u201c <span style=\"color: #ff0000;\">An Error Occurred<\/span> \u201d\n    <span style=\"color: #0000ff;\">Exit Sub<\/span>\n    \n<span style=\"color: #0000ff;\">End Sub<\/span><\/strong><\/span><\/pre>\n<p> <span style=\"color: #000000;\">Ketika kita menjalankan makro ini, sub-prosedur melakukan semua kemungkinan masalah pembagian sebelum menemui kesalahan, kemudian muncul kotak pesan yang memberitahu kita bahwa kesalahan telah terjadi dan VBA hanya ada di sub-prosedur:<\/span> <\/p>\n<p><img decoding=\"async\" loading=\"lazy\" class=\"aligncenter wp-image-34947\" src=\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/uneerreur3.png\" alt=\"VBA pada kesalahan keluaran di bawah\" width=\"485\" height=\"415\" srcset=\"\" sizes=\"\"><\/p>\n<p> <span style=\"color: #000000;\"><strong>Catatan<\/strong> : Anda dapat menemukan dokumentasi lengkap pernyataan <b>Exit<\/b> di VBA <a href=\"https:\/\/learn.microsoft.com\/en-us\/office\/vba\/language\/reference\/user-interface-help\/exit-statement\" 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> <a href=\"https:\/\/statorials.org\/id\/vba-membuat-folder\/\" target=\"_blank\" rel=\"noopener\">Cara Membuat Folder Menggunakan VBA<\/a><br \/> <a href=\"https:\/\/statorials.org\/id\/vba-hapus-folder\/\" target=\"_blank\" rel=\"noopener\">Cara menghapus folder menggunakan VBA<\/a><br \/> <a href=\"https:\/\/statorials.org\/id\/hapus-file-vba\/\" target=\"_blank\" rel=\"noopener\">Cara menghapus file menggunakan VBA<\/a><\/p>\n","protected":false},"excerpt":{"rendered":"<p>Anda dapat menggunakan pernyataan Exit Sub di VBA untuk keluar dari subprosedur ketika terjadi kesalahan. Berikut adalah cara umum untuk menggunakan pernyataan ini dalam praktik: Sub DivideValues() Dim i As Integer On Error GoTo ErrorMessage For i = 1 To 10 Range(&#8221; C &#8221; &amp; i) = Range(&#8221; A &#8221; &amp; i) \/ Range(&#8221; B [&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 keluar dari Sub jika terjadi kesalahan - Statorials<\/title>\n<meta name=\"description\" content=\"Tutorial ini menjelaskan cara keluar dari sub karena kesalahan 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-pada-kesalahan-sub-keluaran\/\" \/>\n<meta property=\"og:locale\" content=\"id_ID\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"VBA: Cara keluar dari Sub jika terjadi kesalahan - Statorials\" \/>\n<meta property=\"og:description\" content=\"Tutorial ini menjelaskan cara keluar dari sub karena kesalahan di VBA, dengan sebuah contoh.\" \/>\n<meta property=\"og:url\" content=\"https:\/\/statorials.org\/id\/vba-pada-kesalahan-sub-keluaran\/\" \/>\n<meta property=\"og:site_name\" content=\"Statorials\" \/>\n<meta property=\"article:published_time\" content=\"2023-07-10T21:51:41+00:00\" \/>\n<meta property=\"og:image\" content=\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/uneerreur1.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-pada-kesalahan-sub-keluaran\/\",\"url\":\"https:\/\/statorials.org\/id\/vba-pada-kesalahan-sub-keluaran\/\",\"name\":\"VBA: Cara keluar dari Sub jika terjadi kesalahan - Statorials\",\"isPartOf\":{\"@id\":\"https:\/\/statorials.org\/id\/#website\"},\"datePublished\":\"2023-07-10T21:51:41+00:00\",\"dateModified\":\"2023-07-10T21:51:41+00:00\",\"author\":{\"@id\":\"https:\/\/statorials.org\/id\/#\/schema\/person\/3d17a1160dd2d052b7c78e502cb9ec81\"},\"description\":\"Tutorial ini menjelaskan cara keluar dari sub karena kesalahan di VBA, dengan sebuah contoh.\",\"breadcrumb\":{\"@id\":\"https:\/\/statorials.org\/id\/vba-pada-kesalahan-sub-keluaran\/#breadcrumb\"},\"inLanguage\":\"id\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\/\/statorials.org\/id\/vba-pada-kesalahan-sub-keluaran\/\"]}]},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\/\/statorials.org\/id\/vba-pada-kesalahan-sub-keluaran\/#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"Home\",\"item\":\"https:\/\/statorials.org\/id\/\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"Vba: cara keluar dari sub jika terjadi kesalahan\"}]},{\"@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 keluar dari Sub jika terjadi kesalahan - Statorials","description":"Tutorial ini menjelaskan cara keluar dari sub karena kesalahan 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-pada-kesalahan-sub-keluaran\/","og_locale":"id_ID","og_type":"article","og_title":"VBA: Cara keluar dari Sub jika terjadi kesalahan - Statorials","og_description":"Tutorial ini menjelaskan cara keluar dari sub karena kesalahan di VBA, dengan sebuah contoh.","og_url":"https:\/\/statorials.org\/id\/vba-pada-kesalahan-sub-keluaran\/","og_site_name":"Statorials","article_published_time":"2023-07-10T21:51:41+00:00","og_image":[{"url":"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/uneerreur1.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-pada-kesalahan-sub-keluaran\/","url":"https:\/\/statorials.org\/id\/vba-pada-kesalahan-sub-keluaran\/","name":"VBA: Cara keluar dari Sub jika terjadi kesalahan - Statorials","isPartOf":{"@id":"https:\/\/statorials.org\/id\/#website"},"datePublished":"2023-07-10T21:51:41+00:00","dateModified":"2023-07-10T21:51:41+00:00","author":{"@id":"https:\/\/statorials.org\/id\/#\/schema\/person\/3d17a1160dd2d052b7c78e502cb9ec81"},"description":"Tutorial ini menjelaskan cara keluar dari sub karena kesalahan di VBA, dengan sebuah contoh.","breadcrumb":{"@id":"https:\/\/statorials.org\/id\/vba-pada-kesalahan-sub-keluaran\/#breadcrumb"},"inLanguage":"id","potentialAction":[{"@type":"ReadAction","target":["https:\/\/statorials.org\/id\/vba-pada-kesalahan-sub-keluaran\/"]}]},{"@type":"BreadcrumbList","@id":"https:\/\/statorials.org\/id\/vba-pada-kesalahan-sub-keluaran\/#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"Home","item":"https:\/\/statorials.org\/id\/"},{"@type":"ListItem","position":2,"name":"Vba: cara keluar dari sub jika terjadi kesalahan"}]},{"@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\/4464"}],"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=4464"}],"version-history":[{"count":0,"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/posts\/4464\/revisions"}],"wp:attachment":[{"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/media?parent=4464"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/categories?post=4464"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/tags?post=4464"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}