Bagaimana Cara Menggunakan Kode VBA Untuk Menghapus Baris Kosong Dari File Teks

Jika Anda pernah bekerja dengan file teks, Anda akan tahu betapa frustrasinya menghapus garis-garis kosong. Sebagian dari masalahnya adalah Anda tidak ingin menghapus setiap baris kosong, jika tidak, ini mungkin mengganggu format dokumen.

Artikel ini akan menunjukkan kepada Anda cara menghapus sejumlah baris kosong dari file teks menggunakan beberapa pengkodean VBA akal sehat.

Membuka Dan Membaca File Teks

Logika kode melibatkan membaca setiap baris file, dan menyimpan baris ke dalam string teks jika memenuhi kriteria kami. Kemudian, kita akan menulis string teks kembali ke file baru.

Pertama, kita akan mengakses objek sistem file (FSO) dan membuka file, yang kita beri nama "blanks.txt". Kode untuk mengakses sistem file adalah jenis prosedur yang mungkin ingin Anda simpan dalam pustaka kode untuk referensi di masa mendatang.

Dim fso Sebagai Scripting.FileSystemObject

Set fso = Scripting Baru.FileSystemObject
Dim myFile Sebagai Objek
Dim filePath Sebagai String

filePath = ActiveWorkbook.path & " files blanks.txt"
Set myFile = fso.openTextFile (filePath)

Menghapus Garis Kosong

Sekarang, kita dapat membaca setiap baris dalam file tetapi pertama-tama kita perlu mempertimbangkan kode yang kita perlukan untuk membuang baris kosong.

Kami akan mulai dengan mendefinisikan beberapa variabel dan memberi mereka nilai awal.

'Sertakan baris di file baru?

Dim includeLine As Boolean

'String teks untuk menulis baris yang disertakan
Dim allTxt sebagai string

'Jumlah baris kosong untuk dimasukkan dalam file baru
Dim countBlank As As Long

countBlanks = 1
includeBlanks = 0
includeLine = False

Pengaturan awal untuk baris kosong ditetapkan pada 1, jadi kami tidak kesal setiap jeda paragraf. Jika kami ingin menghapus setiap baris kosong, kami akan mengatur variabel ke 0.

Sekarang kita dapat membaca file dan memberi tahu kode yang baris untuk menulis ke file baru.

Lakukan Hingga myFile.AtEndOfStream

includeLine = False

txt = myFile.ReadLine

Default untuk setiap baris adalah tidak memasukkannya ke dalam file baru kecuali memenuhi kriteria yang ditentukan dalam beberapa baris kode berikutnya. Jumlah garis kosong dihitung sampai garis yang tidak kosong ditemukan dan kemudian penghitung diatur kembali ke nol.

    Pilih Case Len (txt)

Kasus 0

Jika countBlanks <includeBlanks Kemudian includeLine = True

countBlanks = countBlanks + 1

Kasus Lain

countBlanks = 0

includeLine = True

Akhiri Pilih

Jika garis memenuhi parameter kami, maka kami menambahkannya dengan karakter baris baru ke string txt dan melanjutkan pengulangan.

Jika includeLine Kemudian

allTxt = allTxt & txt & vbCrLf
Berakhir jika
Loop

Dengan membaca file teks selesai, kami menutup file dan menulis string teks ke file baru.

myFile.close

filePath = ActiveWorkbook.path & " files blanksRemoved.txt"
Set myFile = fso.CreateTextFile (filePath)
myFile. Tuliskan allTxt
myFile.Close
Setel fso = Tidak ada

Dengan jenis pengeditan file ini, penting untuk tidak menimpa file asli jika terjadi sesuatu yang tidak terduga dan Anda kehilangan semua data. Bahkan ketika Anda yakin kode tersebut bekerja dengan benar, masuk akal untuk membuat salinan – menggunakan VBA – untuk melindungi data asli.

Ringkasan

Karena bekerja dengan file teks adalah kejadian umum bagi sebagian besar pengembang Excel, itu ide yang baik untuk mengembangkan prosedur yang relevan yang dapat Anda simpan untuk referensi di masa mendatang – daripada mencari jawabannya ketika waktu di premium.

 Masalah Dengan Baris Subjek

Baris subjek untuk kampanye pemasaran email Anda mungkin adalah hal terpendek yang harus Anda tulis, tetapi ini juga yang paling penting.

