CalendarView.DisplayedDates プロパティ (Outlook)
CalendarView オブジェクトに表示されている日付を表す文字列を含む バリアント型 の配列を返します。 読み取り専用です。
構文
式。 DisplayedDates
式CalendarView オブジェクトを表す変数。
注釈
このプロパティは日付文字列の配列を返し、各配列では日付文字列は CalendarView オブジェクトに表示される日を表します。 日付文字列は、オペレーティング システムの短い日付形式の設定を使用して書式設定されます。
例
次の Visual Basic for Applications (VBA) の例では、現在の CalendarView オブジェクトから DisplayedDates プロパティの値を取得し、そのプロパティの値の概要] ダイアログ ボックスが表示されます。
Sub DisplayDayRange()
Dim objView As CalendarView
Dim varArray As Variant
' Check if the current view is a calendar view.
If Application.ActiveExplorer.CurrentView.ViewType = _
olCalendarView Then
' Obtain a CalendarView object reference for the
' current calendar view.
Set objView = _
Application.ActiveExplorer.CurrentView
' Obtain the DisplayedDates value, a string
' array of dates representing the dates displayed
' in the calendar view.
varArray = objView.DisplayedDates
' If the example obtained a valid array, display
' a dialog box with a summary of its contents.
If IsArray(varArray) Then
MsgBox "There are " & _
(UBound(varArray) - LBound(varArray)) + 1 & _
" days displayed, from " & _
varArray(LBound(varArray)) & _
" to " & _
varArray(UBound(varArray))
End If
End If
End Sub
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。
フィードバック
https://aka.ms/ContentUserFeedback」を参照してください。
以下は間もなく提供いたします。2024 年を通じて、コンテンツのフィードバック メカニズムとして GitHub の issue を段階的に廃止し、新しいフィードバック システムに置き換えます。 詳細については、「フィードバックの送信と表示