hiénlinh197
Thành viên tiêu biểu
- Tham gia
- 26/5/09
- Bài viết
- 491
- Được thích
- 113
Có phải:Nhờ các bạn giúp bật lại chức năng seach tìm file trong excel
Sub OpenFile()
Dim myFileName As Variant
myFileName = Application.GetOpenFilename(FileFilter:="Excel Files,*.xls;*.xlsm*")
If myFileName <> False Then
Workbooks.Open (myFileName)
End If
End Sub
Đúng rồi bạn phulien1902. mình chạy code trên của bạn nó cũng báo như hình ảnh trên, Chắc bạn có hướng giải quyết. Giúp mình với nhé. Cảm ơn bạn,Có phải:
PHP:Sub OpenFile() Dim myFileName As Variant myFileName = Application.GetOpenFilename(FileFilter:="Excel Files,*.xls;*.xlsm*") If myFileName <> False Then Workbooks.Open (myFileName) End If End Sub
DIỄN ĐÀN GIẢI PHÁP EXCEL Group 1
DIỄN ĐÀN GIẢI PHÁP EXCEL Group 2