ビューのページ選択を編集します。
Function EditPagePrompts(
objID As String,
pageSelections() As String
) As Boolean
objID: 編集するビューのID。空のIDが渡されると、選択したビューが使用されます。
pageSelections: 文字列配列に格納される選択ページの順序は、「ページ・セレクタ」ダイアログ・ボックスの選択ページの順序と同じにする必要があります。たとえば、図2に示されるページ選択肢を指定するには、図の後のサンプル・コードを使用します。
Dim pageSelections(0 To 1) As String pageSelections (0) = "CENTRAL REGION" pageSelections (1) = "2000"
操作が成功したかどうかを示します。
Sub EditPagePromptTest() Dim obiee As IBIReport Set obiee = New SmartViewOBIEEAutomation Dim pages(0 To 1) As String pages(0) = "CENTRAL REGION" pages(1) = "2000" obiee.EditPagePrompts Empty, pages End Sub