VBA不会写公式 怎么弄?
追答用VBA写公式和直接在单元格写公式没什么区别,不会缩短打开时间。
既然打开很慢,估计数据多,公式也多,所以全部公式都要计算一次才能完成。但绝大部分数据不会改变,计算后也是原来的结果,所以用VBA直接计算填入数值,每次只计算新增和改变数据的部分。并不是用VBA来对单元格写公式,而是将公式所得的结果填写到单元格。
好像明白了点。用VBA咋弄呢?
追答例子:比如C列数据等于A列+B列(C2=A2+B2,C3=A3+B3,……第一行为标题)
Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
Dim Ra As Range
Set Ra = Intersect(Target, Range("A2:A65536"))
If Not Ra Is Nothing Then
For Each Ra In Ra
Ra.Offset(, 2) = Ra + Ra.Offset(, 1)
Next
End If
Set Ra = Intersect(Target, Range("B2:B65536"))
If Not Ra Is Nothing Then
For Each Ra In Ra
Ra.Offset(, 1) = Ra + Ra.Offset(, -1)
Next
End If
Application.EnableEvents = True
End Sub
这么多字母写在什么位置,我不懂。能说清楚一点吗?谢谢
追答看来你不会VBA,只能找别人帮忙了。现在将上面的例子文件发给你试试吧。
C=A+B,在A列和B列输入数据后看C列的结果。
数据库写公式后可以计算吗?那个我不会,如果行,那请大哥介绍一种数据库软件呗。谢谢
追答不好意思 我也不会数据库