in need of a macro for a complex task

[Tonyk1051]

Delete row 1 in sheet 1
Highlight column H and insert 2 new columns (do the same for sheet 2)
Highlight column X and insert 1 new column (do the same for sheet 2)

Highlight all of sheet 2 apply data filter

On column G
click select all, check boxes that have Manufacture, Working but missing parts,
tested confirmed defective, tested confirmed damage, picture of defect done

all the data that is found, cut and move to sheet 1

Now on sheet 1

highlight all of it and apply data filter
go to coulmn L and search for TT
all the data that it pulls delete entire row
now search for tv
all the data that it pulls delete entire row
unfilter sheet 1


instructions are always the same but data amount is always
different sometime less some times more, is this something a Macro can do?

 

[Tonyk1051]

You're welcome.

Fluff, i got another one. i dont have excel in my computer so i have to use in drop box sample1.xlsm

but i need a code that does these instructions, hope you can help, thanks

If coulmn S is yes

and column W says open box put in column H used, if coulmn W says

defective /unspecified or damaged then put in coulmn H

LR if value in column O is $20 or less, put Tradeport if value is between $20-$50

or put TL if value is over $50 BUT if column N has key word "cell phone" or "notebook" put in TT

 

[Fluff]

As this is a totally different question, you need to start a new thread. Thanks

 

[Tonyk1051]

As this is a totally different question, you need to start a new thread. Thanks

Macro help

I dont have excel on my computer so dropbox is going to have to do, i need a Macro to do the intructions below, thanks https://www.dropbox.com/scl/fi/fkzk7slwb5e60ziioogeo/sample1.xlsm?dl=0&rlkey=0d4cjm3tdxtwjlxmcs7t25ux8 If coulmn S is yes and column W says open box put in column H used IF...

www.mrexcel.com

 

[Tonyk1051]

Hi,

Back again, below is the original code

Range("A1", .Range("AL" & .Rows.Count).End(xlUp)).AutoFilter Field:=12, Criteria1:="=*TT*", Operator:=xlOr, Criteria2:="=*TV*"


Below is the updated version since i have a 3rd critieria to add but i keep on getting an error any idea what it should look like to make it work? i mean it looks right to me..

[Range("A1", .Range("AL" & .Rows.Count).End(xlUp)).AutoFilter Field:=12, Criteria1:="=*TT*", Operator:=xlOr, Criteria2:="=*TV*", Operator:=xlOr, Criteria3:="=*P*" code/]

 

[Fluff]

You can only have more than 2 criteria when doing an exact match.