Copy formula value from one sheet and paste value only to another sheet

**drewship** · 06-20-2013, 09:21 AM

Hello all. Below is a snippet I need help with. I looked through the Forum and tried the suggestions as indicated below, but none of them work. The formula is located in cells on the ("Uniform Order Sheet") and I want only the VALUE copied and pasted to the ("UniformBuild") sheet. The suggestions popup various errors. I think it may just the position of the PASTE section if the line that is the issue but I have tried without success to move it.

With Sheets("Uniform Order Sheet")
    .Range("AA" & Rw).Copy Sheets("UniformBuild").Range("T8").PasteSpecial xlValues
    .Range("AF" & Rw).Copy Sheets("UniformBuild").Range("T9").PasteSpecial Paste:=xlPasteValues
    .Range("AK" & Rw).Copy Sheets("UniformBuild").Range("T10").PasteSpecial xlPasteValues
    .Range("AP" & Rw).Copy Sheets("UniformBuild").Range("T11").Value = .Value
End With

Thanks,
Andrew

**AB33** · 06-20-2013, 09:29 AM

Should be on a separate lines

With Sheets("Uniform Order Sheet")
    .Range("AA" & Rw).Copy
    Sheets("UniformBuild").Range("T8").PasteSpecial xlValues
    .Range("AF" & Rw).Copy
    Sheets("UniformBuild").Range("T9").PasteSpecial Paste:=xlPasteValues
    .Range("AK" & Rw).Copy
    Sheets("UniformBuild").Range("T10").PasteSpecial xlPasteValues
    .Range("AP" & Rw).Copy
    Sheets("UniformBuild").Range("T11").PasteSpecial xlPasteValues

**drewship** · 06-20-2013, 09:37 AM

Is any one of them better than the others? This will be repeated hundreds of times so I want the fastest/best option.

Thanks,
Andrew

**drewship** · 06-20-2013, 09:50 AM

We posted at the same time so I will assume you posted the most effecient method.

Thanks AB33!!

**AB33** · 06-20-2013, 09:36 AM

Most likely

With Sheets("Uniform Order Sheet")
    .Range("AA" & Rw).Copy
    Sheets("UniformBuild").Range("T" & Rows.Count).End(xlUp).Offset(1).PasteSpecial xlValues
    .Range("AF" & Rw).Copy
     Sheets("UniformBuild").Range("T" & Rows.Count).End(xlUp).Offset(1).PasteSpecial xlValues
    .Range("AK" & Rw).Copy
    Sheets("UniformBuild").Range("T" & Rows.Count).End(xlUp).Offset(1).PasteSpecial xlValues
    .Range("AP" & Rw).Copy
    Sheets("UniformBuild").Range("T" & Rows.Count).End(xlUp).Offset(1).PasteSpecial xlValues

**AB33** · 06-20-2013, 09:54 AM

Andrew,
You should use the second one as it looks at the next empty row in column T while the first one pastes in to a fixed row.

**drewship** · 06-20-2013, 10:06 AM

Got it, thanks again!!

Copy formula value from one sheet and paste value only to another sheet

LinkBack

Thread Tools

Rate This Thread

Display

Hybrid View

Copy formula value from one sheet and paste value only to another sheet

Re: Copy formula value from one sheet and paste value only to another sheet

Re: Copy formula value from one sheet and paste value only to another sheet

Re: Copy formula value from one sheet and paste value only to another sheet

Re: Copy formula value from one sheet and paste value only to another sheet

Re: Copy formula value from one sheet and paste value only to another sheet

Re: Copy formula value from one sheet and paste value only to another sheet

Thread Information

Users Browsing this Thread

Bookmarks

Bookmarks

Posting Permissions