Outlook - ime programa, kjer se izvaja VBA

Pomoč pri izdelavi makrov
Odgovori
bredvink
Prispevkov: 12
Pridružen: Če Sep 27, 2012 11:30 pm

Outlook - ime programa, kjer se izvaja VBA

Odgovor Napisal/-a bredvink »

Spoštovani!
Za prevzem e-sporočil uporabljam VBA procedure, za katere potrebujem informacijo kateri Outlook program jih izvaja.
Naslednja koda mi ne prikaže ustrezne informacije:

Dim olApp As Outlook.Application
Set olApp = CreateObject("Outlook.Application")

Dim olNs As Outlook.NameSpace
Set olNs = olApp.GetNamespace("MAPI")
olNs.Logon
MsgBox olApp.Version
......

Dobim rezultat (.Version) 12.0.0.6661, to pa ni tisto kar potrebujem.
Rabil bi, da mi sporoči celotno ime Outlooka, v mojem primeru "Outlook 2007".
Vnaprej hvala za predloge oz. rešitev.
admin
Site Admin
Prispevkov: 3687
Pridružen: Sr Jul 20, 2005 10:06 pm

Re: Outlook - ime programa, kjer se izvaja VBA

Odgovor Napisal/-a admin »

:)

Tega vam pa ne bo vrnila lastnost... Rešitev je preprosto v tem, da glede na verzijo izpišete ustrezno ime:

Koda: Izberi vse

8 = Office 97
9 = Office  2000
10 = Office  2002/XP
11 = Office  2003
12 = Office 2007
13 = Office 2010
...
lp,
Matjaž Prtenjak
Administrator
bredvink
Prispevkov: 12
Pridružen: Če Sep 27, 2012 11:30 pm

Re: Outlook - ime programa, kjer se izvaja VBA

Odgovor Napisal/-a bredvink »

Aha!!!
To mi zadostuje.
Hvala in lep pozdrav!
Odgovori