Question

Vba往excel 写公式的问题。。 Range("J8").FormulaR1C1 = "=(R"

Vba往excel 写公式的问题。。 Range("J8").FormulaR1C1 = "=(R" & rowNo & "C" & colNo & ")" 结果是 =$A$1. 我想设置 rowNo = 1,colNo = 1. 得到的结果没有 $符号，即 =A1. 如何写 呢？ 有答案的可以查看我的提问记录，已经发了两个同样的贴了，没人回答，一并回答，一并采纳为正确答案

Answer 1

按字面意思你这句Range("J8").FormulaR1C1 = "=(R" & rowNo & "C" & colNo & ")"
设置单元格=(R1C1)，自动加了$。下面改一下，这样写

rowNo = 1
colNo = 1
Range("J8").Formula = "=" & Chr(64 + rowNo) & colNo

当做字符串处理，Excel不会去识别就不会加上$引用了。结果可以得到你要求的效果，公式为=A1，值与A1单元格相同

Answer 2

Sub aaa()
rn = -7
cn = -9
Range("j8").FormulaR1C1 = "=r[" & rn & "]c[" & cn & "]"
End Sub

这样的试试

Answer 3

加一个.address(false,false)试试

Answer 4

Range("J8").Value="="&char(64+rowNo)&colNo