Merhaba, Trim ve RTrim fonksiyonları veri çekerken çalışmıyor. Vba sayfasında en alta

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.