VBA Excel Pemula 5 - Cara Mengubah Text Menjadi Huruf KAPITAL dan Huruf kecil (UCase dan LCase) di Cell dan TextBox
Perhatikan gambar gif dibawah yang menampilkan Text yang ada pada Cell dengan cepat dapat diubah menjadi huruf kapital yang sering disebut Upper Case dan huruf kecil disebut dengan Low Case.
Apa pentingnya mempelajari hal ini? Penting..!! karena sering sekali data yang diinginkan dengan karakter khusus yang telah ditetapkan.
Mengubah Text Menjadi Huruf KAPITAL dan Huruf kecil |
Dengan mempelajari kode ini anda dapat mengatur dan menetapkan gaya text yang di inginkan pada textbox. Sehingga data yang di input memiliki gaya text yang sama.
Data akan terlihat lebih rapi dan terkesan profesional.
Dengan membuat file contoh penerapan kode akan lebih cepat memahami dan mengetahui fungsi dan alur kerja kode yang diterapkan.
Berikut kode untuk Mengubah Text Menjadi Huruf KAPITAL dan Huruf kecil (UCase dan LCase) di Cell :
Buka excel dan Pilih Tab Developer selanjutnya klik Visual Basic atau dengan jalan pintas keyboard Alt+F11
Pada Jendela Visual Basic Tambahkan Tool yang dibutuhkah dari ToolBox seperti UserForm yang terlihat pada gambar gif diatas ata bisa juga download di akhir posting ini.
Kode untuk CommandButton1 dan CommandButton5 dengan Caption "INPUT" lihat dan ikuti Tutorial posting VBA Excel Pemula 2.
Pada CommandButton2 dengan Caption "Upper Case" klik kanan dan pilih View Code dan masukkan kode berikut :
Private Sub CommandButton2_Click()
'VBA Excel Pemula 5: Cara Mengubah Text di Cell Jadi Upper Case (Huruf KAPITAL Or Lower Case (Huruf kecil) di Cell
'Kita dapat menggunakan UCase finction untuk mengubah text
Range("C5").Value = UCase(Range("C5").Value)
Range("C6").Value = UCase(Range("C6").Value)
End Sub
'VBA Excel Pemula 5: Cara Mengubah Text di Cell Jadi Upper Case (Huruf KAPITAL Or Lower Case (Huruf kecil) di Cell
'Kita dapat menggunakan UCase finction untuk mengubah text
Range("C5").Value = UCase(Range("C5").Value)
Range("C6").Value = UCase(Range("C6").Value)
End Sub
Private Sub CommandButton3_Click()
'Kita dapat menggunakan LCase finction untuk mengubah Text
Range("C5").Value = LCase(Range("C5").Value)
Range("C6").Value = LCase(Range("C6").Value)
End Sub
'Kita dapat menggunakan LCase finction untuk mengubah Text
Range("C5").Value = LCase(Range("C5").Value)
Range("C6").Value = LCase(Range("C6").Value)
End Sub
Berikut kode untuk Mengubah Text Menjadi Huruf KAPITAL dan Huruf kecil (UCase dan LCase) pada TextBox :
Private Sub CommandButton7_Click()
TextBox3.Value = UCase(TextBox3.Value)
TextBox4.Value = UCase(TextBox4.Value)
End Sub
TextBox3.Value = UCase(TextBox3.Value)
TextBox4.Value = UCase(TextBox4.Value)
End Sub
Private Sub CommandButton6_Click()
TextBox3.Value = LCase(TextBox3.Value)
TextBox4.Value = LCase(TextBox4.Value)
End Sub
TextBox3.Value = LCase(TextBox3.Value)
TextBox4.Value = LCase(TextBox4.Value)
End Sub
Sub Private TextBox1_Change()
TextBox1.Value = UCase(TextBox1.Value)
Textbox
TextBox1.Value = UCase(TextBox1.Value)
Textbox
Download : Aplikasi Pemula 5
Demikian posting VBA Excel Pemula 5 : Mengubah Text Menjadi Huruf KAPITAL dan Huruf kecil (UCase dan LCase) di Cell dan TextBox. Semoga dapat dikembangkan dengan keinginan dan kebutuhan masing-masing.
Semoga dapat dijadikan referensi dan informasi bagi yang baru belajar Vba Excel. Sampaikan masukan dan kritikan di kolom komentar.
Jika ingin menyampaikan pertanyaan, saran dan kritikan sampaikanlah dengan bijaksana pada kolom komentar yang tersedia d bawah artikel ini.
Posting Komentar untuk " VBA Excel Pemula 5 - Cara Mengubah Text Menjadi Huruf KAPITAL dan Huruf kecil (UCase dan LCase) di Cell dan TextBox"
Komentar Anda Sangat Menentukan Kelangsungan Blog ini