請教諸位大大
最近出現以下問題
Dim FileName As String, E As Workbook
FileName = ThisWorkbook.Path & "\資料庫\" & "97學年上學期資料.xls"
xlfilenam = Dir(FileName)
Dim fsobj As Object
Set fsobj = CreateObject("Scripting.FileSystemObject")
If fsobj.FileExists(FileName) Then
With CreateObject(FileName)
.Windows(xlfilenam).Visible = True
.Close True
End With
End If
[attach]18560[/attach]
如上圖"97學年上學期資料.xls"明明已 .close
幕前"97學年上學期資料.xls"確已不見
但常在VBE裡 專案VBAProject 還存在