Merhaba C*e*l*o*y*c*e ;
İlginiz için Teşekkür ederim. Fakat,
Aşağıdaki kod Excel dosyasının içeriğinde var, ancak çalışmıyor.

PEK = 0

       'MsgBox Val(PRIM_UCRET)

       If (IsNumeric(PRIM_UCRET)) Then

         PEK = PEK + Val(PRIM_UCRET)

       End If

       If (IsNumeric(PRIM_IKRAMIYE)) Then

         PEK = PEK + Val(PRIM_IKRAMIYE)

       End If

       PEK = Replace(PEK, ",", ".")