昱得資訊工作室
麻辣學園
歡迎光臨, 訪客. 請先 登入註冊一個帳號.
2014-09-02, 23:40:06
昱得資訊工作室
首頁 說明 登入 註冊 想當作者?
新聞: 會員注意!!麻辣家族討論區已轉換新系統,請移駕[麻辣家族新論壇]!!


+  麻辣家族討論區
|-+  MS Office 系列
| |-+  EXCEL
| | |-+  Excel程式區 (版主: Hsieh)
| | | |-+  製作/列印薪資條
0 會員 以及 1 訪客 正在閱讀本篇主題. « 上一篇主題 下一篇主題 »
頁: [1] 向下 列印
作者 主題: 製作/列印薪資條  (閱讀 19063 次)
leonchou
論壇維護群
*
離線 離線

文章: 1214


製作/列印薪資條
« 於: 2005-04-30, 14:48:59 »

工資明細表如下:

編號姓名基本工資職務工資扣款實發金額
1
林一4000015000300052000
2
林二4000020000600054000
3
張三5000020000550064500

要在每一筆的上面插入表頭, 怎麼做較好??

如果要在Excel做,不藉由其他軟体的話,你可以:

在【版面設定】把表頭設為標題列,然後在預覽模式下
把下邊界拉到只容納一列(一個員工)。
如此印出來就會每個人都有表頭了。

不過印出來是一個員工一頁,通常不是我們要的薪資條。
如果是要多名員工印在同一頁就要用其他方法。

不知 Access 有沒有這功能...
當然 Word 合併列印也有一頁多筆的功能,
但要在 Excel 做,大概只能用巨集了。

1.在工資表視窗按 [F8],出現巨集新增/執行視窗,
  在 [巨集名稱] 輸入 "print_salary" -> [建立]

2.出視巨集編輯視窗,Sub print_salary( ) 內容如下:

Sub print_salary( )
r = 3
Do While Cells(r, 1) <> ""
 Rows(1).Copy: Rows(r).Insert Shift:=xlDown
 r = r + 2
Loop
Application.CutCopyMode = False
ActiveSheet.PrintOut
r = 3
Do While Cells(r, 1) <> ""
 Rows(r).Delete
 r = r + 1
Loop
End Sub

3.按 [Alt+Q] 回到工資表視窗 -> 再按 [F8],執行 print_salary 巨集。

[說明]
  • 此巨集會在每一列插入表頭 -> 列印 -> 刪除插入的表頭,回復原狀。
  • 第一次執行巨集前請先將工資表複製到他處(備份),以防萬一。
    多次試用無問題後,再自行決定要不要備份。
  • 巨集自動以第一列表頭複製插入到各列,所以若要加大各員工的間隔,請調整第一列的列高。

有關製作薪資條的各種方式,可參考這裡
已記錄

頁: [1] 向上 列印 
« 上一篇主題 下一篇主題 »
自訂搜尋
跳到:  


Google PageRank Checker
本頁花了 0.284 秒, 以及 20 次的資料庫查詢.