繁体   English   中英

Excel VBA:公式对于对象而言过于复杂

[英]Excel VBA: Formula is too complex for object

这似乎是一个简单的问题,但令人非常沮丧。 我已经在VBA中为电子表格编写了几个(相对简单的)宏,我想使其变得非常用户友好。

换句话说,我希望所有宏都由按钮运行。 但是,每当我尝试将按钮分配给宏时,都会出现错误:

公式过于复杂,无法分配给对象

即使我尝试将其分配给空子例程,也会发生这种情况。 它有效,但仅适用于我编写的第一个宏。 将其他子例程添加到模块后,就无法再将新按钮分配给宏。

这是我编写的代码:

Sub Button1_Click()

selName = Range("C2").Value
div = Range("E2").Value
cost = Range("F2").Value
diff = div - cost

If diff < 0 Then
    diff = 0
End If
Range("G2").Select
ActiveCell.FormulaR1C1 = diff

x = Range("A2").Value + 1
Worksheets("VIP_TEMPLATE.PIVOT").Select
Range("J" & x).Select
ActiveCell.FormulaR1C1 = diff

Worksheets("CALCULATE").Select
Range("F2").Select
ActiveCell.ClearContents

End Sub

模块中还有另一个子例程,我认为这可能是导致该问题的原因? 我认为这是因为当我简单地将数据复制粘贴到新工作表中时,可以为例程分配一个按钮。 我认为这与我的文件路径无关,因为我不使用任何(我认为)令人反感的字符。

我发现了问题。 事实证明,我的文件路径中确实有括号(埋在里面)。

暂无
暂无

声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.

 
粤ICP备18138465号  © 2020-2024 STACKOOM.COM