Delete items after specific words in array

[leap out]

Hello
I have data in columns A: F some words in column C2:C8000 in specific sheets like this
SRT RETHY VOU 20000
SRT RETHY VOU 20001
AVRT REWONM SN90000
AVRT REWONM SN90001
AVRT REWONM SN90002
VOUCF AQWWW NMJ78900
ASD WERRRY 1299HA HJKJU8
there are many items are existed in specific sheets(SH1,DATA,MAIN,COS)
so what I want macro to put specific sheets names in array and put items in array like this
("SRT RETHY","AVRT REWONM","VOUCF","ASD WERRRY 1299HA")
the macro should delete any items are existed after them based on words in array and based on specific sheets names in array
the result should be in column C like this
SRT RETHY
SRT RETHY
AVRT REWONM
AVRT REWONM
AVRT REWONM
VOUCF
ASD WERRRY 1299HA
thanks