VBA 資料分析教學：Day 1

 VBA 資料分析教學

Day 1 教學：自動填入流水號

實戰目標：自動在資料清單中填寫流水號，簡化手動操作。

程式範例：

Sub EnterSerialNumber()

    Dim serial_num As Integer

    serial_num = InputBox("請輸入欲產生的流水號最大值：")

    For sn = 1 To serial_num

        ActiveCell.Value = sn

        ActiveCell.Offset(1, 0).Activate

    Next sn

End Sub