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)

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio

Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.