excel - VB 脚本运行时错误 : Object Required: 'Active Cell'

Question

尝试运行以下 VBScript:

Set ObjExcel = createobject("Excel.Application")
Set objWb = objExcel.Workbooks.Open("C:\test.xlsx")
Set objSheet = objWb.Worksheets("Sheet1")


objSheet.Cells(1,1).Select
With ActiveCell.Font 
 .Bold = True 
 .Italic = True 
End With

抛出错误如下:

线路:7
字符:1
错误:需要对象:“ActiveCell”
代码:800A01A8
来源:Microsoft VBScript 运行时错误

所以它没有链接 ActiveCell。我花了几个小时在网上搜索了很多类似的问题，但没有运气，有什么建议吗？提前致谢。

Answer 1

“.ActiveCell”(以及所有其他 Active*s)是 Excel 交互式使用的概念。这意味着用户刚刚单击的单元格 - 可能是错误的，请稍等，直到他点击他想要的那个。
如果您自动化 Excel，您将摆脱用户，因此需要跟踪他的疯狂点击。现在一个程序要求另一个程序直接执行必要的任务。无需模拟用户的点击 (.Select) 并在所有地方搜索激活的 Cell。
程序只是说:“请——

With objSheet.Cells(1,1).Font 
 .Bold = True 
 .Italic = True 
End With

太感谢了”。