varFileName = Application.GetOpenFilename(FileFilter:="XLSX僼傽僀儖(*.xlsx),*.xlsx", _
Title:="XLSX僼傽僀儖偺慖戰")
If varFileName = False Then
Exit Sub
End If
弹出文件选择框,如下
varFileName = Application.GetOpenFilename(FileFilter:="XLSX僼傽僀儖(*.xlsx),*.xlsx", _
Title:="XLSX僼傽僀儖偺慖戰")
If varFileName = False Then
Exit Sub
End If
弹出文件选择框,如下