Daftar Isi
Artikel ini mengilustrasikan cara format a sel sebagai teks menggunakan VBA kode dalam Excel dengan 3 metode yang berbeda. Dengan bantuan Teks dan Fungsi format dan Rentang . NumberFormat properti , kita dapat mengatur kode format angka untuk mengubah nilai sel menjadi teks dengan mudah. Mari selami contoh dan terapkan teknik ini.
Unduh Buku Kerja Praktik
Unduh buku kerja latihan ini untuk latihan saat Anda membaca artikel ini.
Format Sel sebagai Teks.xlsm3 Metode yang Cocok untuk Memformat Sel sebagai Teks Menggunakan VBA di Excel
Pada bagian ini, kita akan mendemonstrasikan bagaimana kita bisa memformat cell sebagai teks menggunakan VBA di excel. Namun sebelumnya, kita perlu mengetahui bagaimana cara membuka jendela visual basic editor di excel.
Menulis Kode di Editor Visual Basic
Ikuti langkah-langkah untuk terbuka yang editor visual basic dan menulis beberapa kode di sana.
- Pergi ke Pengembang tab dari tab Pita Excel .
- Klik yang Opsi Visual Basic.
- Dalam Visual Basic untuk Aplikasi jendela, klik tombol Sisipkan dropdown untuk pilih yang Modul Baru
Sekarang itu modul baru adalah dibuka , tulis beberapa kode di sana dan tekan F5 untuk lari.
1. Penggunaan Range.NumberFormat Properti untuk Memformat Sel sebagai Teks
Dalam contoh ini, kita akan menggunakan Range.NumberFormat properti di Kode VBA untuk format a sel sebagai teks Pada tangkapan layar di bawah ini, di sel C5 kita memiliki tanggal pendek bahwa kita akan perubahan sebagai teks .
Sekarang, dalam editor visual basic salinan dan tempelkan berikut ini kode .
Sub FormatCellAsText() Range("C5").NumberFormat = "@" End Sub
Sekarang tekan F5 untuk lari kode.
Di sini kita bisa melihat tanggal pendek sel yang diformat adalah berubah ke a nilai teks .
Penjelasan Kode:
- Kami menggunakan Rentang Objek untuk pilih yang sel di lembar kerja yang berisi masukan
- Untuk format yang nilai masukan sebagai teks , kita perlu meletakkan NumberFormat nilai sebagai "@".
Demikian pula, dengan menerapkan potongan kode yang sama, kita bisa mengubah format angka yang berbeda untuk teks .
Baca selengkapnya: Cara Memformat Sel dan Teks Tengah dengan Excel VBA (5 Cara)
Bacaan Serupa
- Cara Mengubah Ukuran Font Seluruh Lembar dengan Excel VBA
- Cara Menulis 001 di Excel (11 Metode Efektif)
- Perataan Teks dengan Tombol Perintah VBA di Excel (5 Metode)
- Cara Menambahkan Teks setelah Angka dengan Format Kustom di Excel (4 Cara)
- Cara Kapitalkan Huruf Pertama dari Setiap Kata di Excel (4 Cara)
2. Rujuk Fungsi TEXT dalam Kode VBA untuk Memformat Sel sebagai Teks
The T EXT fungsi di Excel adalah fungsi lembar kerja bahwa mengkonversi a nilai numerik atau string ke a format yang ditentukan . Meskipun itu tidak a Fungsi VBA , kita bisa menggunakannya dengan merujuk ke sebuah Objek Fungsi Lembar Kerja untuk format a sel untuk teks Katakanlah kita memiliki Tanggal Panjang di sel B6 yang kita inginkan format sebagai teks .
Letakkan kode berikut di editor visual basic untuk mencapai hal ini.
Sub FormatCellAsText() Range("C6") = WorksheetFunction.Text(Range("B6"), "'0") End Sub
Oleh berjalan kode dengan menggunakan F5 dikonversi yang tanggal yang panjang menjadi teks Demikian juga, kita dapat memformat sel yang berisi format angka yang berbeda untuk teks .
Penjelasan Kode:
- Kami menggunakan Rentang Objek untuk pilih yang sel di lembar kerja yang berisi masukan dan nilai keluaran.
- The Objek Lembar KerjaFungsi memungkinkan kami untuk menggunakan Fungsi TEXT di Kode VBA .
- The Fungsi TEXT kebutuhan 2 argumen-
nilai - yang referensi sel masukan (dalam contoh ini B6 ).
format_text- kami menggunakan " ' 0 " untuk mengkonversi yang nilai untuk format teks.
Baca selengkapnya: Cara Memformat Teks di Sel Excel (10 Pendekatan)
3. Penggunaan Fungsi Format VBA untuk Memformat Sel sebagai Teks di Excel
The Fungsi format adalah salah satu dari fungsi konversi di VBA Excel. Ini mengembalikan a ekspresi yang diformat berdasarkan pada format yaitu ditentukan sebagai argumen kedua dari fungsi Dalam contoh ini, menggunakan kode berikut kami didambakan a Tanggal Panjang di dalam sel C5 ke a teks .
Sub FormatCellAsText() Range("C6").Value = Format(Range("B6").Value, "'0") End Sub
Penjelasan Kode:
- Kami menggunakan Rentang Objek untuk pilih yang sel di lembar kerja yang berisi masukan dan nilai keluaran.
- The Fungsi format kebutuhan 2 argumen-
ekspresi - yang referensi sel masukan (dalam contoh ini B6 ).
format- kami menggunakan " ' 0 " untuk mengkonversi yang nilai untuk format teks.
Kode Alternatif:
Sub FormatCellAsText() Range("C6").Value = " ' " & Format(Range("B6").Value, "0") End Sub
Baca selengkapnya: Cara Memformat Teks untuk Kapitalkan Huruf Pertama di Excel (10 Cara)
Catatan
- Kami menambahkan tanda kutip tunggal ( ' ) sebelum nol untuk masuk ke kode format angka sebagai " ' 0 " di Teks dan Argumen fungsi format untuk format a sel ke a nilai teks.
- Untuk lihat yang kode terkait dengan 3 metode yang berbeda, klik yang tombol kanan pada nama lembar dan pilih yang Lihat opsi Kode.
Kesimpulan
Sekarang, kita tahu cara memformat sel sebagai teks menggunakan kode VBA di Excel dengan 3 contoh berbeda. Semoga ini akan membantu Anda menggunakan metode ini dengan lebih percaya diri. Ada pertanyaan atau saran jangan lupa untuk memasukkannya ke dalam kotak komentar di bawah ini.