Copiar Solo valores de una hoja a otra

Hola estoy tratando de copiar datos de una hoja a otra.
Funciona casi bien, solo que el único problema es que al pasar los datos solo copia las fórmulas.
Este es el código que tengo en el macro :
Private Sub Worksheet_Change(ByVal Target As Range)
Dim fila1 As Integer
Dim rgo As Range
    datos1 = "a1"
    If Not Application.Intersect(Target, Range(datos1)) Is Nothing Then
      Range("a14:l14").Select
      fila1 = Sheets("Hoja2").Range("A65536").End(xlUp).Row + 1
      Selection.Copy Destination:=Sheets("Hoja2").Cells(fila1, 1)
End If
End Sub
¿Qué podría hacer para solucionar esto?

1 respuesta

Respuesta
1
En lugar de poner "Destination", pon esto
Sheets("Hoja2"). Cells(fila1, 1). PasteSpecial xlPasteValues
'Asi pega solo valores

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas