{"id":4472,"date":"2023-07-10T20:17:33","date_gmt":"2023-07-10T20:17:33","guid":{"rendered":"https:\/\/statorials.org\/id\/buka-file-teks-vba\/"},"modified":"2023-07-10T20:17:33","modified_gmt":"2023-07-10T20:17:33","slug":"buka-file-teks-vba","status":"publish","type":"post","link":"https:\/\/statorials.org\/id\/buka-file-teks-vba\/","title":{"rendered":"Cara membuka file teks menggunakan vba (dengan contoh)"},"content":{"rendered":"<p><\/p>\n<hr>\n<p><span style=\"color: #000000;\">Anda dapat menggunakan metode <b>OpenTextFile<\/b> di VBA untuk membuka file teks dari jalur file tertentu.<\/span><\/p>\n<p> <span style=\"color: #000000;\">Berikut adalah cara umum untuk menggunakan metode ini dalam praktik:<\/span><\/p>\n<pre style=\"background-color: #ececec; font-size: 15px;\"> <span style=\"color: #000000;\"><strong><span style=\"color: #0000ff;\">SubReadTextFile<\/span> ()\n\n<span style=\"color: #0000ff;\">Dim<\/span> FSO <span style=\"color: #0000ff;\">As<\/span> New FileSystemObject\n<span style=\"color: #0000ff;\">Set<\/span> FSO = CreateObject(\" <span style=\"color: #ff0000;\">Scripting.FileSystemObject<\/span> \")\n    \n<span style=\"color: #008000;\">'specify path to text file<\/span>\n<span style=\"color: #0000ff;\">Set<\/span> MyTextFile = FSO.OpenTextFile(\" <span style=\"color: #ff0000;\">C:\\Users\\bob\\Desktop\\MyTextFile.txt<\/span> \", ForReading)\n   \n<span style=\"color: #008000;\">'open text file and display contents in cell A1<\/span>\nTxtString = MyTextFile.ReadAll\nMyTextFile.Close\nThisWorkbook.Sheets(1).Range(\" <span style=\"color: #ff0000;\">A1<\/span> \").Value = TxtString\n\n<span style=\"color: #0000ff;\">End Sub\n<\/span><\/strong><\/span><\/pre>\n<p> <span style=\"color: #000000;\">Makro khusus ini membaca file teks bernama <strong>MyTextFile.txt<\/strong> yang terletak di desktop komputer saya dan menampilkan konten file di sel <strong>A1<\/strong> .<\/span><\/p>\n<p> <span style=\"color: #000000;\">Contoh berikut menunjukkan cara menggunakan sintaks ini untuk membaca file teks dalam praktiknya.<\/span><\/p>\n<h2> <span style=\"color: #000000;\"><strong>Contoh: Cara membuka file teks menggunakan VBA<\/strong><\/span><\/h2>\n<p> <span style=\"color: #000000;\">Katakanlah kita memiliki file teks bernama <strong>MyTextFile.txt<\/strong> yang terletak di desktop yang ingin kita baca di Excel menggunakan VBA.<\/span><\/p>\n<p> <span style=\"color: #000000;\">Berikut isi filenya:<\/span> <\/p>\n<p><img decoding=\"async\" loading=\"lazy\" class=\" wp-image-35000 aligncenter\" src=\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/fichier-t1.png\" alt=\"\" width=\"525\" height=\"397\" srcset=\"\" sizes=\"\"><\/p>\n<p> <span style=\"color: #000000;\">Sebelum menggunakan VBA untuk membaca file ini, kita harus mengaktifkan <strong>Microsoft Scripting Runtime<\/strong> terlebih dahulu di editor VB.<\/span><\/p>\n<p> <span style=\"color: #000000;\">Untuk melakukannya, buka editor VB, lalu klik <strong>Alat<\/strong> , lalu klik <strong>Referensi<\/strong> :<\/span> <\/p>\n<p><img decoding=\"async\" loading=\"lazy\" class=\" wp-image-35001 aligncenter\" src=\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/fichier-t2.png\" alt=\"\" width=\"522\" height=\"336\" srcset=\"\" sizes=\"\"><\/p>\n<p> <span style=\"color: #000000;\">Di jendela baru yang muncul, gulir ke bawah hingga Anda melihat <strong>Microsoft Scripting Runtime<\/strong> dan centang kotak di sebelahnya. Lalu klik <strong>oke<\/strong> .<\/span> <\/p>\n<p><img decoding=\"async\" loading=\"lazy\" class=\" wp-image-35002 aligncenter\" src=\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/fichier-t3.png\" alt=\"\" width=\"455\" height=\"379\" srcset=\"\" sizes=\"\"><\/p>\n<p> <span style=\"color: #000000;\"><span style=\"color: #000000;\">Kemudian kita bisa membuat makro berikut untuk membaca file teks:<\/span><\/span><\/p>\n<pre style=\"background-color: #ececec; font-size: 15px;\"> <span style=\"color: #000000;\"><strong><span style=\"color: #0000ff;\">SubReadTextFile<\/span> ()\n\n<span style=\"color: #0000ff;\">Dim<\/span> FSO <span style=\"color: #0000ff;\">As<\/span> New FileSystemObject\n<span style=\"color: #0000ff;\">Set<\/span> FSO = CreateObject(\" <span style=\"color: #ff0000;\">Scripting.FileSystemObject<\/span> \")\n    \n<span style=\"color: #008000;\">'specify path to text file<\/span>\n<span style=\"color: #0000ff;\">Set<\/span> MyTextFile = FSO.OpenTextFile(\" <span style=\"color: #ff0000;\">C:\\Users\\bob\\Desktop\\MyTextFile.txt<\/span> \", ForReading)\n   \n<span style=\"color: #008000;\">'open text file and display contents in cell A1<\/span>\nTxtString = MyTextFile.ReadAll\nMyTextFile.Close\nThisWorkbook.Sheets(1).Range(\" <span style=\"color: #ff0000;\">A1<\/span> \").Value = TxtString\n\n<span style=\"color: #0000ff;\">End Sub<\/span><\/strong><\/span><\/pre>\n<p> <span style=\"color: #000000;\">Setelah makro ini dijalankan, konten file teks bernama <strong>MyTextFile.txt<\/strong> akan ditampilkan di sel <strong>A1<\/strong> :<\/span> <\/p>\n<p><img decoding=\"async\" loading=\"lazy\" class=\" wp-image-35003 aligncenter\" src=\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/fichier-t4.png\" alt=\"\" width=\"578\" height=\"468\" srcset=\"\" sizes=\"\"><\/p>\n<p> <span style=\"color: #000000;\">Perhatikan bahwa isi sel <strong>A1<\/strong> cocok dengan isi file teks.<\/span><\/p>\n<p> <span style=\"color: #000000;\"><strong>Catatan<\/strong> : Anda dapat menemukan dokumentasi lengkap untuk metode <b>OpenTextFile<\/b> <a href=\"https:\/\/learn.microsoft.com\/en-us\/office\/vba\/language\/reference\/user-interface-help\/opentextfile-method\" 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 metode OpenTextFile di VBA untuk membuka file teks dari jalur file tertentu. Berikut adalah cara umum untuk menggunakan metode ini dalam praktik: SubReadTextFile () Dim FSO As New FileSystemObject Set FSO = CreateObject(&#8221; Scripting.FileSystemObject &#8220;) &#8216;specify path to text file Set MyTextFile = FSO.OpenTextFile(&#8221; C:\\Users\\bob\\Desktop\\MyTextFile.txt &#8220;, ForReading) &#8216;open text file and display [&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 Membuka File Teks Menggunakan VBA (dengan Contoh) - Statologi<\/title>\n<meta name=\"description\" content=\"Tutorial ini menjelaskan cara membuka file teks menggunakan 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\/buka-file-teks-vba\/\" \/>\n<meta property=\"og:locale\" content=\"id_ID\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"Cara Membuka File Teks Menggunakan VBA (dengan Contoh) - Statologi\" \/>\n<meta property=\"og:description\" content=\"Tutorial ini menjelaskan cara membuka file teks menggunakan VBA, dengan sebuah contoh.\" \/>\n<meta property=\"og:url\" content=\"https:\/\/statorials.org\/id\/buka-file-teks-vba\/\" \/>\n<meta property=\"og:site_name\" content=\"Statorials\" \/>\n<meta property=\"article:published_time\" content=\"2023-07-10T20:17:33+00:00\" \/>\n<meta property=\"og:image\" content=\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/fichier-t1.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\/buka-file-teks-vba\/\",\"url\":\"https:\/\/statorials.org\/id\/buka-file-teks-vba\/\",\"name\":\"Cara Membuka File Teks Menggunakan VBA (dengan Contoh) - Statologi\",\"isPartOf\":{\"@id\":\"https:\/\/statorials.org\/id\/#website\"},\"datePublished\":\"2023-07-10T20:17:33+00:00\",\"dateModified\":\"2023-07-10T20:17:33+00:00\",\"author\":{\"@id\":\"https:\/\/statorials.org\/id\/#\/schema\/person\/3d17a1160dd2d052b7c78e502cb9ec81\"},\"description\":\"Tutorial ini menjelaskan cara membuka file teks menggunakan VBA, dengan sebuah contoh.\",\"breadcrumb\":{\"@id\":\"https:\/\/statorials.org\/id\/buka-file-teks-vba\/#breadcrumb\"},\"inLanguage\":\"id\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\/\/statorials.org\/id\/buka-file-teks-vba\/\"]}]},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\/\/statorials.org\/id\/buka-file-teks-vba\/#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"Home\",\"item\":\"https:\/\/statorials.org\/id\/\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"Cara membuka file teks menggunakan 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 Membuka File Teks Menggunakan VBA (dengan Contoh) - Statologi","description":"Tutorial ini menjelaskan cara membuka file teks menggunakan 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\/buka-file-teks-vba\/","og_locale":"id_ID","og_type":"article","og_title":"Cara Membuka File Teks Menggunakan VBA (dengan Contoh) - Statologi","og_description":"Tutorial ini menjelaskan cara membuka file teks menggunakan VBA, dengan sebuah contoh.","og_url":"https:\/\/statorials.org\/id\/buka-file-teks-vba\/","og_site_name":"Statorials","article_published_time":"2023-07-10T20:17:33+00:00","og_image":[{"url":"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/fichier-t1.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\/buka-file-teks-vba\/","url":"https:\/\/statorials.org\/id\/buka-file-teks-vba\/","name":"Cara Membuka File Teks Menggunakan VBA (dengan Contoh) - Statologi","isPartOf":{"@id":"https:\/\/statorials.org\/id\/#website"},"datePublished":"2023-07-10T20:17:33+00:00","dateModified":"2023-07-10T20:17:33+00:00","author":{"@id":"https:\/\/statorials.org\/id\/#\/schema\/person\/3d17a1160dd2d052b7c78e502cb9ec81"},"description":"Tutorial ini menjelaskan cara membuka file teks menggunakan VBA, dengan sebuah contoh.","breadcrumb":{"@id":"https:\/\/statorials.org\/id\/buka-file-teks-vba\/#breadcrumb"},"inLanguage":"id","potentialAction":[{"@type":"ReadAction","target":["https:\/\/statorials.org\/id\/buka-file-teks-vba\/"]}]},{"@type":"BreadcrumbList","@id":"https:\/\/statorials.org\/id\/buka-file-teks-vba\/#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"Home","item":"https:\/\/statorials.org\/id\/"},{"@type":"ListItem","position":2,"name":"Cara membuka file teks menggunakan 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\/4472"}],"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=4472"}],"version-history":[{"count":0,"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/posts\/4472\/revisions"}],"wp:attachment":[{"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/media?parent=4472"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/categories?post=4472"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/statorials.org\/id\/wp-json\/wp\/v2\/tags?post=4472"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}