--
----
Wysłano z serwisu www.outlook.pl
Forum, artykuły, porady o MS Outlook.
przykładowe makro wrzucone w VBA w Excelu, które wpisuje w terminarz
outlooka przypomnienie:
Sub test_terminarz()
Set Obiekt_Out = CreateObject("Outlook.Application")
Set terminarz = Obiekt_Out.CreateItem(1)
Obiekt_Out.Session.Logon
With terminarz
.Start = Range("A1")
.End = Range("A2")
.Subject = Range("A3")
.Body = Range("A4")
.ReminderMinutesBeforeStart = 15
.ReminderSet = True
.Save
End With
End Sub
komórka A1 początek terminu
komórka A2 koniec terminu
komórka A3 temat
komórka A4 treść
parametr .ReminderMinutesBeforeStart określa na ile minut przed
terminem ma pojawić się przypomnienie. Parametr podajemy w minutach.
parametr .ReminderSet ustawione na True sprawia że przypomnienie jest
aktywne
Oczywiście zamiast komórek A1, A2 itd możesz podać odpowiednie pola ze
stworzonego formularza oraz wrzucić przycisk, który uruchomi powyższe
makro co spowoduje wpisanie terminu do outlooka.
--
Pozdr.
Cynio
1. U mnie w office 2010 co prawda dodaje przypomnienie, ale bez tematu i
notatki... Jakaś wskazówka?
2. Jak to zapętlić by z danego arkusza dodał tyle zadań ile jest
niepustych wierszy (lub we wskazanym zakresie)
3. I jeszcze jedno - jak zrobić by gdy ten sam rekord z exela się
zmieni, to by makro nie dodawało nowego zadania, ale modyfikowało
istniejące.
Aktualne zostaje tylko pytanie nr 3 - Jak modyfikować???