关于excel的vba cells.formula的简单问题!! 30

关于excel的vbacells.formula的简单问题! 如果单元格a1=b1+c1,那么可以用cells(1,1).value=cells(1,2).value cells(1,3).value实现,也可以这样:cells(1,1).formula="=b1 c1",这有个好处是公式能显示在屏幕上,当b1 c1更改时,a1也更改。问:如果... 展开
发布于2010-07-31 07:50 最佳答案
 & i & ":

Range(".formula="假设 N 的值在你的控制之中:A"+C"清空原有公式
for i=1 to N
cells(i;=B",1).ClearContents ');A,用以下 FOR 语句

其他回答

FormulaR1C1 = "A1"将A1的公式“=B1+C1”自动向下填充到A1;A1;=B1+C1":A10
Range(")确实是简单的问题

Hi我;
Range(":=Range(",可以用代码完成
--------------
sub aa()
',excel的自动填充;),Type;A1"):A10".AutoFill Destination,详细解答
-----------------
最简单的方法
sxpose | 发布于2010-07-31 16:12
评论
那么你就通过编码去控制cell里的值就可以了啊
Private Sub CommandButton1_Click()
Dim n As Long
Dim i As Long
n = InputBox("输入行数")
For i = 1 To n
Cells(i, 1) = "=b" & i & "+c" & i
Next i
End Sub
远风的梦想家 | 发布于2010-07-31 08:20
评论
鉴于你的N每次取值都不一样,合理的做法应是:
dim n as long
n = WorksheetFunction.CountA(Columns("A:A") '得到你的数据行数,也就是N值
然后结合一楼的方法即可。
半夜烧火 | 发布于2010-07-31 15:24
评论
for 循环
shuffercheng | 发布于2010-07-31 08:01
评论
收起 其他2条回答

为您推荐: