excel 操作界面单元格公式与宏

要操作界面单元格公式可有变量,而变量值可由宏运行后得来,这样就方便了?
可以到操作界面单元格公式中写宏一样的很长代码吗?这样也方便?
答的好视情况追加 若干悬赏分。
这样的比如在操作界面单元格c1中输入好=sum(a1:b1)/i,这里有个变量i ,想法是先在宏里使"i"得到一个值,再c1中公式就可自动更新i为某值了。
又比如c1中可以有“i”得值的代码和sum(a1:b1)/i代码写在一起。(i是变量,不固定取值的)
而不是把所有代码连同公式都放在宏里。

关于宏,我举个A、B、C、D.....若干列的第一行有数据,在第一行最后的单元格求平均数的例子,这里的i就是不定的。

Sub AverageNum()
Dim TotalNum
TotalNum = 0
For i = 1 To 256 '从1列到最多256列
TotalNum = TotalNum + Cells(1, i).Value '循环叠加单元格数据
If Cells(1, i) = "" Then '遇到空值
Exit For '退出FOR循环
End If
Next
If i = 1 Then '如果第一个就是空值
MsgBox ("没有数据") '提示没有数据
Else
Cells(1, i) = TotalNum / (i - 1) '其他就在最后一个空白单元格求出平均数
End If
End Sub

'直接求i值的宏,就简单了
Sub iValue()
For i = 1 To 256
If Cells(1, i) = "" Then
Cells(1, i) = i - 1 '空白单元格数值i-1,表示前方有i-1项数据
Exit For
End If
Next
End Sub

以上是例子,不知道讲清楚否?
温馨提示:答案为网友推荐,仅供参考
第1个回答  2011-01-05
直接根据需要写宏代码就好了,公式也罢,代码也罢,千变万化,你这问的是什么东西都搞不清,让人怎么回答您?本回答被网友采纳
相似回答