Modificar Libro de Excel desde un formulario

[mike_calor]

Hola buen dia a todos:

En el siguiente archivo .rar tengo 2 libros de excel.

Lo que me gustaria saber es como modificar el archivo ORDEN.xls desde el formulario que existe en el archivo...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[jbjimenez]

Con el grabador de macro y unos "retoques" lo sacas facil ... si tienes dudas en el camino nos cuentas !! 8)

 

[mike_calor]

Gracias por la respuesta pero la idea es que lo haga el formulario ya que el formulario original tiene un listbox y de ahi selecciono x registros.

Por ahi antoni me echo la mano en sustituir...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Macro Antonio]

Hola de nuevo Mike:

Coloca el siguiente código en el formulario.

Dim x As Worksheet

Private Sub UserForm_Initialize()
Workbooks.Open Filename:=ThisWorkbook.Path & "\ORDEN.xls"
Set x =...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[galileogali]

Dim x As Worksheet

Private Sub UserForm_Initialize()
Workbooks.Open Filename:=ThisWorkbook.Path & "\ORDEN.xls"
Set x = Workbooks(2).Worksheets("Hoja1")
End Sub

Private Sub CommandButton1_Click()...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Macro Antonio]

Gracias Gali:

Yo normalmente, utilizo una función para determinar el nº de libro, pero para no complicarle la vida a Mike, he preferido suponer que no hay mas libros abierto.

De todas maneras...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[mike_calor]

Esta muy bien la funcion, de cualquier forma tratare de no tener mas de 2 libros abiertos. Gracia1!!

Anexo adjunto como quedo, pero no hayo como poner el el libro "ORDEN" los valores que yo...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Macro Antonio]

Hola Mike:

Sustituye el procedimiento CommandButton1_Click por este otro:

Private Sub CommandButton1_Click()
Application.ScreenUpdating = False
Workbooks.Open Filename:=ThisWorkbook.Path &...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[mike_calor]

MUCHAS GRACIAS POR LA AYUDA, ME HA SERVIDO A LA PERFECCION

GRACIAS POR TUS COLABORACIONES!!!


SALUDOS