當前位置:首頁 » 表格製作 » 表格的編碼怎樣快速的加一位數
擴展閱讀
運動可以改變遲鈍嗎 2024-12-29 03:50:25
練車可以用哪個軟體 2024-12-29 03:38:08

表格的編碼怎樣快速的加一位數

發布時間: 2024-12-06 18:56:08

⑴ excel 宏 我自己做了個銷售單列印,希望能自動生成單號, 單號格式為SXH+當日日期+三位數

假設A1: SXH
B1: TODAY()
假設編碼在C1單元格,使用下面代碼可實現列印和自動編碼遞增。
按ALT+F11打開VBA窗口,插入一個模塊,把下面代碼復制進去。
回到excel窗口,按「視圖-工具欄」,點「窗體」,調出「窗體」工具欄,在上面選一個按鈕,添加到表格上,並指定宏為「列印」。
使用時,每點擊一下添加的按鈕,就會列印一次,並使編號自動加一。

Sub 列印()
ActiveWindow.SelectedSheets.PrintOut
s = Val(Range("C1"))
s = s + 1
Range("C1") = "'" & Right("00" & s, 3)
End Sub

調整一下表格 是A1 B1 C1看起來像個整體就好了