Userformdan yer işaretlerine aktarma

[maykop71]

selam

userformda yeralan textbox ları word dosyasında belirlediğim yer işaretlerine aktarıyorum fakat aktardıktan sonra yer işaretleri siliniyor bu yüzden aynı işlemi tekrar yapamıyorum yardımlarınızı bekliyorum teşekkürler

 

[maykop71]

leumruk tarafından sorun çözülmüştür çok teşekkürler

Private Sub CommandButton1_Click()
y_imi = Array("bno", "servis", "tarih", "sayı")
Deg = Array(no.Value, servis.Value, tarih.Value, sayı.Value)
For x = 0 To 3
ActiveDocument.Bookmarks(y_imi(x)).Range.Select
Selection = Deg(x)
ActiveDocument.Bookmarks.Add Range:=Selection.Range, Name:=y_imi(x)
Next
End Sub

 

[yerbakili]

Selam,

Bir word dökümanında değişmesini istediğimiz alanları nasıl belirliyoruz. Yer imi bölümünden yapıyorum, gerekli kodlamalarla bir türlü değiştiremiyorum o alanı.

Mesela sizin çalışmanızda yer alan {FORMTEXT} 'ler nasıl yapılıyor?

 

[maykop71]

değişmesini istediğiniz yere imleci getirin ve yer iminden oraya bir isim verin

 

[basaksehirli]

teşekkürler