SubdatasheetExpanded プロパティを使用して、テーブルまたはクエリ内のすべてのサブデータシートの保存状態を指定または決定します。 値の取得と設定が可能なブール型 (Boolean) の値です。
構文
式。SubdatasheetExpanded
expressionForm オブジェクトを表す変数です。
注釈
既定値は False です。
Visual Basic を使って " SubdatasheetExpanded /展開したサブデータシート" プロパティを設定するには、最初に DAO の CreateProperty メソッドを使ってこのプロパティを作成する必要があります。
SubdatasheetExpanded プロパティと SubdatasheetHeight プロパティは、フォームがデータシート ビューにあるときにサブフォーム コントロールで有効になります。
例
次の例では、 発注書 フォームのサブデータシートの拡張を有効または無効にします。
この例を自分で試すには、デザイン ビューでフォーム (サブフォームを含む) を開き、フォームのプロパティ ウィンドウの [読み込み時] プロパティ ボックスの横にある [ビルダー] ボタンを選択し、このコードをフォームのForm_Load イベントに貼り付けて ([発注書] フォームへの参照を削除し)、データシート ビューでフォームを開きます。
Dim strExpand As String
With Forms("Purchase Orders")
strExpand = InputBox("Expand subdatasheets? Y/N")
Select Case strExpand
Case "Y"
.SubdatasheetExpanded = True
Case "N"
.SubdatasheetExpanded = False
Case Else
MsgBox "Can't determine subdatasheet expansion state."
End Select
End With
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。