Textbox'a yazdırılan veriyi aynı anda iki sayfada yazdırma

[ayhan7tr]

Değerli Arkadaşlarım,

User formda bulunan textbox'a yazdırdığım her veriyi aynı anda diğer bir sayfaya kopyalamak istiyorum.
Yardımcı olabilirseniz çok sevinirim.
Saygılarımla,
Ayhan

 

[Orion1]

Dosyanız ekte.

Private Sub CommandButton1_Click()
Dim i As Integer, son_sat As Long
On Error Resume Next
son_sat = Cells(65536, "B").End(xlUp).Row + 1
If son_sat >= 65533 Then
    MsgBox "Liste Sayfası Doldu..", vbCritical, "DİKKAT"
    Exit Sub
End If
ActiveSheet.Cells(son_sat, "C") = CDate(TextBox1.Text)
ActiveSheet.Cells(son_sat, "B") = TextBox2.Text
ActiveSheet.Cells(son_sat, "D") = TextBox3.Text
ActiveSheet.Cells(son_sat, "E") = TextBox4.Text * 1
ActiveSheet.Cells(son_sat, "F") = TextBox5.Text * 1
son_sat = Sheets("ŞABLON").Cells(65536, "D").End(xlUp).Row + 1
If son_sat >= 65533 Then
    MsgBox "ŞABLON Sayfası Doldu..", vbCritical, "DİKKAT"
    Exit Sub
End If
Sheets("ŞABLON").Cells(son_sat, "D") = CDate(TextBox1.Text)
Sheets("ŞABLON").Cells(son_sat, "F") = TextBox2.Text
Sheets("ŞABLON").Cells(son_sat, "H") = TextBox3.Text
Sheets("ŞABLON").Cells(son_sat, "J") = TextBox4.Text * 1
Sheets("ŞABLON").Cells(son_sat, "L") = TextBox5.Text * 1
MsgBox "Bilgi Eklendi !...", vbOKOnly + vbInformation, "Bilgi Ekleme"
End Sub

 

[ayhan7tr]

Evren Bey,
İlginize çokteşekkür ederim. Sanırım ben doğru ifade edemedim, veriler hem şablon sayfasına kayd edilecek hemde liste sayfasına.

Sevgimerimle,
Ayhan

 

[Orion1]

Evren Bey,
İlginize çokteşekkür ederim. Sanırım ben doğru ifade edemedim, veriler hem şablon sayfasına kayd edilecek hemde liste sayfasına.

Sevgimerimle,
Ayhan

Gerekli eklemeyi yaptım.
Dosyayı 2 numaralı mesajdan inidrebilirsiniz.

 

[ayhan7tr]

Sayın Evren Bey,
Öncelikle ilginize nasıl teşekkür edeceğimi bilemiyorum.
User formun şablon sayfasında çalışması gerekiyor ben kodlarınızı buna göre düzenliyeyim dedim ama bu seferde liste sayfasında 10 satırdan itibaren yazmaya başlıyor, bir de şablon sayfasında tarih numara olarak gözüküyor eğer imkanınız varsa yeniden düzenliyebilirmisiniz.
Çok teşekkür ederim
Saygılarımla,
Ayhan

 

[Orion1]

Sayın Evren Bey,
Öncelikle ilginize nasıl teşekkür edeceğimi bilemiyorum.
User formun şablon sayfasında çalışması gerekiyor ben kodlarınızı buna göre düzenliyeyim dedim ama bu seferde liste sayfasında 10 satırdan itibaren yazmaya başlıyor, bir de şablon sayfasında tarih numara olarak gözüküyor eğer imkanınız varsa yeniden düzenliyebilirmisiniz.
Çok teşekkür ederim
Saygılarımla,
Ayhan

4 numaralı mesajımı okudunuzmu?