Excel界面
有人能帮我解决一个小问题吗?我试图有一个excel界面,以便编写一些绘图块属性表达式。
以下代码:
Dim NUOVA_ISTANZA As Object
Dim WRKB As Workbook ' Attribuzione della variabile "Cartella di lavoro Excel"
Dim WRKS As Worksheet ' Attribuzione della variabile "Foglio di lavoro"
On Error GoTo MESSAGGIO_ERRORE
Set NUOVA_ISTANZA = GetObject(, "Excel.Application") ' Attribusce alla variabile "NUOVA_ISTANZA" l'applicazione Excel: se Excel non è aricatot restituisec un errore
Set WRKB = NUOVA_ISTANZA.Workbooks.Add ' Attribuisce alla variabile WRKB la cartella di lavoro Excel corrente
Set WRKS = NUOVA_ISTANZA.ActiveSheet
现在,我在WRKB上收到一条错误消息,作为工作簿指令“未定义用户定义的类型”。
如果我不使用变量dim继续,稍后当我尝试将excel工作表格式设置为边框和其他单元格格式时
With WRKS.Columns(2).Resize(, 3) ' Bordo destro e sinistro colonne coordinate
.Borders(xlEdgeLeft).LineStyle = xlContinuous
.Borders(xlEdgeRight).LineStyle = xlContinuous
.Borders(xlInsideVertical).LineStyle = xlContinuous
End With
我收到一个错误“应用程序定义或对象定义错误”
请帮帮我 你好
你首先需要设置一个excel引用,这样你就能得到你想要的。
让我们试着用一个小例子来帮助你:
这种错误“应用程序定义或对象定义的错误”是对象的典型原因。
页:
[1]