Çözüldü excel çalışma kitabındaki tüm sayfalarda son dolu hücrenin bir altını seçtirme

[dodopali41]

Merhaba,
Forumda baktım aradım fakat bulamadım ya da göremedim eğer bununla ilgili konu varsa yetkililer silebilirler.
Sorum şu; Tüm çalışma kitabındaki çalışma sayfalarında- sonradan eklenecek sayfa bile olsa- tek makro ile bu sayfalardaki son dolu hücrenin altındaki boş hücreyi seçtirmek istiyorum. Örneğin her sayfada 1.sutündaki son dolu hücrenin altındaki ilk boş hücre gibi - A sütununda boşluklar olabilir en alttaki son dolu hücrenin altındaki boş hücre seçilecek- şimdiden teşekkürler.

" For Each ile denemeler yaptım ama bir yerde sorun oluşuyor çözemedim."

 

[N.Ziya Hiçdurmaz]

Merhaba; bu şekil deneyebilirsiniz.

Sub test()
For i = Sheets.Count To 1 Step -1
son = Sheets(i).UsedRange.Rows(Sheets(i).UsedRange.Rows.Count).Row
Sheets(i).Select
Cells(son, "a").Select
Next
End Sub

 

[dodopali41]

Merhaba; bu şekil deneyebilirsiniz.

Sub test()
For i = Sheets.Count To 1 Step -1
son = Sheets(i).UsedRange.Rows(Sheets(i).UsedRange.Rows.Count).Row + 1
Sheets(i).Select
Cells(son, "a").Select
Next
End Sub

teşekkür ederim sizin kodunuzda Row + 1 yaptım oldu elinize sağlık