burada size yardımcı olunmaya çalışılmış.Arkadaş tek bir word sayfasi olacak icerisindeki her hangi bir metin kutusu ya da tabloda olabilir bunun icerisindeki deger her yazdirma komutunda 1 artacak. Diyelim ki tek bir word sayfasindan 20 tane çıktı alacagiz her çıktıdaki deger otomatik olarak bir artacak!
Arkadaşım kendim yapamadığım için burdayım zatenn Yardımcı olan arkadaslara cok teşekkür ediyorum. Ama soylediklerimi anlatamadigim icin çözüm olmadı galibaburada size yardımcı olunmaya çalışılmış.
kendiniz yapın!
Hocam geliştirici sekmesinden sayfaya bir yazdır butonu ve bir textbox ekleyerek denedim oldu. butonun içineArkadaşlar tablo icerisine istedigim sayidan baslayarak her sayfa ciktisinda otomatik artan numaralar yazdirmak istiyorum. Bunu wordde yapabilmek mümkün mü?
Hocam cok cok teşekkür ediyorumHocam geliştirici sekmesinden sayfaya bir yazdır butonu ve bir textbox ekleyerek denedim oldu. butonun içine
Private Sub CommandButton1_Click()
TextBox1.Text = Str(Val(TextBox1.Text) + 1)
Me.PrintPreview
End Sub
kodlarını yazın. numaraların istediğiniz sayıdan başlaması için textboxın değerini elle girebilirsiniz.
Hocam söylediğinizi yaptim ama resimdeki gibi bir hata aldim.Hocam geliştirici sekmesinden sayfaya bir yazdır butonu ve bir textbox ekleyerek denedim oldu. butonun içine
Private Sub CommandButton1_Click()
TextBox1.Text = Str(Val(TextBox1.Text) + 1)
Me.PrintPreview
End Sub
kodlarını yazın. numaraların istediğiniz sayıdan başlaması için textboxın değerini elle girebilirsiniz.
Hocam komutları şu şekilde değiştirince sorunsuz çalışıyor bende. bunu bi deneyin. ilkinden farkı baskı önizleme yapmadan doğrudan yazdırıyor.Hocam söylediğinizi yaptim ama resimdeki gibi bir hata aldim.
Denedim oldu hocam cok teşekkürler bu da işimizi görürHocam komutları şu şekilde değiştirince sorunsuz çalışıyor bende. bunu bi deneyin. ilkinden farkı baskı önizleme yapmadan doğrudan yazdırıyor.
Private Sub CommandButton1_Click()
TextBox1.Text = Str(Val(TextBox1.Text) + 1)
Me.PrintOut
End Sub