Este codigo que he tecleado es para borrar los datos de TODOS los controles de un formulario, les puede servit
si hacen algun proceso que necesiten borrar todos y no borrarlos uno por uno... 
 

Dim ctl As Control
   On Error Resume Next
   For Each ctl In Me.Controls
      Select Case ctl.ControlType
         Case acTextBox:
            ctl = vbNullstring
            
         Case acCommandButton:
           ' lo que sea..... 
         Case acOptionGroup, acListBox:
            ctl = vbNullstring
         Case acCheckBox:
            If ctl.Name = "Uncontrol" Then
               ctl = vbnullstring
            End If
         Case Else:
            ctl = vbnullstring
      End Select
   Next