edel41
2002-01-28, 02:07 PM
有那一位高人會用OUTLOOK的巨集將連絡人的住址送到印表機。
正在努力中……
Private Sub CommandButton1_Click()
Set myOlApp = CreateObject("Outlook.Application")
Set myItem = myOlApp.CreateItem(olContactItem)
myItem.MailingAddress.PrintOut
End Sub
正在努力中……
Private Sub CommandButton1_Click()
Set myOlApp = CreateObject("Outlook.Application")
Set myItem = myOlApp.CreateItem(olContactItem)
myItem.MailingAddress.PrintOut
End Sub