longminbo的专栏

Sub emailmergewithattachments() ' ' emailmergewithattachments Macro ' 宏在 2007-9-28 由 longmb 创建 ' Dim Source As Document, Maillist As Document Dim Datarange As Range Dim Counter As Integer, i As Integer Dim bStarted As Boolean Dim oOutlookApp