Untuk membuka file yang telah disimpan yang biasanya menggunakan fungsi open Ctrl + O. Open disini dia akan membuka kotak dialog untuk memilih file dan lokasinya. Hal bisa juga dilakukan dengan coding macro. Dengan cara ini bisa kita fungsikan untuk mensinkronkan antar file.
Contoh dari coding tersebut adalah sebagai berikut :
Private Sub CmdCariKT1_Click()
Dim fNameAndPath As Variant
fNameAndPath = Application.GetOpenFilename(FileFilter:="Laporan (*.XLSx), *.XLSx", Title:="Select File Report To Be Opened")
If fNameAndPath = False Then Exit Sub
Text1.Value = fNameAndPath
End Sub
Dari fungsi ini kita bisa menemukan filename yang di tunjukkan pada text1.
0 comments:
Posting Komentar