Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Gibt ein Folder -Objekt zurück, das den Ordner im angegebenen Zustellungsspeicher angibt, in den neu in der Unterhaltung eingehende Elemente immer verschoben werden.
Syntax
Ausdruck.
GetAlwaysMoveToFolder( _Store_ )
Ausdruck Eine Variable, die ein 'Conversation'-Objekt darstellt.
Parameter
| Name | Erforderlich/Optional | Datentyp | Beschreibung |
|---|---|---|---|
| Store | Erforderlich | Store | Der Informationsspeicher, in dem der Ordner gespeichert ist, in den Unterhaltungselemente verschoben werden. |
Rückgabewert
Ein Folder -Objekt im angegebenen Informationsspeicher, in den alle neuen Elemente, die in der Unterhaltung immer verschoben werden.
Hinweise
Wenn der Store-Parameter einen Unzustellbarkeitsspeicher wie z. B. einen PST-Archivspeicher darstellt, gibt die GetAlwaysMoveToFolder-Methode ein Folder-Objekt zurück, das für Unterhaltungselemente für den Standardzustellungsspeicher gilt.
Wenn kein Ordner außer dem Ordner "Gelöschte Elemente " angegeben wurde, in den Unterhaltungselemente immer verschoben werden sollen, gibt die GetAlwaysMoveToFolder-MethodeNull (Nothing in Visual Basic) zurück.
Beispiel
Der folgende Microsoft Visual Basic for Applications (VBA) wird gezeigt, wie auf den Ordner zu finden, in dem neue Elemente, die in der Unterhaltung des ersten e-Mail-Elements im Lesebereich angezeigt immer verschoben werden. Das Codebeispiel überprüft, DemoGetAlwaysMoveToFolderob Unterhaltungen im Speicher für das ausgewählte E-Mail-Element aktiviert sind, ruft das Unterhaltungsobjekt für dieses E-Mail-Element ab, wenn eine Konversation vorhanden ist, verwendet GetAlwaysMoveToFolder zum Abrufen des Ordners und zeigt den Ordnernamen an.
Sub DemoGetAlwaysMoveToFolder()
Dim oMail As Outlook.MailItem
Dim oConv As Outlook.Conversation
Dim oStore As Outlook.Store
' Get Item displayed in Reading Pane.
Set oMail = ActiveExplorer.Selection(1)
Set oStore = oMail.Parent.Store
If oStore.IsConversationEnabled Then
Set oConv = oMail.GetConversation
If Not (oConv Is Nothing) Then
Dim oFolder As Outlook.folder
Set oFolder = _
oConv.GetAlwaysMoveToFolder(oStore)
If Not (oFolder Is Nothing) Then
Debug.Print "MoveToFolder: " & oFolder.name
Else
Debug.Print "MoveToFolder action not set"
End If
End If
End If
End Sub
Siehe auch
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.