怎样在 excel 里用 vba 之类的实现点击一个按钮后一行数据自动复制粘贴到指定
行?
怎样在 excel 里用 vba 之类的实现点击一个按钮后一行数据自动复制粘贴到指
定行?
就是输入完一行数据后,点击一个按钮,这一行数据自动复制粘贴到指定行。
比如在 excel 表里第 2 行是 “0023 李明 男 23 岁 济南 学生”点击一个按钮后
这行数据自动复制到 第 23 行,那么第 23 行就是“0023 李明 男 23 岁 济南
学生”。然后再把第 2 行改成“0024 张三 男 25 岁 济南 学生”点击一个按钮后
这行数据自动复制到 第 24 行。类似于像数据表填入数据。
谢谢 !
我来帮他解答
满意回答
Private Sub CommandButton1_Click()
n = 23
Do While Cells(2, 1) <> ""
If Cells(n, 1) <> "" Then
n = n + 1
Else:
Range("A2:F2").Copy Destination:=Range(Cells(n, 1), Cells(n, 6))
Exit Do
End If
Loop
End Sub