Partager via


Propriété Form.SubdatasheetExpanded (Access)

Utilisez la propriété SubdatasheetExpanded pour spécifier ou déterminer l’état enregistré de toutes les sous-feuilles de données dans une table ou une requête. Boolean (en lecture/écriture).

Syntaxe

expression. Sous-feuille de donnéesExpanded

expressionVariable qui représente un objetForm.

Remarques

False est la valeur par défaut.

Pour définir la propriété SubdatasheetExpanded à l'aide de Visual Basic, vous devez d'abord créer la propriété à l'aide de la méthode DAO CreateProperty.

Les propriétés SubdatasheetExpanded et SubdatasheetHeight prennent effet sur le contrôle de sous-formulaire lorsque le formulaire est en mode Feuille de données.

Exemple

L’exemple suivant active ou désactive l’extension de sous-feuille de données pour le formulaire Bons de commande .

Pour essayer cet exemple vous-même, ouvrez un formulaire (contenant un sous-formulaire) en mode Création, choisissez le bouton Générateur en regard de la zone de propriété Lors du chargement dans la fenêtre de propriétés du formulaire, collez ce code dans l’événement Form_Load du formulaire (en supprimant la référence au formulaire Bons de commande ), puis ouvrez le formulaire en mode Feuille de données.

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

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.