Çalışma Sayfalarında VB sisteminde veri alma

[musaagac]

Arkadaşlar ekte göndermiş olduğum excel çalışmamda Sayfa1 de B sutunundaki değerleri Sayfa2 A Sutuna yazacağım. Fakat ben Sayfa2 A sutununa =Sayfa1!B1 gibi değilde Vb de buton oluşturmadan formülü oraya yazma istiyorum.

Ayrıca göndermiş olduğum dosyanın adı DENEME3 aynı şekilde DENEME3 Deki veriyi DENEME4 Sayfa2 C sutununa nasıl aktarabilirim.

 

[İhsan Tank]

Arkadaşlar ekte göndermiş olduğum excel çalışmamda Sayfa1 de B sutunundaki değerleri Sayfa2 A Sutuna yazacağım. Fakat ben Sayfa2 A sutununa =Sayfa1!B1 gibi değilde Vb de buton oluşturmadan formülü oraya yazma istiyorum.

Ayrıca göndermiş olduğum dosyanın adı DENEME3 aynı şekilde DENEME3 Deki veriyi DENEME4 Sayfa2 C sutununa nasıl aktarabilirim.

merhaba
sayfa1'in kod bölümüne

Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("B2:B65536")) Is Nothing Then Exit Sub
Dim ts, trabzonspor
ts = Sheets("Sayfa2").Range("A65536").End(xlUp).Row
trabzonspor = ts + 1
Sheets("Sayfa2").Range("A" & trabzonspor).Value = Target.Text
End Sub

bu kodu yazarak deneyiniz

 

[musaagac]

DENEME3 Çalışma sayfasındaki veriyi Yeni Excel DENEME4 çalışmasındaki Sayfa2 deki C sutununa aktarmak istiyorum

 

[İhsan Tank]

DENEME3 Çalışma sayfasındaki veriyi Yeni Excel DENEME4 çalışmasındaki Sayfa2 deki C sutununa aktarmak istiyorum

bu sorunuz için lütfen tıklayın buradaki örnekler işinize yarar

 

[musaagac]

İstediğim ekte gönderdiğim gibi olmasını istiyorum yardımcı olurmusunuz.

 

[musaagac]

Yardım eden yokmu