【已解決】 在Excel中單擊Sheet2時，是否可以在Sheet1的A列的最后一個記錄的下一行自動填上“End”？
最佳答案 2023-04-26 00:45
在 Excel 中，可以通過 VBA 宏的方式實現當用戶單擊 Sheet2 時，在 Sheet1 的 A 列的最后一個記錄的下一行自動填上“End”。
以下是一個示例代碼：
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If ActiveSheet.Name = "Sheet2" Then
? ? Dim lastRow As Long
? ? lastRow = Sheets("Sheet1").Range("A" & Rows.Count).End(xlUp).Row + 1
? ? Sheets("Sheet1").Range("A" & lastRow).Value = "End"
End If
End Sub以上代碼會監視用戶選定單元格的變化事件，如果當前活動工作表的名稱是“Sheet2”，則獲取 Sheet1 的 A 列的最后一個記錄的行號，然后在下一行填入“End”。
需要注意的是，使用 VBA 宏需要一定的編程經驗，并且在使用時需要謹慎操作，以免發生意外。
感謝您的支持，請隨意打賞。您的贊賞將鼓勵我繼續創作！
Excel搬運工
- Excel大神
掃碼關注微信公眾號
