EXCEL 翻译解释一下这个 VBA 程序

来源:百度知道 编辑:UC知道 时间:2024/09/21 06:22:11
Private Sub CommandButton1_Click()
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub

Private Sub CommandButton2_Click()
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub

Private Sub CommandButton3_Click()
UserForm2.Show
End Sub

Private Sub CommandButton4_Click()
End Sub

Private Sub 打印page01到page09_Click()

Sheets("报告").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True

Sheets("page01").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True

Sheets("page02").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True

Sheets("page03").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True

Sheets("

私人小组CommandButton1_Click ( )
ActiveWindow.SelectedSheets.PrintOut副本: = 1 ,整理: =真
ActiveWindow.SelectedSheets.PrintOut副本: = 1 ,整理: =真
结束小组

私人小组CommandButton2_Click ( )
ActiveWindow.SelectedSheets.PrintOut副本: = 1 ,整理: =真
结束小组

私人小组CommandButton3_Click ( )
UserForm2.Show
结束小组

私人小组CommandButton4_Click ( )
结束小组

私人小组打印page01到page09_Click ( )

表( “报告” ) 。选择
ActiveWindow.SelectedSheets.PrintOut副本: = 1 ,整理: =真

表( “ page01 ” ) 。选择
ActiveWindow.SelectedSheets.PrintOut副本: = 1 ,整理: =真

表( “ page02 ” ) 。选择
ActiveWindow.SelectedSheets.PrintOut副本: = 1 ,整理: =真

表( “ page03 ” ) 。选择
ActiveWindow.SelectedSheets.PrintOut副本: = 1 ,整理: =真

表( “ page04 ” ) 。选择
ActiveWindow.SelectedSheets.PrintOut副本: = 1 ,整理: =真

表( “ page05 ” ) 。选择
ActiveWindow.SelectedSheets.PrintOut副本: = 1 ,整理: =真

表( “ page06 ” ) 。选