CTRL+END ile çalışma alanının sonuna gitme ve sekmelerle ilgili

[modoste]

merhaba sayın hocalarım
yapılacak bir makro ile;

mevcut dosyada yeni bir sekme açılacak, açılan bu sekmede C1 den başlayıp aşağıya doğru sekme adları yazılacak ve karşılarına yani D1 den başlayıp devam eden hücrelere de, her sekmede CTRL+END yapıldığın hangi hücreye gidiliyosa o hücrenin adresi yazılacak (Örneğin AA1230) gibi


başka bilgisayarlardan gelen dosyalar çok geç açılıyo bunu belirlemek için bir yöntem CTRL+END ile en son hangi hücrede işlem yapılmış bunu belirleyip düzeltme konusunu öğrenmişltim. ama onlarca sekmeyi tek tek deneyim bulmaktan zaman aldığından buı soruyu sorma ihtiyacı duydum

 

[Korhan Ayhan]

Deneyiniz.

Option Explicit

Sub All_Sheets_Last_Cell_Addres()
    Dim Sh As Worksheet, S1 As Worksheet, No As Long
    
    Set S1 = Sheets.Add
    
    For Each Sh In ThisWorkbook.Worksheets
        If Sh.Name <> S1.Name Then
            No = No + 1
            S1.Cells(No, 3) = Sh.Name
            S1.Cells(No, 4) = Sh.Cells.SpecialCells(xlCellTypeLastCell).Address
        End If
    Next
    
    Set S1 = Nothing
    
    MsgBox "Sayfalardaki son hücre adresleri listelenmiştir.", vbInformation
End Sub

 

[zaruri]

ctrl + end tuşu ile işlem olan en son satıra gidiliyor.
işlem yapılıp sonra silinmiş satırlara sahip bir sayfanın
Şimdi son dolu veya işlem olan satırının G85 olduğu halde,

ctrl + end ile DK3859 satıra gitmesini nasıl engelleriz.
Ayrıca Bazı dosyalar yavaş açılıyor, bu satırlarıda kontrol ediyor anlamına gelebirlir kaygısı ile soruyorum.
ilginize teşekkür ederim

 

[Korhan Ayhan]

Bir hücreye veri girişi yaptığınızda artık bu hücre kirli (dirty) olarak anılır. Sonrasında Temizle (Clear) ile temizleseniz dahi excel bunu kullanılmış hücre olarak algılar.

Bunun önüne geçmek için ilgili hücreye ait satırı ya da sütunu DELETE ile sildikten sonra dosyanızı kayıt ederseniz sorun ortadan kalkacaktır. Bu durumda CTRL+END tuşlarına bastığınızda gerçekten son hücre seçilecektir.

 

[zaruri]

Hocam ilginize teşekkür ederim, Bütün temizlik araçlarını kullanmama rağmen düzelmemesi, üzerine;
Tavsiyenizi sakin bir şekilde Uygulayıp, sonra, A1 de sabitlenerek dosyayı kaydettiğimde, sildiğim nokta, sayfa sonu oldu.

Tekrar Teşekkür eder esenlikler dilerim.

 

[modoste]

Korhan Hocam 4 nolu mesajınızdaki çözümü bende uyguladım ama değişen birşey olmadı
20 sekmeden oluşan bir dosyada FK-01 sekmesinde CTRL+ÊND yapınca BO7996 ya gidiyori ama asıl gitmesi gereken yer BO1400 gibi tablom en son orda bitiyo, ama 4 nolu mesajınızı denesemde bir sonuç alamadım

 

[Korhan Ayhan]

#4 nolu mesajımdaki işlemi uyguladıktan sonra dosyayı kayıt ettiniz mi?

 

[modoste]

sorun çözüldü hocam 4 nolu mesajınızı tekrar denedim, bi an için satır seçiliyken satırı silmeyip klavyeden delete yapmışım, o hatayı düzelttim işlem tamam teşekkürler.
Hocam dosya açık haldeyken çalışırken kaç mb olduğunu bulabilmenin yolu var mı (kapatıp sağ tıkla özellikler yapmadan), bazen bir şekil ekliyorz acaba boyut çok arttı mı diye kontrol için devamlı kapat ve özelliklere bakmadan çözüm var mı

 

[Korhan Ayhan]

DOSYA-BİLGİ seçeneğine tıkladığınızda dosyanızla ilgili bilgilere erişebilirsiniz. (Güncel boyut için işlemden sonra dosyanızı kayıt etmeniz gerekecektir.)

Kod ile öğrenmek için linkleri inceleyiniz.

Arama Sonuçları

 

[modoste]

dosya bilgi seçeneğinde bu sorumun cevabı varmış evet bir bilgi daha öğrendim.
çok teşekkürler Hocam

 

[Korhan Ayhan]

Boş kaldıkça excelin menülerini kurcalamak gerekiyor. Bu sayede birçok yeni özelliği keşfedebilirsiniz.

 

[modoste]

şu an excel 2021 kullanmaktayım birçok yeni formülümüz var ama
maalesef ben yine eski formüllerle çalışmak zorunda kalıyorum, dosyalarımı gönderdiğim patronlarım arkadaşlarım eski versiyonlar kullandığından yeni formüllü bir kesim eski versiyonda hata olarak gözüküyor bundan dolayı mağdurluk var
bu konuda sayın hocalarım ne der acaba

 

[Erkan Akayay]

Onlarda sorun çıkaran formülü kullanmayacaksınız. Onların versiyonuna uygun formül kullanacaksınız.