-
Chuyên mục hỏi ngu
http2 > 01-08-19, 04:40 PM
công nhận em ngủ hết biết không biết cái biến nó sai chổ nào hic
Dim dlgOpen As FileDialog
báo lõi hoài không mở được
Mã PHP:Function getFile(Tit As String, formatName As String, formatType As String)
Dim dlgOpen As FileDialog
Set dlgOpen = Application.FileDialog(msoFileDialogOpen)
With dlgOpen
.Title = Tit
.Filters.Clear
.Filters.Add formatName, formatType
.AllowMultiSelect = False
result = .Show
If (result <> 0) Then
getFile = Trim(dlgOpen.SelectedItems.Item(1))
End If
End With
End Function -
RE: Chuyên mục hỏi ngu
http2 > 01-08-19, 05:22 PM
xin phép admin xóa giùm bài đăng . em đã tìm ra được . em chưa khai báo thư viện ^^