Visual Basic - copiar celda de otra hoja

Life is soft - evento anual de software empresarial
   
Vista:

copiar celda de otra hoja

Publicado por NicoMAFE (1 intervención) el 26/10/2009 14:40:51
Necesito hacer un bucle para copiar las celdas de una hoja en otra hoja. La primera hoja tiene el siguiente formato:

Trabajador 1 1 2 5 6 9 10 15 3 4 7 8 11 12
la otra hoja tiene este otro formato:

Miercoles 01-jul 1 2 3 4
Jueves 02-jul 5 6 7 8
Viernes 03-jul 9 10 11 12
Sabado 04-jul 13 14 15 16

El problema viene porque no se copia el valor de la celda C6 con mi instruccion, sino que se copia el valor de otra celda.

Sub Macro1()
'
' Macro1 Macro
' Macro grabada el 26/10/2009
'
Dim fila, col As Integer
fila = 7
col = 3
Cells(fila, col).Select
ActiveCell.FormulaR1C1 = "=Turnos!c6" ' necesito que copie el valor de la celda C6
Cells(fila, col + 1).Select
ActiveCell.FormulaR1C1 = "=Turnos!d6"
Cells(fila, col + 2).Select
ActiveCell.FormulaR1C1 = "Turnos!c7"
Cells(fila, col + 3).Select
ActiveCell.FormulaR1C1 = "Turnos!d7"

End Sub
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:copiar celda de otra hoja

Publicado por Christian (666 intervenciones) el 26/10/2009 15:24:29
Usa Range en vez formula

Sheets("Hoja1").Select
Range("C6").Select

saludos.-
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar