sayfalar arası veri aktarma

[sweetf.t]

meraba arkadaşlar
çok acil yardımınıza ihtiyacım var ekteki toplam stok sayfasındaki kodların karşısına diğer aylarda satılan ürünlerin miktar ve diğer bilgilerinin gelmesini istiyorum.bir haftadır uğaşıyorum yapamadım yarın teslim etmezsem işle ilgili sorun yaşamam çok olası yardımınızı bekliyorum şimdiden ilginiz yardımlarınız için çok teşekkürler

 

[Orion1]

Dosyanız ektedir.

Sub sayfalari_aktar_59()
Dim sh As Worksheet, sat1 As Long, i As Long, sut As Byte, k As Byte, sat2 As Long
Dim j As Long
Sheets("toplam stok").Select
sut = Cells(1, 256).End(xlToLeft).Column
If sut < 6 Then Exit Sub
sat1 = Cells(65536, "D").End(xlUp).Row
If sat1 < 2 Then Exit Sub
Range(Cells(2, "F"), Cells(65536, sut)).ClearContents
Application.ScreenUpdating = False
For j = 2 To sat1
    For k = 6 To sut
        For Each sh In Worksheets
            If CStr(sh.Name) = CStr(Cells(1, k).Value) Then
                sat2 = sh.Cells(65536, "A").End(xlUp).Row
                Cells(j, k).Value = Cells(j, k).Value + _
                WorksheetFunction.SumIf(sh.Range("A2:A" & sat2), _
                Cells(j, "D").Value, sh.Range("E2:E" & sat2))
            End If
        Next sh
    Next k
Next j
Application.ScreenUpdating = True
MsgBox "İşlem tamamdır." & vbLf & _
"evrengizlen@hotmail.com", vbOKOnly + vbInformation, "E V R E N"
        
End Sub

 

[sweetf.t]

evren bey çok teşekkür ederim ama dosya açılmıyo

 

[sweetf.t]

evren bey bu yazdığınız makro sanırım nasıl yapıcağım konusundada yardım edebilirseniz çok sevinirim

 

[Orion1]

evren bey bu yazdığınız makro sanırım nasıl yapıcağım konusundada yardım edebilirseniz çok sevinirim

İlk sayfada koyduğum butona tıklayın.O çalışır.
Başkacada bir numara yok.

 

[sweetf.t]

Evren bey dosya excel formatında deil mi açamıyorum

 

[sweetf.t]

Evren bey bu konuda çok bilgi sahibi değilim kusura bakmayın ve bu ii yapmam benim için hayati önem taşıyo biraz ayrıntılı anlatabilirmisiniz size zahmet olacak biliyorum ama gerçekten çok önemli

 

[Ahmetst.]

Çok Acil

Excel sayfa 1 de B4 deki veriyi sayfa 2 de B3 otomotik olarak aktarmak istiyorum.
Yapmak istediğim Sayfa 1 veriyi girmek sayfa 2 de otomotik olarak görmek...

 

[Excelmy]

Çok Acil

Excel sayfa 1 de B4 deki veriyi sayfa 2 de B3 otomotik olarak aktarmak istiyorum.
Yapmak istediğim Sayfa 1 veriyi girmek sayfa 2 de otomotik olarak görmek...

Sayfa2 B3 hücresne ;

=Sayfa1!B4

 

[Orion1]

Dosya winrar ile sıkıştırılmıştır.
Eğer winrar dosyanız yoksa en kısa sürede bir tane edinseniz iyi olur.
Şimdi dosyayı sıkıştırmadan yolluyorum.

 

[Ahmetst.]

yardım...

Sayfa2!B3'e Sayfa1!B4 yazdığım zaman sadece veriyi alabiliyorum yeterli olmuyor.
Benim İstediğim Sayfa1!B4 yaotığım değişikliğin otomotik olarak Sayfa2!B3 de değişmesi...
yardımıcı olabilirseniz sevinirim...

 

[sweetf.t]

çok teşekkür ederim valla nasılsevap kazandınız anlatamam şimdi ben bunu şirketin stoğuna uygulamak istiyorumda ordaki verileri koyunca çalışşırmı çünkü şirketin dosyasını çıkaramadım bunu ben anlatmak için yapmıştım

 

[Ahmetst.]

yardım

bir sonuca ulaşabilirsem ne mutlu bana

 

[Orion1]

çok teşekkür ederim valla nasılsevap kazandınız anlatamam şimdi ben bunu şirketin stoğuna uygulamak istiyorumda ordaki verileri koyunca çalışşırmı çünkü şirketin dosyasını çıkaramadım bunu ben anlatmak için yapmıştım

Çalışma sayfalrındaki verilerin bulunduğu yerler ayni sütunlarda olmalı ve verilerin başladığı satırda ayni satırda olmalı.
Sayfa isimleride ayni olmalı.
Bu kodları vbe'yi açın ve standart boş bir modül ekleyerek ona yapıştırın.Sonra vbe'yi kapatın.
Tabii makroların çalışabilmesi için güvenlik seviyesini en düşük olarak ayarlamılısınız.
Alt + F8 ile makroyu çağırıp makro pencersinden makroyu seçip çift tıklayarak çalıştırabilirsiniz.
İsterseniz bir buton ekleyerek makroyu butona atayabilirisiniz.

 

[sweetf.t]

Evren bey ellerinize sağlık muhteşem olmuş ama miktarı aktarmıyo o çok önemli nolur size zahmet miktarı aktarmasını yapabilirmisiniz valla şu mübarek günde size nasıl dua ettim bilemezsiniz

 

[Orion1]

Evren bey ellerinize sağlık muhteşem olmuş ama miktarı aktarmıyo o çok önemli nolur size zahmet miktarı aktarmasını yapabilirmisiniz valla şu mübarek günde size nasıl dua ettim bilemezsiniz

İyide miktarı nereye aktaracak.
Sayfanızın üzerinde miktarın aktarılacağı bir yer yok ki.