Soru Hücre taşıma işlemini her sayfa için yapmak

[karakaçan]

İyi akşamlar 44 sayfadan oluşan bir excel dosyam var sayfa bir deki A5 hücresindeki bir değeri E5 hücresine taşımak istiyorum fakat aynı işlemi diğer tüm sayfalarda da yapmasını istiyorum. Bunun kodunu paylaşabilirseniz çok sevinirim. Teşekkürler.

 

[ÖmerFaruk]

Herhangi bir sayfanızda makroyu tetikleyebilirsiniz
Boş bir modüle içine aşağıdaki kodu yapıştırın.

Sub A5leriKopyala()
    Dim Sayfa As Worksheet
    For Each Sayfa In Worksheets
        Sayfa.Range("E5") = Sayfa.Range("A5")
    Next Sayfa
End Sub

 

[karakaçan]

Herhangi bir sayfanızda makroyu tetikleyebilirsiniz
Boş bir modüle içine aşağıdaki kodu yapıştırın.

Sub A5leriKopyala()
    Dim Sayfa As Worksheet
    For Each Sayfa In Worksheets
        Sayfa.Range("E5") = Sayfa.Range("A5")
    Next Sayfa
End Sub

Teşekkür ederim sağ olun.

 

[Merhum İdris SERDAR]

.

Makrosuz.

1. Sayfa adı üstünde sağ klik ile Select All Sheets (tüm sayfalar seçilir)

2. A5 hücresindeki değer, E5 hücresine yazılır. İşlem tamamdır.

.

 

[karakaçan]

.

Makrosuz.

1. Sayfa adı üstünde sağ klik ile Select All Sheets (tüm sayfalar seçilir)

2. A5 hücresindeki değer, E5 hücresine yazılır. İşlem tamamdır.

.

Sağolun çok teşekkür ederim.