|
Artykuł dotyczy: - Outlook 2000/2002/2003/2007 Coraz więcej urządzeń PDA i telefonów ułatwia nam życie i potrafi synchronizować się z Microsoft Outlook. Zdarza się jednak, że ułatwianie życia przynosi zupełnie odwrotne skutki i po działaniu programów synchronizujących gubiona jest część danych lub Outlook zaczyna się dziwnie zachowywać. Jednym z przykładów są terminy z datą urodzin odpowiadające określonym kontaktom. Gdy w Outlook'u ustawiamy w kontakcie datę urodzin, w domyślnym kalendarzu pojawia się automatycznie odpowiedni termin, który przypomina nam o zbliżającej się radosnej rocznicy. Problem może jednak wystąpić, gdy datę urodzin ustawiamy w telefonie, który później synchronizuje bazę kontaktów z Outlook'iem. Okazuje się, że mimo iż data urodzin ustawiona jest w kontakcie w Outlook'u, to jednak brakuje terminu w kalendarzu. Problem z pozoru błahy staje się bardzo uciążliwy i może powodować poważne konsekwencje. Możemy go jednak w prosty sposób rozwiązać uruchamiając w Outlook'u poniższe makro:
Public Sub PutBirthdaysInCalendar()
For Each oContact In Session.GetDefaultFolder(olFolderContacts).Items
If oContact.Birthday <> FormatDateTime("4501-01-01", vbShortDate) Then
oContact.Birthday = oContact.Birthday
oContact.Save
End If
Next
End Sub
Jeśli masz problem z uruchomieniem makra lub chcesz dowiedzieć się, jak utworzyć przycisk w pasku narzędzi lub menu uruchamiający makro, zobacz artykuł Instalacja i uruchamianie makr. Podziękowania dla Avenger'a z forum www.outlook.pl za radykalne skrócenie i uproszczenie pierwotnej wersji makra. Jeśli masz jakieś pytania lub komentarze dotyczące tego artykułu, napisz na forum. (c) 2006 CodeTwo Wszelkie prawa zastrzeżone. Artykuł ten nie może być kopiowany i/lub publikowana bez wyraźnej zgody autora. Firma CodeTwo nie rości sobie jednak żadnych praw do zaprezentowanego tu kodu, może on być modyfikowany i wykorzystywany dla dowolnych celów. Firma CodeTwo nie daje żadnych gwarancji oraz nie ponosi żadnej odpowiedzialności za działanie powyższego kodu. Słowa kluczowe: Microsoft Outlook 2000,2002(XP),2003, 2007 Makro do automatycznego ustawiania naprawiania daty urodzin kontaktów, kontaktu. Jak z automatu naprawić datę urodzin kontaktów w kalendarzu Outlooka domyślnym. |