簡體   English   中英

CreateObject(“ Excel.Application”)不起作用

[英]CreateObject(“Excel.Application”) does not work

作為背景,我試圖刪除2007 Excel工作簿的第二行。 我沒有在服務器上安裝MS Office,因此無法安裝它們。 由於無法安裝Office,因此使用互操作程序集沒有用。 當我嘗試使用VB腳本(如下)操縱文件時,它給了我各種各樣的錯誤:

Dim filename As String
Dim appExcel As Object
Dim newBook As Object
Dim oSheet1 As Object

appExcel = CreateObject("Excel.Application")
filename = "C:\test.xls"
appExcel.DisplayAlerts = False

newBook = appExcel.Workbooks.Open(filename)
oSheet1 = newBook.worksheets("Sheet1")
oSheet1.Range("A2").Entirerow.Delete()


newBook.SaveAs(filename, FileFormat:=56)
appExcel.Workbooks.Close()
appExcel.Quit()

我有點明白,沒有excel和程序集,我將無法操作該文件。 還有其他方法可以做到這一點嗎? 我不知道我可以嘗試使用哪些程序集。 謝謝閱讀。

不可以,如果沒有必需的Excel Objects庫,您將無法通過腳本語言從Excel文件*成功刪除行。

您可以使用ADO和SQL 查詢工作簿,但這不允許您刪除行。


*通過Excel文件,我的意思是您似乎正在使用的.xls文件-.xlsx文件(Excel 2007及更高版本)實際上只是壓縮的XML文件,如果您具有專門知識,則可以對其進行編輯

暫無
暫無

聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.

 
粵ICP備18138465號  © 2020-2024 STACKOOM.COM