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

VBS - Outlook Kalendereinträge nach Kategorie löschen

Frage Entwicklung VB for Applications

Mitglied: Lionheart

Lionheart (Level 1) - Jetzt verbinden

04.06.2009, aktualisiert 14:57 Uhr, 9407 Aufrufe, 7 Kommentare, 1 Danke

Hallo Leute!

Wir verwenden in Outlook 2003 für bestimmte Kalendereinträge die eigendefinierte Kategorie "Kundentermin".

Nun benötige ich ein VBScript, welches mir aus meinem Outlook alle Kalendereinträge mit dieser Kategorie entfernt.

Ich habe bereits auf der MSDN Homepage gesucht, aber nichts wirklich passendes gefunden. Wie kann ich die Kategorie abfragen und die Einträge löschen?

Vielen Dank für eure Hilfe.

Gruß,
Lionheart
Mitglied: flipworld12
04.06.2009 um 15:23 Uhr
Versuch es mal mit VBA, ich denke damit geht's einfacher...
Bitte warten ..
Mitglied: Lionheart
05.06.2009 um 09:17 Uhr
Hi!

Warum VBA? Ich darf auf Grund von Firmenrichtlinien leider nur mit VBScripten arbeiten. Der Sinn sei einemal dahingestellt, aber ich muss mich danach richten.
Bitte warten ..
Mitglied: flipworld12
05.06.2009 um 15:24 Uhr
hmm... Ich glaube nicht, dass MICROSOFT es vorsieht, dass man mit VBS auf Outlook zugreifen kann. Du könntest mit dem Skript vllt. die Outlook-Datendatei verändern. Oder du suchst nochmal unter Google(oder auch bing nach "outlookzugriff mit vbs" oder so ähnlich. Vielleicht findest du ja eine DLL oder so...
Bitte warten ..
Mitglied: MonoTone
08.06.2009 um 09:47 Uhr
Also man kann mit VBS sehr wohl auf Outlook zugreifen.
01.
On Error Resume Next 
02.
Set myOlApp = GetObject(,"Outlook.Application") 
03.
 
04.
If Not myOlApp = "Outlook" Then 
05.
Set myOlApp = CreateObject("Outlook.Application") 
06.
End If 
07.
On Error goto 0 
08.
With myOlApp 
09.
Set olMAPI = .GetNameSpace("MAPI").GetdefaultFolder(9) 
10.
 
11.
WScript.Echo olMAPI.Items.count 
12.
For Each teil In olMAPI.Items 
13.
With teil 
14.
Alles = .Subject & ";" & .Location & ";" _ 
15.
          & .Categories & ";" & .Start & ";" & .End & ";" & .AllDayEvent & ";" _ 
16.
          & .Duration & ";" & .ReminderMinutesBeforeStart & ";" & .LastModificationTime & ";" 
17.
WScript.Echo Alles 
18.
End With 
19.
Next 
20.
End With
so könnte man sich die Anzahl der Termine und die eigenschaften der einzelnen Kalendereinträge anzeigen lassen.
ergo schreib ich es eben so wie gebraucht um, mom
Bitte warten ..
Mitglied: MonoTone
08.06.2009 um 10:47 Uhr
01.
On Error Resume Next 
02.
Set myOlApp = GetObject(,"Outlook.Application") 
03.
 
04.
If Not myOlApp = "Outlook" Then 
05.
Set myOlApp = CreateObject("Outlook.Application") 
06.
End If 
07.
On Error goto 0 
08.
With myOlApp 
09.
Set olMAPI = .GetNameSpace("MAPI").GetdefaultFolder(9) 
10.
a=1 
11.
For Each teil In olMAPI.Items  
12.
With teil  
13.
If .categories = "Kundentermin" Then  
14.
del = del & "," & a 
15.
End If  
16.
a=a+1 
17.
End With  
18.
Next  
19.
 
20.
itemdel=Split(del,",",-1,1) 
21.
End With 
22.
a = UBound(itemdel) 
23.
Do While a>0 
24.
olMAPI.Items.remove itemdel(a) 
25.
a=a-1 
26.
Loop
so sollte es gehen
Bitte warten ..
Mitglied: Lionheart
08.06.2009 um 11:40 Uhr
@MonoTone
Vielen Dank für das Skript. Funktioniert einwandfrei. Klasse!!!
Bitte warten ..
Mitglied: MonoTone
08.06.2009 um 12:26 Uhr
Bei mir gabs ein Problem wenn die Termine neu sind, ich hab es nochmal überarbeitet, so geht es bei mir jetzt einwandfrei auch bie vielen neuen Terminen

gruss Mono
Bitte warten ..
Neuester Wissensbeitrag
Humor (lol)

Linkliste für Adventskalender

(3)

Information von nikoatit zum Thema Humor (lol) ...

Ähnliche Inhalte
Microsoft Office
Outlook Kalender Serientermin automatisch kategorie zuweisen (1)

Frage von DO1TJG zum Thema Microsoft Office ...

Batch & Shell
Eventlog Druckjobs mit VBS auslesen (2)

Frage von joni2000de zum Thema Batch & Shell ...

Exchange Server
gelöst SBS2011 - im Exchange mobile Geräte löschen (4)

Frage von MiSt zum Thema Exchange Server ...

Heiß diskutierte Inhalte
Windows Server
DHCP Server switchen (25)

Frage von M.Marz zum Thema Windows Server ...

SAN, NAS, DAS
gelöst HP-Proliant Microserver Betriebssystem (14)

Frage von Yannosch zum Thema SAN, NAS, DAS ...

Grafikkarten & Monitore
Win 10 Grafikkarte Crash von Software? (13)

Frage von Marabunta zum Thema Grafikkarten & Monitore ...

Windows 7
Verteillösung für IT-Raum benötigt (12)

Frage von TheM-Man zum Thema Windows 7 ...