UC知道是一部内容开放、自由的互动网络百科全书客观、专业、权威的知识性百科全书
来源:百度知道 编辑:UC知道 时间:2024/05/14 16:17:10
启动excel后按Alt+F11启动VBA编辑环境,并在左侧点击右键→插入→用户窗体。在工具栏中,添加按钮到窗体:
双击按钮,并添加如下代码
Private Sub CommandButton1_Click() Dim lastRow, i As Long With Sheets(1) lastRow = Sheets(1).UsedRange.Rows.Count For i = 1 To lastRow &