move data/row when certain words are found in cell
 

I never used VB, but was wondering if this is possible:
What I have:
1: worksheet 1 named "data" with a table like below
I have 2 columns of data: Domain, [Metakeywords] (has different # of words
in each row)
2: worksheet 2 named "category1" with nothing now, but I want output here.

What I want:
1. when "net, web, IT" is found in [Metakeywords] in "data", move the rows
of data to worksheet 2 program VB to name that sheet as "category1".
2. when "dating, personals" is found in [Metakeywords], move the rows of
data to worsheet 3 and program VB to name that sheet as "category2"


worksheet "data":
column 1 column 2
Domain Name Metakeywords
soft.com .net, .net, 3d-site maps, applet java
gemega.com slide scanning, film scanning, vhs to dvd, slide show

Actually, for what I want,
it is "net" or "web" or "IT" any of these 3 words for category1
it is "personals" or "dating" any of these 2 words for category2


" wrote:

I never used VB, but was wondering if this is possible:
What I have:
1: worksheet 1 named "data" with a table like below
I have 2 columns of data: Domain, [Metakeywords] (has different # of words
in each row)
2: worksheet 2 named "category1" with nothing now, but I want output here.

What I want:
1. when "net, web, IT" is found in [Metakeywords] in "data", move the rows
of data to worksheet 2 program VB to name that sheet as "category1".
2. when "dating, personals" is found in [Metakeywords], move the rows of
data to worsheet 3 and program VB to name that sheet as "category2"


worksheet "data":
column 1 column 2
Domain Name Metakeywords
soft.com .net, .net, 3d-site maps, applet java
gemega.com slide scanning, film scanning, vhs to dvd, slide show