次の例は、マルチ ページ ( MultiPage ) コントロールの各ページを操作する方法を示します。
数値インデックスと共に Pages コレクションを使用する方法
マルチ ページ ( MultiPage ) コントロールの各ページの名前を使用する方法
SelectedItem プロパティを使用する方法
この例を利用するには、次のコード例をフォームのスクリプト エディターにコピーします。 フォームに、MultiPage1 と命名された MultiPage と CommandButton1 と命名された CommandButton が含まれていることを確認します。
Sub CommandButton1_Click
Dim PageName
Set MultiPage1 = Item.GetInspector.ModifiedFormPages("P.2").MultiPage1
For i = 0 To MultiPage1.Count - 1
'Use index (numeric or string)
MsgBox "MultiPage1.Pages(i).Caption = " & MultiPage1.Pages(i).Caption
MsgBox "MultiPage1.Pages.Item(i).Caption = " & MultiPage1.Pages.Item(i).Caption
'Use Page object without referring to Pages collection
If i = 0 Then
MsgBox "MultiPage1.Page1.Caption = " & MultiPage1.Page1.Caption
ElseIf i = 1 Then
MsgBox "MultiPage1.Page2.Caption = " & MultiPage1.Page2.Caption
End If
'Use SelectedItem Property
MultiPage1.Value = i
MsgBox "MultiPage1.SelectedItem.Caption = " & MultiPage1.SelectedItem.Caption
Next
End Sub
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。