Partilhar via

Método Application.CreateItemFromTemplate (Outlook)

  • Artigo

Cria um novo item do Microsoft Outlook usando um modelo (.oft) do Outlook e retorna o novo item.

Sintaxe

expression. CreateItemFromTemplate( _TemplatePath_ , _InFolder_ )

expressão Uma variável que representa um objeto Application.

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
TemplatePath Obrigatório String O caminho e o nome de arquivo do modelo do Outlook referente ao novo item.
InFolder Opcional Variant A pasta na qual o item deve ser criado. Se esse argumento for omitido, será usada a pasta padrão referente ao tipo do item.

Valor de retorno

Um valor Object que representa o novo item do Outlook.

Comentários

Os novos itens sempre serão abertos no modo de redação, e não no modo de leitura, seja qual for o modo no qual os itens foram salvos no disco.

Exemplo

Este exemplo Visual Basic for Applications (VBA) usa CreateItemFromTemplate para criar um novo item de um modelo do Outlook e, em seguida, exibe-lo. A macro CreateTemplate mostra como criar o modelo que é usado no primeiro exemplo. Para evitar erros, substitua 'Dan Wilson' por um nome válido no catálogo de endereços.

Sub CreateFromTemplate() 
 Dim MyItem As Outlook.MailItem 
 
 Set MyItem = Application.CreateItemFromTemplate("C:\statusrep.oft") 
 MyItem.Display 
End Sub 
 
Sub CreateTemplate() 
 Dim MyItem As Outlook.MailItem 
 
 Set MyItem = Application.CreateItem(olMailItem) 
 MyItem.Subject = "Status Report" 
 MyItem.To = "Dan Wilson" 
 MyItem.Display 
 MyItem.SaveAs "C:\statusrep.oft", OlSaveAsType.olTemplate 
End Sub

O exemplo de VBA (Visual Basic for Applications) a seguir mostra como usar o parâmetro opcional InFolder ao chamar o método CreateItemFromTemplate.

Sub CreateFromTemplate2() 
 Dim MyItem As Outlook.MailItem 
 
 Set MyItem = Application.CreateItemFromTemplate("C:\statusrep.oft", _ 
 Application.Session.GetDefaultFolder(olFolderDrafts)) 
 MyItem.Save 
End Sub

Confira também

Objeto de Aplicativo

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.