copiar celdas de 1 hoja a otra hoja

[loamsteo]

Mis saludos antemano, el asunto es el siguiente:
tengo la hoja de nombre "portada" con una lista de numeros 104340, 104342, 104342,... ubicados en la comuna "A"de forma descendete, aparte existe...

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í

 

[Foxtri]

Hola,loamsteo.
Te adjunto una opcion.

Saludos,Foxtri

 

[Macro Antonio]

Lo mismo que Foxtri, pero con una macro.

 

[loamsteo]

Gracias, los voy a probar y les aviso.

Atte.
Lister

 

[loamsteo]

Gracias por la ayuda, de 10!!!

Atte.
Lister

 

[loamsteo]

Antoni gracias por la ayuda, pero me gustaria que la lista empezara desde celda B10 hacia abajo, como lo haria?

Atte.
Lister

 

[Macro Antonio]

Private Sub Actualizar_Click()
Dim Fila As Integer
Hoja1.Columns(1).ClearContents
Fila = 10
For Each hoja In Sheets
   If LCase(hoja.Name) <> "portada" Then
      Hoja1.Range("B" & Fila) =...

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]

Corrijo:

Private Sub Actualizar_Click()
Dim Fila As Integer
Hoja1.Range("B:F").ClearContents
Fila = 10
For Each hoja In Sheets
   If LCase(hoja.Name) <> "portada" Then
      Hoja1.Range("B"...

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í

 

[loamsteo]

Hola Antoni de antemano gracias por toda la ayuda prestada hasta el momento,la verdad no soy tan bueno con el lenguaje vba y estoy tabajando con formularios. mejor te explico lo que stoy...

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í