1

The code I have so far seems to be working. The only issue is that I seem to be copying the array formulas instead of just the value of the array formula. Is there a way to have my existing code paste special (just values) or do I need a new method entirely?

Dim s1 As Excel.Worksheet Dim destsh As Excel.Worksheet Dim iLastCelldestsh As Excel.Range Dim iLastRowS1 As Long Set s1 = Sheets("RAW - Greenphire") Set destsh = Sheets("RAW - Concatenated") 'get last row of Q in RAW - Greenphire iLastRowS1 = s1.Cells(s1.Rows.Count, "Q").End(xlUp).Row 'get last AVAILABLE cell to paste into Set iLastCelldestsh = destsh.Cells(destsh.Rows.Count, "A").End(xlUp).Offset(1, 0) 'copy into RAW - Concatenated s1.Range("Q2", s1.Cells(iLastRowS1, "Q")).Copy iLastCelldestsh 

2 Answers 2

1

Transfer values only without the clipboard.

with s1.Range("Q2", s1.Cells(s1.Rows.Count, "Q").End(xlUp)) destsh.Cells(destsh.Rows.Count, "A").End(xlUp).Offset(1, 0).resize(.rows.count, .columns.count) = .value end with 
Sign up to request clarification or add additional context in comments.

Comments

1

You may use PasteSpecial to paste the values only like below...

s1.Range("Q2", s1.Cells(iLastRowS1, "Q")).Copy iLastCelldestsh.PasteSpecial xlPasteValues 

Comments

Start asking to get answers

Find the answer to your question by asking.

Ask question

Explore related questions

See similar questions with these tags.