'Reset all fields to Null
Dim frm As Form
Dim ctl As Control
Set frm = Screen.ActiveForm
For Each ctl In frm.Controls
Select Case ctl.ControlType
Case acTextBox, acComboBox, acListBox
ctl = Null
End Select
Next ctl
"I know what you're t'inkin', ma petite. Dat Gambit... still de suave one, no?"
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.