在excel中如何使用VBA插入一个按钮，使其点击按钮实现在...

亲，请截图上来看看。

A2单元格是纯数字么？如果是编号，前面应该有0吧，例如0001；

打开你的Excel文件，按“Alt+F11”打开VBA编辑窗口，然后在左侧空白处点击右键，zd“回插入”，“模块”。右侧空白处粘贴下面的代码。关闭VBA窗口。

点击菜答单“开发工具”，“插入”，选择第一个“按钮”。在表格的空白区域用鼠标拖拽出一个矩形按钮，并指定刚才粘贴的宏。如果菜单上没有“开发工具”，请点击菜单“文件”，“选项”，“自定义功能区”，右侧的窗口中勾选“开发工具”。

Sub dy()
Dim i As Integer
Range("A2").Value = Range("A2").Value + 1
For i = 1 To Sheets.Count
    Sheets(i).PrintOut
Next
End Sub

插入一个按百钮控件，把下面度的代码贴进去，注意你的button的名问字替换掉Private Sub CommandButton1_Click()中的CommandButton1
Option Explicit
Public buttonClickCount As Integer
Private Sub CommandButton1_Click()
buttonClickCount = buttonClickCount + 1
Worksheets("Sheet3").Cells(1, 5).value = Worksheets("Sheet1").Cells(buttonClickCount, 1).value
'MsgBox (buttonClickCount)
End Sub
注意每次答重新打开版excel表格，按钮计数才会重置为零权
sub 按钮1()
range("b3:h3").copy sheet3.cells(rows.count,1).end(xlup).offset(1,0)

end sub

实现A1+1很简来单

把下面代码复制进工源作表的宏百代码框

然后选择度 开发问工具--插入按钮--选择“A1加1()”这个答宏即可

---

Sub A1加1()

Range("A2").Select

Dim i

i = Range("a1")

Range("a1") = i + 1

End Sub

---