Cara Menampilkan Path File Pada Textbox Userform - Gasskeun Cara Menampilkan Path File Pada Textbox Userform | Gasskeun

Cara Menampilkan Path File Pada Textbox Userform

File intinya mempunyai daerah lokasi penyimpanan entah itu di MyDocument, Drive D, Drive E atau pada folder yang ada di drive tertentu atau berada di folder dalam folder lagi. Artinya file mempunyai lokasi daerah penyimpanan atau alamat nah ini yang dinamakan Path.

Untuk menciptakan aplikasi di Ms. Excel memakai VBA tentunya terkadang Anda membutuhkan lokasi alamat daerah penyimpanan file tersebut. Untuk itu pada kesempatan kali aku akan membahas bagaimana seh cara menampilkan path file tersebut pada textbox yang ada di UserForm?

Baca Juga:
Belajar Cara Membuat Textbos Melalui UserForm
Oke langkah awal Anda desain terlebih dahulu Userform nya dan tambahkan satu buah objek textbox di dalam userform tersebut biarkan jangan diganti propertiesnya dulu seadanya saja. Tambahkan juga satu buah CommandButton untuk objek pemanggilan file yang akan dicari alamat (path) nya. sehabis itu gres kita buat codingnya.

Berikut coding unutk menampilkan Path file pada Textbox melalui UserForm.

Sub PilihFile()
Dim fd As FileDialog
Set fd = Application.FileDialog(msoFileDialogFilePicker)
Dim FileChosen As Integer
FileChosen = fd.Show
TextBox1.Value = fd.SelectedItems(1)
If FileChosen <> -1 Then
MsgBox "Pemilihan File Dibatalkan"
Else
Exit Sub
End If
End Sub

Setelah Anda menciptakan mekanisme diatas kita buat mekanisme dikala tombol di klik maka silakan tambahkan coding dibawah ini

Private Sub CommandButton1_Click()
Call PilihFile
End Sub

Jika anda membuka file tampilkan.xlsm maka pada textbox akan muncul alamat path nya ialah di C:\Users\user\Documents\tampilkan.xlsm

Baca:
Cara Menampilkan goresan pena sement
End Sub

Jika anda membuka file tampilkan.xlsm maka pada textbox akan muncul alamat path nya ialah di C:\Users\user\Documents\tampilkan.xlsm

Baca:
Cara Menampilkan goresan pena sementara "Tuliskan Nama Anda Disini" pada Textbox area
Demikian semoga bermanfaat.

Related Posts

Matikan AdBlock

Agar blog Ini tetap berjalan, matikan AdBlock atau masukkan blog ini ke dalam whitelist.
Terima kasih.