Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

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

Termin via VBA in Öffentlichen Ordner erstellen

Frage Microsoft Microsoft Office

Mitglied: marco1710

marco1710 (Level 1) - Jetzt verbinden

20.10.2014, aktualisiert 20:15 Uhr, 2587 Aufrufe, 2 Kommentare, 1 Danke

Hallo Zusammen,

ich würde gerne via VBA einen Termin in einem Öffentlichen Ordner anlegen.

Dieser Ordner liegt unter:
[I]Öffentliche Ordner - [email]abc@xyz.de[/email]\Alle Öffentlichen Ordner\Gemeinsame Kalender\Testkalender[/I]

Funktionieren tut bis jetz nur ein Eintrag in meinem eigenen Kalender (aktuell Auskommentiert)

Bei mir scheitert es ab der roten Zeile...
Was mache ich den Falsch?

Hier der Code:
[CODE]Sub Terminerstellen()
MsgBox ("start") 'Anzeige über start des programmes

Dim OutApp As Outlook.Application
Dim apptOutApp As AppointmentItem


Set OutApp = CreateObject("Outlook.Application")

' Termin in eigenem Kalender erstellen
'Set apptOutApp = OutApp.CreateItem(olAppointmentItem)

[COLOR="Red"]Set apptOutApp = OutApp.GetNamespace("MAPI").Folders("Öffentliche Ordner - abc@xyz.de").Folders("Alle Öffentlichen Ordner").Folders("Gemeinsame Kalender").Items("Testkalender").CreateItem(olAppointmentItem)[/COLOR]





With apptOutApp
.Subject = "Testmeeting v1.1"
.Start = "20.10.2014 18:00"
.Duration = "10"
.Save
End With

Set OutApp = Nothing
Set apptOutApp = Nothing
MsgBox ("ende") 'Anzeige über ende des programmes
End Sub[/CODE]

Wie muss dieser Befehl lauten um ein Objekt zu definieren, welches für einen Öffentlichen ein Termin erstellt...

Hier nochmals die Ordnerstruktur in Outlook:
[IMG]http://pic.it-switch.de/images/oeffentlic.png[/IMG]

Vielen Dank für eure Hilfe.

Gruß,
Marco
Mitglied: colinardo
LÖSUNG 20.10.2014, aktualisiert um 20:15 Uhr
Hallo Marco,
das sollte so aussehen
Set apptOutApp = OutApp.GetNamespace("MAPI").GetDefaultFolder(olPublicFoldersAllPublicFolders).Folders("Gemeinsame Kalender").Folders("Testkalender").Items.Add(olAppointmentItem)
Grüße Uwe

p.s. Bilder bitte nicht extern verlinken. Du kannst sie in deinem Beitrag hochladen. Siehe http://www.administrator.de/faq/20#toc-5
Bitte warten ..
Mitglied: marco1710
20.10.2014, aktualisiert um 20:16 Uhr
Vielen Dank! war super der vorschlag..
zum p.s.: danke werde ich beachten ;)
Bitte warten ..
Ähnliche Inhalte
Exchange Server
gelöst Exchange Server - User bekommt öffentlichen Ordner nicht angezeigt (4)

Frage von infostud zum Thema Exchange Server ...

Exchange Server
gelöst Unbekannte Mails an öffentlichen Ordner per Regel möglich? (2)

Frage von Praxston zum Thema Exchange Server ...

Batch & Shell
Ordner erstellen ll Datei hinein kopieren (1)

Frage von heyalice zum Thema Batch & Shell ...

Neue Wissensbeiträge
Sicherheits-Tools

Sicherheitstest von Passwörtern für ganze DB-Tabellen

(1)

Tipp von gdconsult zum Thema Sicherheits-Tools ...

Peripheriegeräte

Was beachten bei der Wahl einer USV Anlage im Serverschrank

(8)

Tipp von zetboxit zum Thema Peripheriegeräte ...

Windows 10

Das Windows 10 Creators Update ist auf dem Weg

(6)

Anleitung von BassFishFox zum Thema Windows 10 ...

Heiß diskutierte Inhalte