Propiedad Form. SubdatasheetExpanded (Access)Form.SubdatasheetExpanded property (Access)

Puede utilizar la propiedad SubdatasheetExpanded para especificar o determinar el estado guardado de hojas de datos secundarias todos dentro de una tabla o consulta.You can use the SubdatasheetExpanded property to specify or determine the saved state of all subdatasheets within a table or query. Boolean de lectura y escritura.Read/write Boolean.

SintaxisSyntax

expresión. HojaSecundariaDeDatosExpandidaexpression.SubdatasheetExpanded

expresión Variable que representa un objeto Form.expression A variable that represents a Form object.

ComentariosRemarks

El valor predeterminado es False.The default value is False.

Para establecer la propiedad SubdatasheetExpanded usando Visual Basic, primero debe crear la propiedad mediante el método CreateProperty DAO.To set the SubdatasheetExpanded property by using Visual Basic, you must first create the property by using the DAO CreateProperty method.

Las propiedades SubdatasheetExpanded y SubdatasheetHeight se aplican al control de subformulario cuando el formulario está en la vista Hoja de información.The SubdatasheetExpanded and SubdatasheetHeight properties take effect on the subform control when the form is in Datasheet view.

EjemploExample

En el siguiente ejemplo, se activa o desactiva la expansión de la hoja secundaria de elementos para el formulario pedidos de compra .The following example turns subdatasheet expansion on or off for the Purchase Orders form.

Para probar este ejemplo, abra un formulario (que contenga un subformulario) en la vista Diseño, elija el botón generador situado junto al cuadro de la propiedad al cargar de la ventana de propiedades del formulario, pegue este código en el evento Form_Load del formulario (quitando el referencia al formulario pedidos de compra ) y, a continuación, abra el formulario en la vista Hoja de información.To try this example yourself, open a form (containing a subform) in Design view, choose the Builder button next to the On Load property box in the form's property window, paste this code into the form's Form_Load event (removing the reference to the Purchase Orders form), and then open the form in Datasheet view.

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

Soporte técnico y comentariosSupport and feedback

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación?Have questions or feedback about Office VBA or this documentation? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.