Re: export public contacts

[William Cheung]

Dear,

let me explain in detail that i want.
i would use outlook public contacts as a central contact database for whole
company those contacts will reuse for several prepous in excel, such as
invoice, quotation, purchase...
i can't find an method to read outlook public folder from excel, so i try
export public folder to a database that excel can read.
it is quite difficult for me, any help for me?

thanks,
William

> "Michael Bauer" <[email protected]> wrote in message
> news:[email protected]...
>> Am Wed, 26 Apr 2006 10:51:06 +0800 schrieb William:
>>
>> You can call each item´s SaveAs method and store them in single files or
>> copy each field into any file, Excel e.g. There´s no Export function.
>>
>> --
>> Viele Gruesse / Best regards
>> Michael Bauer - MVP Outlook
>> -- www.vbOffice.net --
>>
>>
>>> Dear,
>>>
>>> i would do a macro for export contacts stored in public folder but i
>>> could
>>> not find a suitable vba method to do it. any help?
>>>
>>> thank you very much
>>> William
>
>

[Ardus Petus]

Yes you can read Oulook database from Excel.

You need to set a reference to Microsoft Outlook object library
The following code shows you how to access the Contacts folder in Outlook

HTH
--
AP

'---------------
Sub ListOutlookContacts()
Dim appOutlook As Outlook.Application
Dim folderContacts As Outlook.MAPIFolder
Dim itemContact As ContactItem
Dim iRow As Long

Set appOutlook = CreateObject("Outlook.Application")
Set folderContacts = appOutlook.GetNamespace("MAPI") _
.getdefaultfolder(olFolderContacts)

iRow = 0
For Each itemContact In folderContacts.Items
iRow = iRow + 1
With itemContact
Cells(iRow, 1) = .FullName
Cells(iRow, 2) = .BusinessAddress
Cells(iRow, 3) = .Email1Address
Cells(iRow, 4) = .BusinessTelephoneNumber
End With
Next itemContact
appOutlook.Quit
End Sub
'----------------
"William Cheung" <[email protected]> a écrit dans le message de
news:[email protected]...
>
> Dear,
>
> let me explain in detail that i want.
> i would use outlook public contacts as a central contact database for
whole
> company those contacts will reuse for several prepous in excel, such as
> invoice, quotation, purchase...
> i can't find an method to read outlook public folder from excel, so i try
> export public folder to a database that excel can read.
> it is quite difficult for me, any help for me?
>
> thanks,
> William
>
> > "Michael Bauer" <[email protected]> wrote in message
> > news:[email protected]...
> >> Am Wed, 26 Apr 2006 10:51:06 +0800 schrieb William:
> >>
> >> You can call each item´s SaveAs method and store them in single files
or
> >> copy each field into any file, Excel e.g. There´s no Export function.
> >>
> >> --
> >> Viele Gruesse / Best regards
> >> Michael Bauer - MVP Outlook
> >> -- www.vbOffice.net --
> >>
> >>
> >>> Dear,
> >>>
> >>> i would do a macro for export contacts stored in public folder but i
> >>> could
> >>> not find a suitable vba method to do it. any help?
> >>>
> >>> thank you very much
> >>> William
> >
> >
>
>

[IvKo]

http://www.imibo.com/imidev/Exchange/imice.htm

IMI Contacts Exporter for Microsoft Exchange Server is specially designed
for Microsoft Outlook users to export Contacts from any Outlook and/or
Exchange Public Contacts Folder (or private Mailbox folder) to MS Access
2000 table or MS Excel file.

http://www.imibo.com/imidev/Exchange/imice.htm




"William Cheung" <[email protected]> wrote in message
news:[email protected]...
>
> Dear,
>
> let me explain in detail that i want.
> i would use outlook public contacts as a central contact database for
whole
> company those contacts will reuse for several prepous in excel, such as
> invoice, quotation, purchase...
> i can't find an method to read outlook public folder from excel, so i try
> export public folder to a database that excel can read.
> it is quite difficult for me, any help for me?
>
> thanks,
> William
>
> > "Michael Bauer" <[email protected]> wrote in message
> > news:[email protected]...
> >> Am Wed, 26 Apr 2006 10:51:06 +0800 schrieb William:
> >>
> >> You can call each item´s SaveAs method and store them in single files
or
> >> copy each field into any file, Excel e.g. There´s no Export function.
> >>
> >> --
> >> Viele Gruesse / Best regards
> >> Michael Bauer - MVP Outlook
> >> -- www.vbOffice.net --
> >>
> >>
> >>> Dear,
> >>>
> >>> i would do a macro for export contacts stored in public folder but i
> >>> could
> >>> not find a suitable vba method to do it. any help?
> >>>
> >>> thank you very much
> >>> William
> >
> >
>
>