手邊沒有 VB, 故用 Excel 的 VBA 隨便寫了一個 (只寫了最基本的部份), 參考看看.
(要看程式碼請按 Alt-F11)