Merhabalar;
Ekteki dosyada Ücret tutarı ve İkramiye tutarını girdikten sonra xml dosyasına çevirince virgülü noktaya çevirmiyor. Buradaki hata ne olabilir.
excelden pek anlamam ama
şu kodları bir deneyin
Dim aaa As String
If aaa <> "" Then
aaa = PEK.Replace(",", ".")
Else
End If
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, ",", ".")