diff --git a/Source/Modulos/Facturas de cliente/Views/uDialogOpcionesImpresionFacturasCliente.dfm b/Source/Modulos/Facturas de cliente/Views/uDialogOpcionesImpresionFacturasCliente.dfm
index ad2d086..6ddc186 100644
--- a/Source/Modulos/Facturas de cliente/Views/uDialogOpcionesImpresionFacturasCliente.dfm	
+++ b/Source/Modulos/Facturas de cliente/Views/uDialogOpcionesImpresionFacturasCliente.dfm	
@@ -81,6 +81,7 @@ inherited fDialogOpcionesImpresionFacturasCliente: TfDialogOpcionesImpresionFact
     Top = 16
     inherited actAceptar: TAction
       OnExecute = actAceptarExecute
+      OnUpdate = actAceptarUpdate
     end
     inherited actCancelar: TAction
       OnExecute = actCancelarExecute
diff --git a/Source/Modulos/Facturas de cliente/Views/uDialogOpcionesImpresionFacturasCliente.pas b/Source/Modulos/Facturas de cliente/Views/uDialogOpcionesImpresionFacturasCliente.pas
index efc6a95..b562335 100644
--- a/Source/Modulos/Facturas de cliente/Views/uDialogOpcionesImpresionFacturasCliente.pas	
+++ b/Source/Modulos/Facturas de cliente/Views/uDialogOpcionesImpresionFacturasCliente.pas	
@@ -13,6 +13,7 @@ type
     cbContabilidad: TCheckBox;
     procedure actAceptarExecute(Sender: TObject);
     procedure actCancelarExecute(Sender: TObject);
+    procedure actAceptarUpdate(Sender: TObject);
   private
     { Private declarations }
   public
@@ -57,6 +58,13 @@ begin
   ModalResult := mrOk
 end;
 
+procedure TfDialogOpcionesImpresionFacturasCliente.actAceptarUpdate(
+  Sender: TObject);
+begin
+  inherited;
+  (Sender as TAction).Enabled := cbOriginal.Checked or cbCopia.Checked or cbContabilidad.Checked;
+end;
+
 procedure TfDialogOpcionesImpresionFacturasCliente.actCancelarExecute(Sender: TObject);
 begin
   inherited;