Anda pikir itu cukup sulit untuk datang dengan konten pembunuh untuk email itu sendiri, tetapi mencoba untuk menemukan sesuatu yang ringkas dan menarik perhatian dapat menjadi mimpi buruk yang nyata.

Mari hadapi itu; kebenaran yang sederhana adalah jika baris subjek Anda tidak langsung menarik minat pembaca, email Anda tidak akan dibaca. Gelandangan.

Anda mungkin berharap saya akan membuat template sederhana yang akan menjamin hasil yang kuat setiap waktu, tetapi saya tidak bisa. Tetapi semua itu tidak hilang; apa yang bisa saya lakukan adalah menguraikan beberapa tips yang akan memberi Anda kesempatan terbaik.

Lupakan nama Anda

Anda mungkin melakukan apa yang dilakukan oleh banyak perusahaan dan memulai garis subjek Anda dengan nama perusahaan Anda. Tidak. Anda membuang-buang waktu Anda. Penerima akan mengetahuinya dari Anda dengan label "dari".

Yang perlu Anda lakukan adalah membuat sesuatu yang menggoda mereka agar membuka email Anda. Itu tidak berarti kalimat acak – baris subjek Anda harus secara akurat mencerminkan isi email Anda. Jika tidak, Anda akan berisiko jatuh pingsan kepatuhan CAN-SPAM.

Seluler

Sebagian besar orang melihat email mereka di ponsel mereka, yang berarti apa pun yang Anda hasilkan harus ramah seluler.

Baik jalur panjang dan pendek berfungsi, tetapi untuk seluler, saya sarankan untuk menjadi sesingkat mungkin.

Gunakan urgensi dengan hemat

Taktik yang sering digunakan oleh perusahaan adalah menggunakan istilah seperti "kesempatan terakhir" di baris subjek mereka untuk mendapatkan penerima untuk membuka email mereka. Untuk perusahaan B2C yang mungkin akan bekerja, tetapi untuk kerumunan B2B, itu tidak mungkin.

Berbeda

Tergantung pada industri Anda dan audiens Anda, mengapa tidak mencoba sesuatu yang lebih edgier daripada biasanya? Bersikaplah kurang ajar, topikal, atau sedikit samar apa pun yang muncul dalam pikiran. Cara terbaik untuk mengetahui apakah ini bekerja untuk Anda atau tidak adalah …

Jalankan pengujian A / B

Cara terbaik untuk menemukan apa yang terbaik bagi audiens Anda adalah dengan melakukan tes terpisah. Menggunakan baris subjek yang berbeda dengan cara ini akan membantu Anda mengidentifikasi jenis hal mana yang paling terbuka.

Mendapatkan garis subjek Anda benar sulit. Satu bulan Anda mungkin memukulnya dengan benar, selanjutnya Anda bisa jauh dari sasaran. Hal utama adalah Anda mengidentifikasi apa yang berfungsi dan mengulang dan meningkatkan.

7 Manfaat Kesehatan Bagi Warga Senior yang Mengikuti Petunjuk Menari Baris

Line Dancing adalah Hal Kedua Yang Paling Populer Yang Paling Populer Dilakukan!

Line dancing sangat populer di kalangan Senior Citizens. Ini menyenangkan, ada persahabatan yang hebat di antara para Senior, dan Anda tidak membutuhkan pasangan, dan ini adalah cara mudah untuk tetap sehat, baik secara mental maupun fisik.

Seorang Direktur Kegiatan di Rumah Pensiun / Penahanan di California mengatakan kepada saya bahwa garis menari hanya yang kedua dalam popularitas untuk menari persegi dan hanya karena tarian persegi adalah bentuk tarian yang lebih tua dan lebih senior yang akrab dengannya. Juga, banyak Seniors berada di klub dansa persegi dan pergi ke pertemuan setiap minggu ketika mereka lebih muda.

Di hampir semua kelas dalam instruksi tari baris, Anda akan melihat banyak Seniors. Ada beberapa tarian yang cocok untuk orang dengan mobilitas terbatas, seperti "Tush Push", "Electric Slide", "Country Walkin '", "Dancin' with You" dan yang pernah indah, "Waltz Across Texas", yang saya suka lakukan pada Collin Raye "Dreamin 'My Dreams of You." Bahkan ada tarian baris "duduk" lidah-di-pipi oleh Knox Rhine disebut "Take A Break" yang bahkan tidak perlu musik! Kebanyakan kelas menampilkan tarian garis yang mudah dan lebih maju.

