Look if value from sheet 1 exist in sheet 2 and if yes copy a specific cell from sheet 2 in sheet 1

[sandero1970]

Hi,
I have a file with several sheets. One of them is the parameters sheet containg a table with values from P1 to S100.
In my second sheet "decisions" I have to look if the RANGE("F"& i) of the sheet Decisions is in the table from sheet Parameters (see if the value is in the table)
and IF YES then copy the value from cell S from the line where the cell from column Q sheet PAram is the same as value in columns E of sheet decisions
if NOT the next line from sheet Decisions

A bit difficult to explain but hope that with pictures it is ok.
Thx

 

[sandero1970]

I solved it like that. May be a nother way exists:
Dim l As Integer
Dim i As Integer
Dim cel As Range
Sheets("decisions").Activate

l = Sheets("decisions").Cells(Rows.Count, 1).End(xlUp).Row 'Last Row

For i = 2 To l
If Range("E" & i) = "050/31/XX" Then
Cells(i, "E").ClearContents
End If
Next


l = Sheets("decisions").Cells(Rows.Count, 1).End(xlUp).Row 'Last Row

For Each cel In Range("E2:E" & l)
If cel.Value = "" Then cel.Formula = "=VLOOKUP(RC[1],'Audit BSM'!C[5]:C[7],3,FALSE)"
Next cel