Nhờ các bạn giúp bật lại chức năng seach tìm file trong excel

[hiénlinh197]

Nhờ các bạn giúp bật lại chức năng seach tìm file trong excel

 

[phulien1902]

Nhờ các bạn giúp bật lại chức năng seach tìm file trong excel

Có phải:

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

 

[hiénlinh197]

Có phải:

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,