Ayuda VB 6.0 y Excel

[vlad]

no no funciono no cierra el proceso de excel si que abierto

Código: [Seleccionar]

Private Sub Form_Unload(Cancel As Integer)
Call cmdsalir_Click

End Sub


Código: [Seleccionar]

Private Sub Cmndsalir_Click()
    Set objExcel = Nothing
    Set xLibro = Nothing
    End
End Sub



Ahi falta el objExcel.Workbooks.Close; otra cosa, te has fijado que tu botón se llama Cmndsalir y no cmdsalir?

una pregunta mas que pasaria si el archivo tubera una contraseña como tengo que modificar el codigo

umm ahi si no se, pero  mira esto:
http://www.ozgrid.com/VBA/excel-worksheet-protect-all.htm

Así que (como siempre no tengo VB a estas horas), pero mi aproximación sería que probaras con xLibro.unprotect ("Clave")

[ernestoelunico]

no quiero abrir otro tema por eso pongo esto por aqui para darle contunuidad

si yo uso
private sub cmdactulizar_click()
Call Form_Load
end sub

deberia de recargarme el formulario o me equipoco mejor dicho deberia de recargar la informacion que hay en el procedimiento
private sub Rorm_load()
...
end sub
pero no lo hace porque o mejor uso
load form1

[vlad]

no quiero abrir otro tema por eso pongo esto por aqui para darle contunuidad

si yo uso
private sub cmdactulizar_click()
Call Form_Load
end sub

deberia de recargarme el formulario o me equipoco mejor dicho deberia de recargar la informacion que hay en el procedimiento
private sub Rorm_load()
...
end sub
pero no lo hace porque o mejor uso
load form1

Call Form_Load, debería de llamar el código que haya form_load (ojo (!) no recarga el formulario).

Pero si tenes un procedimiento que tenes que ejecutar varias veces mejor move el codigo a un procedimiento en un modulo.

[ernestoelunico]

no la cosa era que para activar otros botones tiene que leer un archivo si en el archivo tiene una frace se activan si no la tiene no se actican y estas instrucciones estan en el form1._load
pero ya lo resolvi aunque lo siento un poco rustico pero hice esto en vez del call
Unload Frmhome
Load Frmhome
Frmhome.Show
le ventana se me mueve de la posicion original pero por lomenos ya hace lo que quiero

[vlad]

Igual, ¿no veo cual es la limitante de mover el codigo de form_load a un procedimiento en un modulo aparte?.

Asi digamos:

Modulo1:
Public Sub MiProcedimiento
  'Codigo que lee los archivos y activa los botones y lo demas.
End Sub

Form1:
Private sub Form_Load
  MiProcedimiento 'Se ejecuta "MiProcedimiento" al iniciar el formulario.
End Sub

Form1 :: cmdactulizar:
Private Sub cmdactulizar_click
  MiProcedimiento 'Se ejecuta "MiProcedimiento" al darle clic en actualizar.
End Sub