[hsab]

السلام عليكم ورحمة الله 
ارجو مساعدتى فى صياغة دالة لحساب حجم المنتج بالخزان وفقا للمعلومات المرفقة على ان تكون الدالة كما التالى
Public Function CalcVolume(TKNo As Integer, DipV As Double) As Double
    Dim DipCM As Integer
    Dim RemainingMM As Double
   
 Dim BaseVolume As Double 
END FUNCTION
والمعلومات مرفقة