VBA Outlook 2016 Geburts- und Jahrestage aktualisieren

Ioannis_Mchl · 12. September 2019

Hallo Community,

ich habe vorletztes Jahr für unser Unternehmen einen Code geschrieben, der die Geburtstage und Jahrestage meiner Kollegen in den jeweiligen Kalendern schreibt.

Der Code:

Sub datenspeichern_Kontakte()

Dim myFolder As MAPIFolder

Set myFolder = Session.PickFolder

For i = myFolder.Items.Count To 1 Step -1

If myFolder.Items(i).Class = 40 Then

myFolder.Items(i).Display

mybirthday = myFolder.Items(i).Birthday

myanniversary = myFolder.Items(i).Anniversary

myFolder.Items(i).Birthday = "01.01.2000"

myFolder.Items(i).Birthday = mybirthday

myFolder.Items(i).Anniversary = "01.01.2000"

myFolder.Items(i).Anniversary = myanniversary

myFolder.Items(i).Save

myFolder.Items(i).Close 0

End If

Next i

End Sub

Mit der Zeit kommt es zu neuen Mitarbeiter-Einstellungen, oder -Kündigungen

Jetzt möchte ich gerne den Code soweit ergänzen, dass dieser immer die aktuellen ergänzt, jedoch die Kollegen die nicht mehr bei uns beschäftigt sind automatisch entfernt werden.

Ist dies so umsetzbar?

Ich hab mir das so vorgestellt, dass die Prozedur einen Vergleich mit den aktuellen Kontakteordner und den alten durchgeführt. Alle Einträge die nicht dort auftauchen sollen entfernt werden.

Vorab danke für eure Bemühungen!

Gruß

Ioannis

Ioannis_Mchl

Hallo, das habe ich leider übersehen. Danke für die Info.

Peter.Star

Hallo,

du schreibst Outlook 22016 postest aber im outlook.com Forum. Warum? Selbst die Bezeichnungen sind unterschiedlich. Achte zukünftig darauf wo du postest.

Carl D. Hast

Herzlichen Dank für die schnelle Antwort. Jetzt, wo ich die Umgehung kenne, muss ich mich fragen, warum ich nicht selbst drauf gekommen bin:

SELECT Geburt.[VN_T-norm], Geburt.[NN_T-norm], Geburt.MTPersID, Geburt.[VN_MT-norm], Geburt.[FN_MT-norm], Mutter.PersID, Mutter.[VN-norm], Mutter.[NN-norm]

FROM (Geburt INNER JOIN Ehe ON Geburt.FamIDEltern = Ehe.FamIDHeirat) INNER JOIN Mensch As Mutter ON Ehe.BT_PersID = Mutter.PersID

WHERE (((Mutter.PersID)<>[Geburt]![MTPersID]))

ORDER BY Ehe.FamIDHeirat;

Ihnen eine virenfreie Zeit bis zur nächsten Frage.

Jan Bollmann

Hallo Sabine,

zu 1. Extras -> Senden/Empfangen -> Übermittlungseinstellungen -> Status anzeigen

zu 2.
http://office.microsoft.com/de-de/outlook-help/hinzufugen-eines-geburtstags-oder-jahrestags-fur-einen-kontakt-HA102004691.aspx

mfg Bollmann

SolveighCalderin

Nach einem neuerlichen Neu-Start funktioniert es nun.
Puuuuhh! Das war aber eine schwierige Geburt...

Nun aber ab, ins Weihnachtsfest

Hi,

willkommen im Windows Forum!

VBA Outlook 2016 Geburts- und Jahrestage aktualisieren - Similar Threads - VBA Outlook 2016	Forum	Datum
Vorbereitung auf Geburt Vorbereitung auf Geburt: Hey Damen im Forum, was sind denn eure Unternehmungen vor und nach der Geburt? Denn das ist ja schon eine geballte Zeit, in der man einiges zu tun hat. In erster Linie sich natürlich ums Kind...	Offtopic	12. September 2022
excel vba Pivottabelle aktualisieren excel vba Pivottabelle aktualisieren: Mitnachstehendem Makro aktualisiere ich von der Tabelle1 aus die Pivottabelle in derTabelle "Pivot Auszug". Dies erzeugt ein Bildschirmflackern. Wie kannich dies eliminieren? Sub Pivot_Click...	Microsoft Office	26. Januar 2021
Powerpoint öffnen und aktualisieren mit VBA Powerpoint öffnen und aktualisieren mit VBA: Hallo zusammen, ich habe für ein schnelleres Reporting ein Makro programmiert, das die Verknüpfte Excel-Datei öffnet, dann die Powerpoints jeweils nacheinander öffnet, aktualisiert und wieder...	Microsoft Office	17. Oktober 2019
VBA Outlook 2016 Geburts- und Jahrestage aktualisieren VBA Outlook 2016 Geburts- und Jahrestage aktualisieren: Hallo Community, ich habe vorletztes Jahr für unser Unternehmen einen Code geschrieben, der die Geburtstage und Jahrestage meiner Kollegen in den jeweiligen Kalendern schreibt. Der Code:...	Outlook.com	12. September 2019
Outlook 2016 / Freigegebene Kontakte aktualisieren nicht Outlook 2016 / Freigegebene Kontakte aktualisieren nicht: Hallo liebe Community, ich habe das Problem, wenn ich einen neuen Kontakt in die freigegebene Kontaktgruppe hinzufüge, wird die Ansicht nicht aktualisiert. Der Kontakt wird in meinen Kontakten...	Microsoft Office	19. Februar 2019
Jahrestag löschen Jahrestag löschen: Hallo, wie kann ich in Outlook.com bei einem Kontakt einen Jahrestag löschen? Gruß OLLI	Outlook.com	30. April 2017
Jahrestag Jahrestag: Und wieder jährt sich der Tag, an dem jemand vor 55 Jahren das Licht der Welt erblickte. Denn wbiberthomsen hat heute Geburtstag. [img] [img] [img] Geburtstag ist wohl ohne Frage der schönste...	Plaudereck	5. März 2008

VBA Outlook 2016 Geburts- und Jahrestage aktualisieren