Ubah semua huruf menjadi kapital pada Excel dapat dilakukan dengan fungsi UPPER.
Cuma jadi ribet bila yang ingin dirubah adalah data pada seluruh sheet yang sedang aktif.
VBA code di bawah ini digunakan untuk mengubah ke dalam huruf kapital atas semua data pada sheet yang aktif.
Formula tidak ikut terpengaruh.

[code language=”vb”]
Sub kapital()
For Each cell In ActiveSheet.UsedRange
cell.Formula = UCase(cell.Formula)
Next cell
End Sub
[/code]

Untuk mengubah ke huruf kecil semua (Lower Case), ubah UCase menjadi LCase

0 0 votes
Article Rating
Format