2025年10月29日 星期三

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


沒有留言:

張貼留言

職場毒癌:你憑什麼以為你十年寒窗,抵得我三代從商

你憑什麼以為你十年寒窗,抵得我三代從商——這句話已經記不得是從哪裡看到的,可能是某部劇,也可能是某篇 FB 文章標題。 但最近,特別有感。 為什麼會有這種感觸? 職場上有個同事,一路慢慢升到課長,好歹也是管理職,雖說不上鐵飯碗,但在多數人眼裡也算穩定。 結果呢?輾轉換了兩個製造課...