wps表格将命令按钮制定到宏 | excel命令按钮制定宏

1.excel命令按钮怎么制定宏

Private Sub CommandButton1_Click()

Worksheets("Sheet2").Activate

R = "A"

For J = 4 To 8

With Worksheets("Sheet2")

.Range(R & J) = "Name" & J

End With

Next

End Sub