Need to Paste Values

[Sam_Alex]

HI,

I have the current macro that shifts data between two workbooks based on the value in column A

Please Login or Register  to view this content.

The issue I am having is that I need to just paste values across as the data I am pasting is a mix of indexmatch's to other workbooks.

I have tried to simply add in:

Please Login or Register  to view this content.

But get a Syntax Error.

Any help is appreciated!

[Sam_Alex]

Solved it...

For nxtRw = 2 To lastRw2
With sht2.Range("A3:A" & lastRw2)
Set m = .Find(wkb1.Sheets(1).Range("A" & nxtRw), lookat:=xlWhole)
If Not m Is Nothing Then
sht1.Range("A" & nxtRw).EntireRow.Copy
sht2.Range("A" & m.Row).PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False
End If
End With