Ändern Sie Split-Format Datenblatt Ansicht Format

Question

Ich habe ein Split-Formular mit einem Unterformular. Jedes Mal, wenn das Formular geladen wird, werden die Teilformulardaten automatisch erweitert.

Gibt es eine Möglichkeit, die Datenblattansicht des Unterformulars automatisch zu komprimieren, wenn das Formular geladen wird?

Answer 1

Verwenden VBA das Unterformular automatisch kollabieren, wenn es geladen wird:

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