2016-07-22 48 views
2

例如,我想将公式添加到所有选中的单元格中,然后单击它。 Cells.Address非常适合识别单元格,但是当我添加公式时,在看到单元格后,vba添加锁定美元符号,我想避免这种情况。我可以从没有美元符号的VBA向单元添加公式吗?

如: r = Target.Row Cells(r, 1).Formula = "=" & Cells(r, 2).Address & "*" & Cells(r, 3).Address

细胞的结果(如果目标A1):=$A$2 * $A$3

但我要的是结果:=A2 * A3

回答

3

设置.Address0的前两个标准:

Cells(r, 1).Formula = "=" & Cells(r, 2).Address(0,0) & "*" & Cells(r, 3).Address(0,0) 
+0

谢谢,OmG ...我真的转储.. – Pisti

+1

@Pisti我们都有那些日子。这就是为什么这样的网站存在。 –

+0

谢谢。你是对的。 – Pisti