VBA pour excel - recherche valeur

Bonjour,

J'ai un gros pb avec vba, 5 ans sans utilisation.

Je simplifie le pb car cela n'apporte rien de plus.

Feuille 1
A1 = 20 (par exemple) 'correspond à un diametre d'un tube
A2 = 5.25 (par exemple) 'correspond à une epaisseur de calcul
A3 = (valeur à trouver) ' correspond à l'epaisseur mini standard >A2
Feuille 2 - tableau suivant
----A---B----C----D---E
1--10--1.2--2.3--4.6--5.5
2--20--1.3--2.5--4.7--6.2
3--30--1.6--2.6--5.2--7.2
4--40--1.8--3.2--5.5--7.5

Colonne A : diametre d'un tube
Colonne B à E : epaisseur standard en fonction du diametre du tube

Dans mon cas A3 =6.2
Si je modifie dans la feuille 1 la valeur A1, A2 est recalculer et A3 doit modifié

Je souhaite utiliser la fonction suivante
Function ep_std_mini(DN As String, ep_calcul As String
à DN je lui renvoie A1 'pas de pb
à ep_calcul je lui renvoie A2 ' pas de pb

C'est la suite qui me pose problème

Cordialement,