Slik importerer Outlook-kontakter i Combo Box

Importere Outlook-kontakter til en "kombinasjonsboks" kontroll i Microsoft Access database applikasjon gjør du enkelt ved hjelp av Visual Basic for Applications, eller VBA, et programmeringsspråk som brukes til å automatisere prosesser i Microsoft Office-programmer. Du kan referere til Microsoft Outlook objektbiblioteket for å få tilgang til kontakter mappen i Outlook. Denne prosessen kan være nyttig når du ønsker å sende en e-post fra Access til noen i kontaktlisten i Outlook.

Bruksanvisning

1 Start Microsoft Access, klikker du på "Create" og klikk "Form Design" for å skape en ny form. Klikk "Combo Box" fra "Controls" -panelet, og klikk på skjemaet for å legge en ny kombinasjonsbokskontroll. Legg en "Command Button" bruker samme teknikk.

2 Høyreklikk på kommandoknappen, og klikk "Egenskaper". Klikk på "Event" -kategorien, velg "[Hendelsesprosedyre]" og klikk på ellipse for å skape et klikk hendelser denne knappen.

3 Klikk på "Verktøy" -menyen og klikk "Referanser" for å starte Referanser vinduet. Merk av i boksen ved siden av "Microsoft Outlook <versjonsnummer> objekt bibliotek" og klikk "OK."

4 Legg til følgende kode for å erklære Outlook gjenstander og legge til kontakter ved hjelp av en "For ... Loop:"

Sett OLApp = Create ( "Outlook.Application")

Sett OLNSp = OLApp.GetNamespace ( "MAPI")

Sett OLContactFldr = OLNSp.GetDefaultFolder (olFolderContacts)

Me.Combo0.RowSourceType = "Value List"

For hver cntItem I OLContactFldr.Items

Me.Combo0.AddItem (cntItem.Subject)

Neste cntItem

5 Bytt tilbake til Microsoft Access, og klikk på "View" ikonet for å kjøre skjemaet. Klikk på knappen for å importere Outlook-kontakter til kombinasjonsbokskontroll.