• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Tipy na výlet
• Galerie
• Fórum

MS Excel

Téma: VBA_Úkoly v otlooku

Zaslal/a jnkopr 5.11.2013 11:35

Dobrý den, pěkně prosím o radu,zda lze editovat již vložené úkoly v otlooku.
Pomocí vba z excelu vkládám do otlooku úkoly. Následně bych ale potřeboval tyto úkoly opět jen z excelu vyhledat a editovat nebo přepsat původní úkol.
(shrnutí:jde mi o to,abych měl možnost přepsat původní úkol za aktualizovaný tzn. změna bude jen ve stavu=dokončení úkolu).
Děkuji za každou radu.
Jirka

Zaslat odpověď >

---

eLCHa(5.11.2013 13:54)#016095

Tak třeba
Sub test()
Dim oApp As Object 'Outlook.Application
Set oApp = CreateObject("Outlook.Application")

Dim oNameSpace As Object 'Outlook.NameSpace
Set oNameSpace = oApp.GetNamespace("MAPI")

Dim oTaskFolder As Object 'Outlook.Folder
Set oTaskFolder = oNameSpace.GetDefaultFolder(13) 'olFolderTasks=13

Dim oTaskItem As Object 'Outlook.TaskItem
Set oTaskItem = oTaskFolder.Items("NovyUkol")
oTaskItem.Status = 2 'olTaskComplete=2
oTaskItem.Save

Set oTaskItem = Nothing
Set oNameSpace = Nothing
Set oApp = Nothing
End Subcitovat

jnkopr(5.11.2013 22:48)#016109

Zdravím,mockrát děkuji,po mírné úpravě na proměnnou to chodí jak jsem si představoval.Díky Jirkacitovat

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

On-line nástroje

Formulář Faktura

Aktivní diskuse