註冊
登錄
首頁
論壇版規
禁止列表
說明
地圖
數位書香
私人消息 (0)
公共消息 (0)
論壇任務 (0)
系統消息 (0)
好友消息 (0)
帖子消息 (0)
麻辣家族討論版版
»
Word
» 自動化合併列印技術
返回列表
下一主題
上一主題
發帖
[原創]
自動化合併列印技術
linyancheng
發短消息
加為好友
linyancheng
當前離線
UID
14470
帖子
230
主題
75
精華
2
積分
337
金錢
337
點名
0
作業系統
Windows 10
軟體版本
Office 2000, 2019
閱讀權限
100
性別
男
來自
彰化縣
在線時間
95 小時
註冊時間
2013-7-18
最後登錄
2025-4-17
版主
帖子
230
主題
75
精華
2
積分
337
點名
0
作業系統
Windows 10
軟體版本
Office 2000, 2019
閱讀權限
100
性別
男
來自
彰化縣
註冊時間
2013-7-18
最後登錄
2025-4-17
1
#
跳轉到
»
正序看帖
打印
字體大小:
t
T
發表於 2020-4-2 10:58
|
只看該作者
[原創]
自動化合併列印技術
本帖最後由 linyancheng 於 2020-4-18 10:59 編輯
Word合併
Excel
列印
,早期版本是採相對路徑,Office 2007以後是採絕對路徑。
為避免因絕對路徑而失去Excel資料連結的麻煩,可在完成編輯Word主文件後,將其還原為標準的Word文件,然後在ThisDocument中加入以下代碼:
Private Sub Document_Open()
On Error Resume Next
With ThisDocument.MailMerge
.MainDocumentType = wdCatalog '主文件型式設為型錄(目錄),也可設為信封wdEnvelopes、信件wd
For
mLetters或標籤wdMailingLabels。
.OpenDataSource Name:=ThisDocument.Path & "\○○○○○.xls" '「○○○○○.xls」改成資料來源檔名。假設來源檔在同一資料夾中。
'.Destination = wdSendToNewDocument
'.SuppressBlankLines = True
'With .DataSource
'.FirstRecord = wdDefaultFirstRecord
'.LastRecord = wdDefaultLastRecord
'End With
'.Execute True
End With
'ThisDocument.Close wdDoNotSaveChanges
End Sub
Private Sub Document_Close()
On Error Resume Next
ThisDocument.MailMerge.MainDocumentType = wdNotAMergeDocument
End Sub
月曆設計系統v5.0
VBA源碼公開
函數
公式
公開
功能
變數
公開
月曆設計系統v5.0.zip
(608.55 KB)
下載次數:6
2020-4-2 10:58
樓主熱帖
台灣像這樣規模的論壇很少
快速穩定排序法測試
班級成績管理系統v4.0 Beta3
符號表v2.0 Beta1(Excel版)
文字輸入工具v2.0 Beta2(Word版)
造字輸入工具
造字輸入工具
符號表v2.0 Beta1
稿紙設計
班級成績管理系統v4.0 Beta5
收藏
分享
Word呈現極致的靜態之美,Excel展現極致的動態之美。
66DS
發短消息
加為好友
66DS
當前離線
UID
40564
帖子
1
主題
0
精華
0
積分
50
金錢
50
點名
0
作業系統
-
軟體版本
-
閱讀權限
20
性別
女
在線時間
18 小時
註冊時間
2024-4-2
最後登錄
2024-9-22
中學生
帖子
1
主題
0
精華
0
積分
50
點名
0
作業系統
-
軟體版本
-
閱讀權限
20
性別
女
註冊時間
2024-4-2
最後登錄
2024-9-22
2
#
發表於 2024-4-9 20:55
|
只看該作者
感謝分享!
TOP
靜思自在 :
【做人的開始】每一天都是故人的開始,每一個時刻都是自己的警惕。
返回列表
下一主題
上一主題
EXCEL專屬討論區
Excelㄧ般區
Excel程式區
進階應用專區
OFFICE 系列
Word
PowerPoint
Access
Office不分區
程式語言
VB 與 VB.Net
C 與 C#
Java 與 J#
程式設計不分區
資料庫
ORACLE
My SQL
MS SQL
網頁設計
ASP 與 ASP.NET
PHP
PHP+MySQL 入門實作
JavaScript
FLASH / ActionScript
HTM/ HTML/ CSS
網頁設計不分區
電腦與作業系統
電腦各種硬體討論
一般電腦軟體討論
論壇事務
管理公告
投訴反映
新手測試
愛 ‧ 生活
公益佈告欄
生活與感動
[收藏此主題]
[關注此主題的新回復]
[通過 QQ、MSN 分享給朋友]
申請友情鏈接
Facebook粉絲