Membuat Huruf Pertama di Cell Excel Otomatis Kapital

Mengetik teks di Ms Excel berbeda dengan di Ms Word. Salah satu perbedaan adalah pada otomatisasi huruf kapital saat mengetik kata/kalimat. Di Ms Word kalian bisa men-setting sehingga saat mengetik kata di awal paragraf/alinea maka akan secara otomatis huruf pertama menjadi huruf kapital/besar.

Contoh :

indonesia menjadi Indonesia

Namun saat kalian mengetik teks di Ms Excel maka teks akan tetap seperti apa yang anda ketik

Contoh :

indonesia menjadi indonesia (tetap tidak berubah)

Nah lantas gimana caranya biar saat kita ngetik di Excel huruf depan kata yang kita ketik bisa otomatis menjadi kapital/huruf besar?

Oke kalian bisa ikuti Step by Step di bawah ini...

✅ Berlaku semua workbook (lama & baru)

✅ Real-time saat mengetik

✅ Huruf kapital tiap awal kata

✅ Sekali pasang, tidak pernah setting ulang

🟢 LANGKAH 1 —  Buat & Aktifkan PERSONAL.XLSB (sekali saja)

• Buka Excel buat File baru dan Simpan terlebih dulu
• Di Tab Developer klik View → Macros → Record Macro

• Store macro in: Personal Macro Workbook
• Klik OK, lalu Stop Recording
• Tutup Excel → buka lagi Excel
• Sekarang PERSONAL.XLSB sudah aktif permanen

🟢 LANGKAH 2 — Buat CLASS MODULE (WAJIB)

• Tekan Alt + F11
• Insert → Class Module
• Ubah Name menjadi: CGlobalTitleCase
• Copy Paste code ini :

Public WithEvents App As Application

Private Sub App_SheetChange(ByVal Sh As Object, ByVal Target As Range)

    On Error GoTo selesai

    Application.EnableEvents = False

    If Target.Cells.Count = 1 Then

        If VarType(Target.Value) = vbString Then

            Target.Value = UCase(Left(Target.Value, 1)) & Mid(Target.Value, 2)

        End If

    End If

selesai:

    Application.EnableEvents = True

End Sub

🟢 LANGKAH 3 — Aktifkan Event (INI KUNCI UTAMA)

• Di PERSONAL.XLSB
• Double-click ThisWorkbook
• Paste kode ini:

Dim GlobalTC As New CGlobalTitleCase

Private Sub Workbook_Open()

    Set GlobalTC.App = Application

End Sub

• Save
• Tutup Excel SEPENUHNYA
• Buka Excel Kembali

Coba ketik teks kalian dan lihat apa yg terjadi.......

Kalau berhasil seharusnya seperti ini hasil nya :

Anda Ketik	Hasil
indonesia	Indonesia
INDONESIA	INDONESIA (tidak diubah)
iNDONESIA	INDONESIA
kabupaten SRAGEN	Kabupaten SRAGEN