Keuntungan sehat

Manfaat kesehatan dari garis menari sangat jelas. Semua orang mendapat manfaat dari latihan dan menari garis sangat menyenangkan, itu tidak tampak seperti olahraga. Saya membaca laporan yang mengatakan bahwa orang-orang yang menari tari mungkin bisa hidup sepuluh tahun lagi. Ini mungkin atau mungkin tidak benar, tapi itu pasti sesuatu yang perlu dipertimbangkan.

Berikut ini adalah daftar beberapa manfaat kesehatan yang akan Anda nikmati jika Anda menari garis secara teratur:

* Kekuatan dan fleksibilitas kardiovaskular dan otot menjadi lebih baik;

* Tekanan darah tinggi, kadar kolesterol tinggi dan kadar trigliserida tinggi, serta kadar gula darah tinggi semua dapat ditingkatkan;

* Koordinasi meningkat saat Anda bekerja melalui berbagai gerakan;

* Kapasitas paru-paru bisa meningkat;

* Kekuatan tulang bisa meningkat; pengeroposan tulang dapat dihentikan atau diperlambat

* Bantuan dengan kontrol berat badan – setengah jam terus menerus menari garis dapat membakar rata-rata 300 kalori

* Aspek sosial dari tarian garis jelas. Perasaan sehat Anda dan persahabatan yang Anda miliki dengan para penari lainnya sangat baik untuk kesehatan Anda.

Line Dance Videos tersedia di mana-mana

Ada banyak DVD dan video tari baris yang dapat dibeli dan digunakan oleh Lansia untuk dipraktekkan dalam privasi rumah mereka. Ini sangat baik jika mereka malu untuk pergi ke kelas reguler atau tidak memiliki kelas di komunitas mereka yang mengajarkan menari garis untuk para senior.

Scooter Lee dan Jo Thompson

Penyanyi / penulis lagu yang cantik dan berbakat Scooter Lee memiliki banyak kelas yang ditargetkan untuk Lanjut Usia melalui organisasi nirlaba, Dancing for the Dream®, yang ia mulai dengan koreografer Jo Thompson.

Sepopuler musiknya adalah untuk menari garis, pada awalnya Scooter Lee tidak menari sendiri, bahkan setelah didiagnosis dengan banyak masalah kesehatan dan kelebihan berat badan. Akhirnya, setelah belajar makan dengan benar, berolahraga, dan menciptakan kebiasaan baik dalam hidupnya dengan pikiran positif dan orang-orang yang positif, ia memasukkan garis menari dalam rutinitasnya untuk kesehatan yang baik. Meskipun kerusakan pada sendi dan organnya tidak dapat dipulihkan, Lee mulai memperhatikan kesehatannya sendiri, akhirnya kehilangan sekitar 150 pon dalam lima tahun.

Dimana Cari Kelas untuk Kesenangan Jalur Dancin

Anda dapat menemukan banyak kelas untuk instruksi tari garis hanya untuk Warga Senior di Pusat Komunitas, Taman dan Departemen Rekreasi, dan Kelompok Gereja di seluruh Amerika, serta di kelas di studio dansa.

Jika Anda tinggal di bagian Timur Amerika, periksa kelas yang tersedia melalui Step In Name of Life (TM). Mereka memiliki kelas di setidaknya 32 kota. Jamie Gant memulai grup pertama di Florida sehingga neneknya akan memiliki tempat untuk pergi ke garis tari untuk kesehatannya. Setelah pergi bersamanya, dia siap untuk memulai kelas untuk semua orang. Tujuan mereka: Melangkah Lagi Diabetes, Kolesterol Tinggi, Tekanan Darah Tinggi & Lainnya (TM).

8 Stasiun Baris Bakerloo Dengan Atraksi dan Aktivitas Menarik bagi Pengunjung untuk Menjelajahi

The Bakerloo Line, berwarna coklat pada peta London Underground, dibuka pada Maret 1906. Jalur ini dimulai dari stasiun Harrow & Wealdstone di utara-barat London ke stasiun Elephant & Castle di London selatan. Garis Bakerloo mencakup jarak 23km (14,5 mil) dan melayani 25 stasiun tabung.

Di bawah ini tercantum 8 dari 25 stasiun tabung yang paling banyak digunakan wisatawan ketika mereka mengunjungi London.

