Excel VBA. Copy and paste from one cell to another based on value.

[fellodan]

Hi All.

Fairly new to the world of VBA. i'll give a brief description first and then add more detail.

I'm basically wanting to search down a column for specific words, each time I hit one of these words I want to jump into the previous column and cut the value from there and paste it as a value to the first available blank cell in a set range.

so here is what i've got in terms of spreadsheet:

[TABLE="width: 640"]
<colgroup><col span="10"></colgroup><tbody>[TR]
[TD]A[/TD]
[TD]B[/TD]
[TD]C[/TD]
[TD]D[/TD]
[TD]E[/TD]
[TD]F[/TD]
[TD]G[/TD]
[TD]H[/TD]
[TD]I[/TD]
[TD]J[/TD]
[/TR]
[TR]
[TD]Process[/TD]
[TD] [/TD]
[TD]small[/TD]
[TD]P.Woods[/TD]
[TD] [/TD]
[TD] [/TD]
[TD]Not in[/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[/TR]
[TR]
[TD] [/TD]
[TD]large[/TD]
[TD]M.Twaits[/TD]
[TD]hol[/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[/TR]
[TR]
[TD] [/TD]
[TD]medium[/TD]
[TD]G.Rothery[/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[/TR]
[TR]
[TD] [/TD]
[TD]5 Stick[/TD]
[TD]N.Barham[/TD]
[TD]sick[/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[/TR]
[TR]
[TD] [/TD]
[TD]jmb[/TD]
[TD]C.Higgins[/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[/TR]
[TR]
[TD] [/TD]
[TD]fresh[/TD]
[TD]D.Opolski[/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[/TR]
</tbody>[/TABLE]

so I want to look down column E, when I either see sick or hol I want to copy or cut the name at the side and then paste it to the first available blank in column H as a value.

Any help would be much appreciated.

Regards