I have a macro and I simply want to copy the values from the "Current_Parts" range, which is in another worksheet and to paste it into the "Paste_Area1" range which is in the current worksheet and is of the same shape and size.
I thought I could do it as easy as in the Range("Paste_Area1") = Sheets("Quotes Database").Range("Current_Parts") line below, but it does not work.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(False, False) = "D5" Then
Range("Paste_Area1") = Sheets("Quotes Database").Range("Current_Parts")
End If
End Sub
Can anyone help? Do I need to use a PasteValues type command?
Thanks,
MikeG
I thought I could do it as easy as in the Range("Paste_Area1") = Sheets("Quotes Database").Range("Current_Parts") line below, but it does not work.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(False, False) = "D5" Then
Range("Paste_Area1") = Sheets("Quotes Database").Range("Current_Parts")
End If
End Sub
Can anyone help? Do I need to use a PasteValues type command?
Thanks,
MikeG