Como copiar valores de un rango de celdas a otra h
Hola, mi pregunta es la siguiente, necesito copiar los valores(no las fórmulas) de un rango de celdas en mi hoja activa, luego pegarlas en una determinada celda (o rango) de otra hoja del mismo libro,, ¿cómo obtengo ese código?.. Intenté con la macro pero al copiarlo en mi botón no lo ejecuta y sale "error"... Gracias de antemano.
1 respuesta
Respuesta de valedor
1
Prueba lo siguiente
Public Sub CopiarValores()
Selection.Copy
Worksheets("Hoja4").Range("A1").PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Application.CutCopyMode = False
End Sub
Esta macro te copiara la selección actual a la hoja llamada Hoja4 a partir de la celda A1, como veras, solo tienes que seleccionar bien tus datos a copiar y darle bien la hoja y la celda donde quieres que copie los valores.
Public Sub CopiarValores()
Selection.Copy
Worksheets("Hoja4").Range("A1").PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Application.CutCopyMode = False
End Sub
Esta macro te copiara la selección actual a la hoja llamada Hoja4 a partir de la celda A1, como veras, solo tienes que seleccionar bien tus datos a copiar y darle bien la hoja y la celda donde quieres que copie los valores.
