Crear una macro

Hola experto, tengo una consulta, tengo 2 hoja de cálculos en la hoja1 quiero cargar los valores, lo que quiero saber es si existe algún método utilizando macro que cargue automáticamente en la hoja2 los mismos valores indicándole en que celda rellenar.
Saludos Arnaldo..

1 respuesta

Respuesta
1
Una macro que lo hace es la siguiente:
Es configurable... en cuantas columnas, y filas...
Ojo solo esta para las columnas de la A a la Z.
Pero t puede dar una idea de como fabricar tu macro...
Espero t sirva...
Lógicamente esta robada.
Si hubiesen dudad avisame...
Sub Macro3()
Dim i, j, limite_Columna, limite_fila, inicio_columna, inicio_fila
Dim ABC As String
Dim rango As String
'Inicialización
ABC = "ABCDEFGHIJKLMNOPQRTUVWXIZ"
limite_Columna = 5 'termina en la Columna E
limite_fila = 5
inicio_columna = 2 'Inicia en la columna B
inicio_fila = 2
'Iniciamos limpiando toda el área de trabajo:
Sheets("Hoja2").Select
    Cells.Select
    Selection.ClearContents
    Range("A1").Select
'Iniciamos con el ciclo, barriendo columnas
  For j = inicio_columna To limite_Columna
   'Iniciamos con el ciclo, barriendo filas
    For i = inicio_fila To limite_fila
        Sheets("Hoja2").Select
        rango = Mid(ABC, j, 1) & CStr(i)
        Range(rango).Select
        ActiveCell.FormulaR1C1 = "=Hoja1!RC"
        rango = Mid(ABC, j, 1) & CStr(i)
        Range(rango).Select
        Sheets("Hoja1").Select
    Next
  Next
End Sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas