VBA達人請進~如何讓Excel輸入資料時自動跳格

Question

我有多筆資料需要輸入，每筆資料均有五欄，例如A1~E1，但打下一筆時需回到A2，手動移至指定儲存格很麻煩，請問如何指定每打完該列的五個欄位就會自動跳到下一列的開頭呢？

因為公司使用的excel版本為97，故無法使用保護儲存格的方式，又不能用Access，麻煩達人幫我寫個VBA，參考書很厚我看不懂.....謝謝~

Answer 1

請在對應的工作表模組輸入此程式碼
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 5 Then Target.Offset(1, -4).Select
End Sub