“对象 '_Worksheet' 的方法 'Range' 失败”错误消息

Zon*_*Rob 3 excel vba range

我已经尝试了底部链接的问题中建议的代码,但在线上出现错误:

Set getNthColumn = Range(startCell, endCell)
Run Code Online (Sandbox Code Playgroud)

错误是

对象“_Worksheet”的方法“范围”失败

此代码应该设置其公式为 VLOOKUP 的范围单元格的颜色格式。

所有帮助表示赞赏。

Vlookup复制单元格的颜色 - Excel VBA

GSe*_*erg 5

显然,您将代码放入工作表的代码模块中。

在这种情况下,Range()将解析Worksheet.Range()为该工作表的 。如果startCellendCell属于不同的工作表,您将收到错误消息。

如果您将代码放在一个普通模块中,正如 OP特别要求的那样Range()则意味着Application.Range(),这将正确构建您的范围。

您可以通过显式使用Application.Range(startCell, endCell).

  • 作为创可贴(以及不良出身的证明),我建议“Set getNthColumn = startCell.Parent.Range(startCell, endCell)”。 (2认同)
  • 太棒了 - 只需添加“应用程序”。这就是所需要的。谢谢。 (2认同)