OutlookBarShortcut.Target 屬性 (Outlook)
會傳回 Variant ,指出快捷方式窗格群組中指定 之快捷方式 的目標。 唯讀。
語法
expression。 Target
表達 代表 OutlookBarShortcut 物件的 變數。
註解
傳回類型取決於捷徑類型。 如果捷徑代表 Outlook 資料夾,則傳回類型為 Folder。 如果捷徑代表檔案系統資料夾,則傳回類型為 Object。 如果捷徑代表檔案系統路徑或 URL,則傳回類型為 String。
範例
此 Microsoft Visual Basic for Applications (VBA) 範例會逐步執行第一個快捷方式窗格群組中的 快捷方式 。 它會計算是 Outlook 資料夾的捷徑數目,並顯示該計數。
Sub DeleteShortcuts()
Dim myOlBar As Outlook.OutlookBarPane
Dim myolGroup As Outlook.OutlookBarGroup
Dim myOlShortcuts As Outlook.OutlookBarShortcuts
Dim myOlShortcut As Outlook.OutlookBarShortcut
Dim myTop As Integer
Dim x As Integer
Dim count As Integer
Set myOlBar = Application.ActiveExplorer.Panes.Item("OutlookBar")
Set myolGroup = myOlBar.Contents.Groups.Item(1)
Set myOlShortcuts = myolGroup.Shortcuts
myTop = myOlShortcuts.Count
For x = myTop To 1 Step -1
Set myOlShortcut = myOlShortcuts.Item(x)
If TypeName(myOlShortcut.Target) = "Folder" Then
count = count + 1
End If
Next x
MsgBox ("Number of shortcuts that are Outlook folders:" & count)
End Sub
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。