Copy a range of cells to another worksheet if criteria is met

jfutrell73

New Member
Joined
Aug 9, 2013
Messages
14
Looking for help to copy and paste each cell below when M is true or greater then 0 to a new worksheet called Price Summary. If cell is false or 0, do not copy. I would like the text in N to paste to the first available row in A and copy M as well to the corresponding B. I only need the values of these cells to copy and not the formulas.
Thank you in advance for any help I can get. Been trying to get this to work for a while with no luck.



Excel 2007
MN
17$0 
18$0 
19
20$0 
21$0 
22$0 
23$0 
24$0 
25$0 
26$0 
27$0 
28$0 
29$0 
30$0 
31$0 
32$0 
33$0 
34$0 
250# Vessel Pricing TEST
Cell Formulas
RangeFormula
M17=IF(L17=TRUE,INDEX(_250lb12inlegs,B2),"$0")
M18=IF(L18>0,INDEX(_250lbAdditional_Leg_Length,B2)*B18,"$0")
M20=IF(L20=TRUE,INDEX(_250lbStand_Pipe,B2)*C20,"$0")
M21=IF(L21=TRUE,INDEX(_250lbFlush_Saddles,B2)*C21,"$0")
M22=IF(L22=TRUE,INDEX(_250lb10in_Saddles,B2)*C22,"$0")
M23=IF(L23=TRUE,INDEX(_250lbPerf_Plates,B2)*C23,"$0")
M24=IF(L24=TRUE,INDEX(_250lbSquare_Plates,B2)*C24,"$0")
M25=IF(L25=TRUE,INDEX(_250lbRound_Plates,B2)*C25,"$0")
M26=IF(L26=TRUE,INDEX(_250lbDemister_Pad,B2)*C26,"$0")
M27=INDEX(_Vortex_Prices,B27)*C27
M28=INDEX(_VBaffle_Price,B28)*C28
M29=INDEX(_Angle_Bracket_Price,B29)*C29
M30=INDEX(_Weld_Pad_Price,B30)*C30
M31=IF(L31=TRUE,Lifting_Lug_Price*C31,0)
M32=IF(L32=TRUE,Level_Eye_Price*C32,0)
M33=IF(L33=TRUE,CRN_Price,0)
M34=IF(L34=TRUE,Oil_Pot_Heater_Price,0)
N17=IF(L17,"12 in. Legs","")
N18=IF(L18>0,("Additional "&" "&L18&"' Leg Length"),"")
N20=IF(L20,"12 in. Pipe Stand","")
N21=IF(L21,"Flush Saddles","")
N22=IF(L22,"10 in. Saddles","")
N23=IF(L23,"Perf. Plate","")
N24=IF(L24,"Square Plate","")
N25=IF(L25,"Round Plate","")
N26=IF(L26,"Demister Pad","")
N27=IF(M27>0,(L27 &" "&"Vortex Eliminator"),"")
N28=IF(M28>0,(L28 &" "&"Internal V-Baffle"),"")
N29=IF(M29>0,(L29 &" "&"Angle Support Bracket"),"")
N30=IF(M30>0,(L30 &" "&"Weld Pad"),"")
N31=IF(L31,"Lifting Lugs","")
N32=IF(L32,"Level Eyes","")
N33=IF(L33,"CRN","")
N34=IF(L34,"Oil Pot Heater","")
Named Ranges
NameRefers ToCells
_250lb10in_Saddles=Accessories!$M$8:$M$16
_250lb12inlegs=Accessories!$I$8:$I$16
_250lbAdditional_Leg_Length=Accessories!$J$8:$J$16
_250lbDemister_Pad=Accessories!$Q$8:$Q$16
_250lbFlush_Saddles=Accessories!$L$8:$L$16
_250lbPerf_Plates=Accessories!$N$8:$N$16
_250lbRound_Plates=Accessories!$P$8:$P$16
_250lbSquare_Plates=Accessories!$O$8:$O$16
_250lbStand_Pipe=Accessories!$K$8:$K$16
_Angle_Bracket_Price=Accessories!$X$2:$X$6
_VBaffle_Price=Accessories!$V$2:$V$8
_Vortex_Prices=Accessories!$T$2:$T$13
_Weld_Pad_Price=Accessories!$Z$2:$Z$5
CRN_Price=Accessories!$AC$2
Level_Eye_Price=Accessories!$AB$2
Lifting_Lug_Price=Accessories!$AA$2
Oil_Pot_Heater_Price=Accessories!$AD$2
 

Excel Facts

What is =ROMAN(40) in Excel?
The Roman numeral for 40 is XL. Bill "MrExcel" Jelen's 40th book was called MrExcel XL.
I've looked over that info and do not see how that can do what I am trying to accomplish. I am very new at macros.
Any further assistance would be appreciated.
 
Upvote 0

Forum statistics

Threads
1,212,927
Messages
6,110,731
Members
448,294
Latest member
jmjmjmjmjmjm

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top