如何通过脚本将一个Excel工作表中的特定数据写入另一个工作表?
问题描述:
请找到下面的细节,如何通过脚本将一个Excel工作表中的特定数据写入另一个工作表?
INPUT OUTPUT
2 8
6 7
0 0
0 0
55 88
0 0
0 0
0 0
0 0
75 94
0 0
0 0
0 0
0 0
30 30
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
45 45
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
0 0
14 106
13 13
我在Sheet1中的上述数据,我想写的每个数据总和列在Sheet2中。
答
您打算添加INPUT(工作表1)和OUTPUT(工作表1)并在第1列(工作表2)上显示结果?如果是这样,试试这个;
Private Sub add()
Dim i As Integer
i = 2
Do Until Sheet1.Cells(i, 1) = ""
Sheet2.Cells(i, 1) = Sheet1.Cells(i, 1) + Sheet1.Cells(i, 2)
i = i + 1
Loop
End Sub
我假定INPUT是第1列和输出为ON塔2
是否上述每个数字代表一个行/列的值? – MatthewD
'SUM(A2,B2)'应该可以正常工作。 –