Public Function BoslukSil(ByVal GVeri As String) As String
If InStr(GVeri, Chr(160)) > 0 Then
BoslukSil = Replace(GVeri, Chr(160), "")
ElseIf InStr(GVeri, Chr(32)) > 0 Then
BoslukSil = Replace(GVeri, Chr(32), "")
Else
BoslukSil = GVeri
End If
End Function
kodu ekle,
rc!HISSE = Trim(MyTable.rows(L).cells(0).innerText)
kodunu da
rc!HISSE = BoslukSil(MyTable.rows(L).cells(0).innerText)
Kodu ile değiştir.