【问题标题】:When I run the following macro I get "Run-time error '1004': Application-defined or object-defined error."当我运行以下宏时,我得到“运行时错误'1004':应用程序定义或对象定义的错误。”
【发布时间】:2017-07-14 15:39:57
【问题描述】:

我是这方面的新手。我确定它与语法有关。感谢任何帮助!奇怪的是,我在同一个工作簿的另一个模块中使用了相同的代码。我将它复制到这个宏中并简单地更改了单元格引用。

Debug 突出显示以..."Range("O2:O" & EndRow)."开头的代码行

Excel宏代码:

Sub insertsubmissionformulas()
  '
  ' insertsubmissionformulas Macro
  '
  Sheets("Client").Select
  With ThisWorkbook.Worksheets("Client")
    EndRow = .Cells(.Rows.Count, "N").End(xlUp).Row
    Range("O2:O" & EndRow).Formula = "=IF(ISBLANK(N2),"",INDEX(Historical!$C:$C,MATCH(N2,Historical!L:L,0)))"
  End With
  '
End Sub

【问题讨论】:

    标签: excel vba


    【解决方案1】:

    您需要四个引号来在公式中显示双引号,而不是两个。 "=IF(ISBLANK(N2),"""",INDEX(Historical!$C:$C,MATCH(N2,Historical!L:L,0)))"

    【讨论】:

    • 太棒了!感谢您的帮助!
    • 谢谢@RayG。如果您将此答案标记为已成功回答,将不胜感激。很高兴能提供帮助。
    猜你喜欢
    • 2012-12-08
    • 2013-05-04
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    • 2023-03-28
    • 2016-01-14
    相关资源
    最近更新 更多