Excel 添加一个保存按钮，如何能够实现点击按钮后。

2024-11-30 02:03:03

推荐回答（2个）

回答1：

录制一个宏，然后在视图－工具栏－窗体上找到命令按纽，在工作表上做一个按纽，右键选指定宏，指定刚才录制的宏即可。

回答2：

Private Sub CommandButton1_Click()
Sheets("Sheet2").Select
Worksheets("Sheet2").Rows(2).Select
Selection.Insert Shift:=xlDown
Worksheets("Sheet2").Range("A2") = Worksheets("Sheet1").Range("J2")
Worksheets("Sheet2").Range("B2") = Worksheets("Sheet1").Range("L1")
Worksheets("Sheet2").Range("C2") = Worksheets("Sheet1").Range("J3")
Worksheets("Sheet2").Range("D2") = Worksheets("Sheet1").Range("N3")
Worksheets("Sheet2").Range("E2") = Worksheets("Sheet1").Range("B1")
Worksheets("Sheet2").Range("F2") = Worksheets("Sheet1").Range("N2")
Worksheets("Sheet2").Range("G2") = Worksheets("Sheet1").Range("B2")
Worksheets("Sheet2").Range("H2") = Worksheets("Sheet1").Range("H1")
Worksheets("Sheet2").Range("I2") = Worksheets("Sheet1").Range("I1")
Sheets("Sheet1").Select
End Sub
’只是一个样子你看一下学一学，也可以加入循环。