Visual basic de bağ yapıştır yapmak için nasıl bir kod girmemiz gerekir

[can042]

Sayın hocalarım excelde bir sayfadaki verileri diğer bir sayfaya geçmesi için bağ yapıştır yapıyorum.Ama buda dosyanın yüklenmesine sebeb oluyor.MB 'ı artıyor.Bunun yerine bir sayfaya formla kayıt yapınca diğer sayfada istediğim hücrelerede aynı kayıtın girmesi için yani exceldeki bağ yapıştırın yerini alacak kodu mümkünse öğretirmisiniz.:yardim:

 

[ouney06]

Kaydı form ile yaptırıyorsan, kayıt esnasında diğer sayfadaki istediğin hücrelere aynı bilgiyi yazdırabilirsin

 

[can042]

yardım

kayıt yaparken diğer sayfaya aynı anda nasıl kayıt yapılacak bunun kodlarını bilmiyorum.Yardım ederseniz sevinirim

 

[Korhan Ayhan]

Selamlar,

Basit olarak aşağıdaki kodu kullanabilirsiniz. Aşağıdaki kod Sayfa1 ve Sayfa2 de A sütunundaki ilk boş hücreye veriyi kaydeder.

Private Sub CommandButton1_Click()
    Sheets("Sayfa1").[A65536].End(3).Offset(1, 0) = TextBox1
    Sheets("Sayfa2").[A65536].End(3).Offset(1, 0) = TextBox1
    MsgBox "KAYIT İŞLEMİ TAMAMLANMIŞTIR.", vbInformation
End Sub

 

[Seyit Tiken]

Örnek kodu kendinize uyarlayınız.

Sub Makro1()
[sayfa1!a1:c1].Copy Destination:=[sayfa2!a6500].End(3).Offset(1)
MsgBox "İşlem Tamam", vbInformation
End Sub

 

[can042]

teşekkürler

Emeğinize ve yardımlarınıza