MY FILE:
http://www.mytempdir.com/976689

Example:
The joint of column F and H in RETAIL_POE is 4532&75 scann in D and H
of GAF and if the condition existis ok, copy in TEMPLATE the value this
range:
Worksheets("TEMPLATE").Range("A" & RIGA) = Worksheets("GAF").Range("A"
& RIGA).Value
Worksheets("TEMPLATE").Range("H" & RIGA) = Worksheets("GAF").Range("H"
& RIGA).Value


The joint of column F and H in RETAIL_POE is 4532&76 scann in D and H
of GAF and if the condition existis ok, copy in TEMPLATE the value this
range:

Worksheets("TEMPLATE").Range("A" & RIGA) = Worksheets("GAF").Range("A"
& RIGA).Value
Worksheets("TEMPLATE").Range("H" & RIGA) = Worksheets("GAF").Range("H"
& RIGA).Value

continue the joint and the find do until in range of line 2 of
RETAIL_POE is present blank cell in this case after Q, R is blank...

Goto the next line in RETAIL_POE...

The joint of column F and H in RETAIL_POE is 4534&75 scann in D and H
of GAF and if the condition existis ok, copy in TEMPLATE the value this
range:
Worksheets("TEMPLATE").Range("A" & RIGA) = Worksheets("GAF").Range("A"
& RIGA).Value
Worksheets("TEMPLATE").Range("H" & RIGA) = Worksheets("GAF").Range("H"
& RIGA).Value

The joint of column F and H in RETAIL_POE is 4534&76 scann in D and H
of GAF and if the condition existis ok, copy in TEMPLATE the value this
range:

Worksheets("TEMPLATE").Range("A" & RIGA) = Worksheets("GAF").Range("A"
& RIGA).Value
Worksheets("TEMPLATE").Range("H" & RIGA) = Worksheets("GAF").Range("H"
& RIGA).Value

ontinue the joint and the find do until in range of line 2 of
RETAIL_POE is present blank cell in this case after S, t is blank...

Goto the next line in RETAIL_POE...

ecc...

Note: i have used RIGA to count but i dont know wath you use in this
case...