her sayfada bir sonraki sayfanın aynı hücresinin değerinin gelmesi

[manonfire]

merhaba arkadaşlar,

önemli ve acil bir sorum olacak.
ocak şubat mart.... diye isimlendirdiğim sayfalarımda şubat sayfasının K3 hücresi değerini ocak L3 hücresinden alıyor ilk referans hücre ocak L3 .Fakat mart nisan mayıs diye devam eden sayfalarda ocaktan değilde birbirini takip eden sayfalardaki aynı hücrelerden değer almasını istiyorum.

mart ------ şubat K3 ten
nisan ----- mart K3 ten
mayıs ----- nisan K3 ten gibi devam edecek şekilde olması gerekiyor. Bunu hangi fonksiyonla yapabilirim.
Yardımlarınız için şimdiden teşekkürler.

 

[Saban Sertkaya]

Mart sayfasına gidin ilgili hücreye
=Şubat!K3
yazın. Nisan sayfasında ilgili hücreye gelin ve yine
=Mart!K3 yazın gibi...

 

[manonfire]

Evet aynen öyle ama ben her sayfada tek tek elle yazmayayım istiyorum bir sonraki sayfaya taşı kopyala yaparak çalışıyorum hata payını sıfır yapmak için bir sonraki sayfaya otomatik olarak yazabilecek bir formül olursa her yeni sayfa açışımda bir önceki sayfada istediğim değeri yeni sayfamda ki hücremde görmüş olacağım sorunum bu.

 

[manonfire]

Arkadaşlar günaydın soruma cevap verebilecek bir arkadaş üstat yok mu?

 

[Merhum İdris SERDAR]

.

Aşağıdaki KTF'yi kullanabilirsiniz.

Function OncekiSayfa(hcr As Range)

    Dim syfind As Long
    Application.Volatile
    syfind = hcr.Worksheet.Index
    If syfind > 1 Then OncekiSayfa = Worksheets(syfind - 1).Range(hcr.Address)

End Function

'Kullanım:
'=OncekiSayfa(Hücre)

Örneğin Şubat sayfasının L3 hücresine:

=OncekiSayfa(K3)

yazın ve bunu bundan sonraki sayfalara kopyalayın.


.

 

[manonfire]

İdris Bey ilginiz çok teşekkürler. Fakat makro kullanma iznimiz yok ne yazık ki, bu yüzden fonksiyonlarla yapılabilmesi gerekiyor. Mümkünse fonksiyon paylaşımı yapabilirseniz çok sevinirim.