你可以点Alt+F11 在左边的工程窗口中，点“thisworkbook” 在右边的窗口中复制以下代码，之后保存。Private Sub Workbook_Open()ActiveWorkbook.Sheets("sheet1").SelectRange("a1").SelectEnd Sub这是打开sheet1中的A1，你试试看