Stasiun Wembley Central terletak di seberang jalan dari Stadion Wembley dan dekat dengan Wembley Arena.

Stadion Wembley adalah tempat asal tim Sepakbola Nasional Inggris (Sepak Bola). Ini juga merupakan tempat di mana Final Piala Carling dan Final Piala FA diadakan. Ini memiliki kapasitas tempat duduk 90.000 dan merupakan tempat populer untuk acara olahraga lainnya dan konser besar.

Wembley Arena adalah arena dalam ruangan dan merupakan tempat konser yang terkenal secara internasional. Arena dapat menampung 12.500 penggemar dan telah melihat bintang seperti Abba, Bon Jovi, Cliff Richard, The Eagles dan Westlife tampil di sana.

Pasar Wembley adalah salah satu pasar Minggu terbesar di Inggris dan terletak di luar Stadion Wembley.

Stasiun Warwick Avenue adalah pemberhentian Little Venice dan Grand Union & Regent's Canal.

Di sini Anda dapat menikmati area kanal yang tenang, berjalan-jalan di jalan-jalan yang cantik, atau melakukan perjalanan perahu santai ke Kebun Binatang London.

Stasiun Paddington adalah salah satu stasiun kereta api utama di London. Ini adalah stasiun di mana pengunjung mengambil Heathrow Express ke Bandara Heathrow. Ada beberapa hotel bintang 4 dan 5 yang berada dalam jarak berjalan kaki ke stasiun Paddington. Ada juga pilihan restoran yang menyajikan masakan eksotis.

Stasiun Baker Street adalah perhentian untuk Museum Lilin Madame Tussauds dan Museum Sherlock Holmes. Anda juga turun ke sini untuk Taman Bupati dan Masjid Pusat London. Baker Street station adalah salah satu stasiun kereta tersibuk di sistem London Underground.

Oxford Circus station adalah tempat Anda turun untuk berbelanja. Ini adalah persimpangan tempat Oxford Street dan Regent Street bertemu. Ini adalah distrik belanja tersibuk di London dengan beberapa department store besar seperti John Lewis, Debenhams, dan House of Fraser.

Bond Street, yang terkenal karena pakaian perancangnya yang mahal, dan Selfridges Department Store berjarak dekat, di sebelah barat stasiun Oxford Circus. Carnaby Street dan Toko Mainan Hamley yang terkenal juga berjarak dekat dari sini.

Stasiun Piccadilly Circus adalah perhentian untuk Patung Eros, West End Theatreland, dan Pecinan London. Ada banyak teater di sepanjang Shaftesbury Avenue dan Charing Cross Road.

Pecinan London, dengan banyak restoran dan supermarket Cina yang bagus, terletak di selatan Shaftesbury Avenue antara Piccadilly Circus dan Leicester Square. Restoran selalu sibuk terutama sebelum dan sesudah pertunjukan teater.

Piccadilly Circus adalah tempat untuk kehidupan malam London dengan banyak pub, klub dan restoran untuk penduduk setempat serta wisatawan.

Berhenti di stasiun Charing Cross jika Anda mengunjungi Trafalgar Square & Kolom Nelson.

Tempat wisata lainnya di sekitar Trafalgar Square termasuk Galeri Nasional, Galeri Potret Nasional, dan Gereja St Martin-in-the Fields. Ada juga banyak teater, hotel, restoran dan pub di dekat stasiun Charing Cross.

Tempat-tempat wisata di dekat stasiun Waterloo termasuk London Eye, London Aquarium, The Royal Festival Hall, dan Jubilee Pedestrian Bridge.

Dalam jarak berjalan kaki dari stasiun Waterloo terdapat landmark populer lainnya di London seperti Gedung Parlemen, Big Ben, Westminster Abbey, dan Downing Street.

Anda juga dapat mengambil pelayaran Sungai Thames yang menenangkan dari London Eye Millennium Pier.

Terlepas dari Wembley Central (zona 4) dan Warwick Avenue (zona 2), semua stasiun jalur Bakerloo lainnya yang tercantum di atas berada di zona 1. Jadi jika Anda tidak berencana mengunjungi Warwick Avenue atau Wembley Central, Anda hanya perlu membeli 1 -hari Travelcard untuk zona 1. Itu akan memberi Anda perjalanan tak terbatas selama sehari di zona 1 dengan bus serta dengan kereta bawah tanah.