每次打开Excel时,可以在Workbook_Open事件中执行代码。打开Visual Basic Editor(按下Alt + F11),然后在左侧的"VBAProject"窗口中选择要在其中添加代码的工作簿。双击该工作簿,然后在新打开的代码窗口中选择"Workbook"和"Open",然后在其中添加以下代码:

Private Sub Workbook_Open() Dim ws As Worksheet Dim lastRow As Long

Set ws = ThisWorkbook.Worksheets("2023年汇总")
lastRow = ws.Cells(ws.Rows.Count, "X").End(xlUp).Row

' 在这里添加你想要执行的代码

End Sub

在上面的代码中,我们首先声明了一个Worksheet对象ws和一个Long类型变量lastRow。然后,我们使用Set语句将ws设置为名为"2023年汇总"的工作表。接下来,我们使用Cells和Rows属性来确定列X中的最后一行,并将其存储在lastRow变量中。最后,你可以在代码的最后部分添加你希望在每次打开Excel时执行的代码

每次打开Excel 都执行代码Set ws = ThisWorkbookWorksheets2023年汇总lastRow = wsCellswsRowsCount XEndxlUprow

原文地址: http://www.cveoy.top/t/topic/iWzQ 著作权归作者所有。请勿转载和采集!

免费AI点我,无需注册和登录