Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

gelöst Mit VBA Termin in abweichenden Kalender eines freigegegeben Postfachs eintragen

Mitglied: greatmgm

greatmgm (Level 2) - Jetzt verbinden

25.06.2019 um 10:06 Uhr, 124 Aufrufe, 3 Kommentare

Hallo zusammen,

wenn ich aus VBA den Standardkalender von Outlook befüllen will, mach ich das so:

Set outapp = CreateObject("Outlook.Application")
Set apptoutapp = outapp.CreateItem(1)
With apptoutapp
.Start = Format(meinDatum, "dd.mm.yyyy") & " " & meineZeit
.Subject = "Mein Termin"
.Location = "bei mir"
.Duration = 30
.reminderminutesbeforestart = CLng(2 * 24) * 60
.ReminderPlaySound = True
.ReminderSet = True
.Save
End With
Set apptoutapp = Nothing
Set outapp = Nothing

Jetzt habe ich im Outlook (über Office 365 Exchange Online) zusätzlich ein freigegebenes Postfach und ich möchte gerne
dort den Kalender ansprechen. Mit Session.Accounts komme ich da nicht ran, weil es ja wirklich kein physischer Account
ist der dem Outlook hinterlegt ist.
Könnt ihr mir helfen ?

Danke.
Mitglied: colinardo
LÖSUNG 25.06.2019, aktualisiert um 10:42 Uhr
GetSharedDefaultFolder ist was du suchst. E-Mail natürlich an das freigegebene Postfach anpassen.

01.
Set outapp = CreateObject("Outlook.Application")
02.
Set ns = outapp.GetNamespace("MAPI")
03.
Set rec = ns.CreateRecipient("user_des_freigegebenen_postfachs@domain.de")
04.
rec.Resolve
05.
If rec.Resolved Then
06.
    Set cal = ns.GetSharedDefaultFolder(rec, 9)
07.
    With cal.items.Add(1)
08.
        .Start = Format(meinDatum, "dd.mm.yyyy") & " " & meineZeit
09.
        .SUBJECT = "Mein Termin"
10.
        .Location = "bei mir"
11.
        .Duration = 30
12.
        .ReminderMinutesBeforeStart = CLng(2 * 24) * 60
13.
        .ReminderPlaySound = True
14.
        .ReminderSet = True
15.
        .Save
16.
    End With
17.
End If
Grüße Uwe
Bitte warten ..
Mitglied: greatmgm
25.06.2019 um 10:43 Uhr
1000Dank.
Bitte warten ..
Mitglied: colinardo
25.06.2019 um 10:47 Uhr
You're welcome.
Bitte warten ..
Ähnliche Inhalte
VB for Applications

Per VBA Postfach Outlook durchsuchen in umgekehrter Reihenfolge

Frage von thomas1972VB for Applications3 Kommentare

Hallo, habe folgendes Problem, ich lasse bestimmte Postfächer durchsuchen und eine Access Tabelle eintragen. Problem hierbei das durchsuchen geht ...

Microsoft Office

VBA: Excel Datum als Outlook Termin mit Knopfdruck (Datum wird falsch eingetragen)

Frage von 133519Microsoft Office13 Kommentare

Hallo Leute, ich habe eine Frage zu dem Themengebiet VBA Code. Ich habe mir ein Code ergoogelt der ein ...

VB for Applications

Mit Excel 2010 (VBA) eine Mail erzeugen und als Anlage einen Termin erstellen

Frage von Armin-KVB for Applications

Liebes Forum, aus verschiedenen Inhalten habe Teile von VBA-Codes zusammengesucht und bin folgende Problemstellung angegangen: Mit Excel / VBA ...

Outlook & Mail

Outlook2016 Kalender Termin weiterleiten

Frage von hellasOutlook & Mail3 Kommentare

Hallo, ich möchte gerne einen internen Schulungstermin an Personen weiterleiten, die es eventuell auch interessieren könnte. Leite ich diesen ...

Neue Wissensbeiträge
Backup

Veeam Agent für MS Windows - neue Version verfügbar (bedingt jedoch offenbar .NET Framework 4.6)

Information von VGem-e vor 12 StundenBackup

Moin Kollegen, einer unserer Server zeigte grad an, dass für o.g. Software ein Update verfügbar ist. Ob ein evtl. ...

Python

Sie meinen es ja nur gut - Microsoft hilft python-Entwicklern auf unnachahmliche Weise

Information von DerWoWusste vor 2 TagenPython2 Kommentare

Stellt Euch vor, Ihr nutzt python unter Windows 10 und skriptet damit regelmäßig Dinge. Nach dem Update auf Windows ...

Sicherheits-Tools

TrendMicro Worry-Free Business Security 10.0 SP1 steht in Englisch bereit mit Unterstützung für Windows 10 1903 (May Update)

Information von VGem-e vor 2 TagenSicherheits-Tools1 Kommentar

Moin Kollegen, Dann kommt wohl demnächst auch die deutschsprachige/europäische Version zur Auslieferung. Gruß VGem-e

Batch & Shell
PowerShell Konferenz - Videos online
Information von NetzwerkDude vor 2 TagenBatch & Shell

Abend, die Tage werden Videos der Talks von der diesjährigen EU Powershell Konferenz hochgeladen, sind einige Interessante dabei: MFG ...

Heiß diskutierte Inhalte
Google Android
Anbieter für Diensthandys
Frage von Pat.batGoogle Android24 Kommentare

Hallo zusammen, ich bin seit einiger Zeit zuständig für die Diensthandys bei uns in der Behörde. Eine Management Software ...

Windows Server
Windows Server 2016 einrichten
Frage von borjiaWindows Server19 Kommentare

Ich würde gerne einen Server einrichten, erstmal nur mit DNS und AD. Habe mich die letzten Wochen durch diverse ...

Exchange Server
Vorgehen um von Tobit auf Exchange zu wechseln
Frage von Martin1987Exchange Server17 Kommentare

Guten Abend Ich habe den Auftrag erhalten, unser Mail von David zu Outlook zu wechseln. Wie muss ich da ...

Microsoft Office
Office 365 eMail via Website verschicken
Frage von BiBeSoMicrosoft Office16 Kommentare

Hallo, kann man im Office 365 eMails anlegen welche zum versenden (smtp) für die Website funktionieren ? Muss man ...