diff --git a/Contabilidad2/CatCuentas.aspx.vb b/Contabilidad2/CatCuentas.aspx.vb
index d36ba565b..39a2a3978 100644
--- a/Contabilidad2/CatCuentas.aspx.vb
+++ b/Contabilidad2/CatCuentas.aspx.vb
@@ -553,7 +553,7 @@ Partial Class Contabilidad2_CatCuentas
                             item.Controls.Add(objul)
                         End If
                         ArbolCuentas.additem(objul, idnew, IDSelected, String.Format("{0} - {1}", TxtCuenta.Text, Tnombre.Text))
-                        CargaDatos()
+
                     End If
                 End If
                 If ObjConta2 IsNot Nothing Then ObjConta2.Dispose()
@@ -568,6 +568,8 @@ Partial Class Contabilidad2_CatCuentas
 
         If Not TieneError Then
             ObjConta.Commit()
+
+            CargaDatos()
             LimpiarCampos()
             updatos.Update()
             Alert("La cuenta se guardo correctamente", TipoMensaje.MsgInformacion)