Kali ini saya akan membahas bagaimana cara menginstal font menggunakan coding atau script VBA dimana jendela font setting atau font instal akan dibuka menggunakan tombol yang telah dibuat dan dirancang oleh kita sendiri.
Coding untuk membuka Jendela Font
Private Sub CommandButton1_Click()Di dalam windows kita pernah mendengar yang namanya beberapa file Rundll32, nah untuk menampilkan jendela yang dijalankan melalui Runddl32 Anda bisa menggunakan fungsi Rundll32.Shell32.dll
On Error Resume Next
Shell "Rundll32 Shell32.dll,SHHelpShortcuts_RunDLL FontsFolder", vbNormalFocus
ShowControlPane4 = Err.Number = 0
End Sub
Anda bisa memanggil jendela font dengan menggunakan objek CommandButton seperti yang dicontohkan diatas dengan prosedur klik yang artinya jika commandbutton1 diklik oleh User maka jendela font akan muncul dan disinilah Anda bisa menambahkan jenis font baru ke dalam jendela font tersebut.
Demikian, tutorial singkat bagaimana coding atau perintah untuk instal font dalam menambahkan jenis font baru kedalam kotak font. Semoga bermanfaat dan selamat mencoba.
0 Response to "Function VBA Excel Instal Font Setting Dengan Rundll32 #Rumus Ajaib"
Post a Comment