yer imi ile belirtilmiş veriyi textboxda göstermek

[udentr2002]

öncelikle herkesin mübarek Kurban Bayramı Mübarek olsun.
merhaba arkadaşlar örnek bir dosya ekledim. Form açılınca göster butonuna tıkladığımızda sayfada yer imi ile belirtilmiş veriyi textbox1 e aktarıyor yanlız yer imi ile belirtilmiş verinin sayfada olduğu gibi textboxda görünmesi için bir şey yapabilrmiyiz. yani sayfada nasıl görünüyorsa veriler textboxda da öyle görünsün şimdiden ilgilenen tüm arkadaşlarıma teşekkür ederim

 

[Haluk]

Private Sub CommandButton1_Click()
    TextBox1.MultiLine = True
    MyVal = ThisDocument.Bookmarks("a1").Range.Text
    MyVal = Replace(MyVal, Chr(13), vbCrLf)
    TextBox1 = Replace(MyVal, Chr(7), "")
End Sub