Filter data ranger from multisheet to special sheet with conditions

[nhnn1986]

Hi all MrExcel

I want to get data range from Multisheets to another sheet with conditions that I written

In sheet MAIN when I type in Cell D2 ="56201001". I want all row in sheets"Noibang" and "ngoaibang" has contents "G00014-56201001-01201001-201704-BI-M-01" copy to sheets (DATA_1st).

I now this work can be done by autofilter but can you written its by code VBA? I have a lot data want to do.

Thanks in advanced./.

 

[nhnn1986]

bumb, some body help me