Supportnet / Forum / Skripte(PHP,ASP,Perl...)

Moin, ich hab´ ein kleines Makro in Word geschrieben, mit dem ich SMS versenden kann (auf solche Ideen kommt man, wenn man zu lange vor seiner Diplomarbeit sitzt...) Dabei hole ich mir die Telefonnummer aus dem Adressbuch mit [code] MobilNummer = Application.GetAddress(AddressProperties:="<PR_CELLULAR_TELEPHONE_NUMBER>", DisplaySelectDialog:=True) [/code] Dabei kommt eben dieser hübsche Dialog, den wohl jeder kennt. Jetzt würde ich gerene auch aus Outlook SMS versenden. Leider gibt´s [code].GetAddress() [/code] da nicht. Grundsätzlich ist mir schon klar, wie ich an die Nummer komme aber geht das auch mit einem Standarddialog wie in Word?

Hallo,

ich habe zwar kein Outlook, aber Du kannst hier genau so gut auf das PAB zugreifen, wie mit Word.

Mußt Dir mal unter Office\1031 die VBAOUTLx.chm zu Gemüte führen, da kommst Du ganz bestimmt weiter.

Unter Outlook wird das PAB über das AdressList.Objekt angesprochen mit

Set myAddressList = Application.Session.AddressLists("Personal Address Book")

Das weitere sollte dann etwa wie bei Word sein.

MfG maneich

Hallo maneich,

Danke für den Tipp. So komme ich zwar an den Eintrag aber leider nicht an den Dialog. Bislang bleibt also nur die Lösung über OLE (vielleicht hilfts ja wem...):

Set WordObj = CreateObject("Word.Application")
MobilNummer = WordObj.Application.GetAddress(,"<PR_CELLULAR_TELEPHONE_NUMBER>")
WordObj.Application.Quit
 

Gruß
hepna

• outlook einstellungen in outlook express importieren
• Wie kann man mittels VBA Termine in Outlook schreiben