Ayuda con guardar Commandbutton

[Silence-night]

hola !
:D
Estoy haciendo un programa k muestra las entradas de clientes a una empresa y sus salidas, puse un commandbutton para cuando se guarde pero me sale ERROR91
Variable de tipo object o la variable de bloque With no esta establecida.

Private Sub Command2_Click()
Data1.Recordset.Update
Command2.Enabled = True
HabilitarCajas
End Sub

grax de antemano =)