Freigeben über


NoteItem.Copy-Methode (Outlook)

Erstellt eine Instanz eines Objekts.

Syntax

Ausdruck. Kopieren

Ausdruck Ein Ausdruck, der ein NoteItem-Objekt zurückgibt.

Rückgabewert

Ein NoteItem -Objekt, das eine Kopie der angegebenen Notiz darstellt.

Beispiel

In diesem Visual Basic for Applications Beispiel wird eine E-Mail-Nachricht erstellt, der Betreff auf "Reden" festgelegt, die Copy-Methode verwendet, um sie zu kopieren. Anschließend wird die Kopie in einen neu erstellten E-Mail-Ordner namens "Gespeicherte E-Mail" im Ordner Posteingang verschoben.

Sub CopyItem() 
 
 Dim myNameSpace As Outlook.NameSpace 
 
 Dim myFolder As Outlook.Folder 
 
 Dim myNewFolder As Outlook.Folder 
 
 Dim myItem As Outlook.MailItem 
 
 Dim myCopiedItem As Outlook.MailItem 
 
 
 
 Set myNameSpace = Application.GetNamespace("MAPI") 
 
 Set myFolder = myNameSpace.GetDefaultFolder(olFolderInbox) 
 
 Set myNewFolder = myFolder.Folders.Add("Saved Mail", olFolderDrafts) 
 
 Set myItem = Application.CreateItem(olMailItem) 
 
 myItem.Subject = "Speeches" 
 
 Set myCopiedItem = myItem.Copy 
 
 myCopiedItem.Move myNewFolder 
 
End Sub

Siehe auch

NoteItem-Objekt

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.