Excel Sayfasında Son Satıra Gitmek İçin VBA Nasıl Kullanılır

Microsoft Excel'in en güzel yanlarından biri de kullanışlı işlevleri otomatikleştirme yeteneğidir. Bir işletme e-tablosu yüzlerce hatta binlerce satır içerdiğinde, hücreleri arasında manevra yapmak zor olabilir. Kendi arama fonksiyonunuzu oluşturarak bu sorunu giderin. Birkaç kod satırı kullanarak, bir e-tablodaki son satırı bulan ve otomatik olarak giden bir VBA Sub oluşturabilirsiniz.

1.

Excel'i başlatın ve birden çok sütun içeren bir elektronik tablo açın.

2.

“Visual Basic” editörünü açmak için “Alt-F11” e basın ve “Ekle | Modül. ”VBA, Proje penceresine yeni bir modül ekler.

3.

Aşağıdaki kodu Proje penceresinin sağında görünen düzenleme penceresine yapıştırın:

Alt SelectLastRow () Dim finalRow Olarak Tam Sayı

finalRow = ActiveSheet.UsedRange.Rows.Count

Eğer finalRow = 0 ise finalRow = 1 ise

Satırlar (finalRow)

Bu Sub, satır koleksiyonunun Count özelliğini inceleyerek e-tablonun son satırını belirler. Sub, bu değeri finalRow değişkeninde saklar. Sub'un son ifadesi finalRow'un değerini VBA Select yöntemine iletir.

4.

Sub'u çalıştırmak için “F5” e basın. Seçme yöntemi, elektronik tablonun son satırını bulur, o satıra gider ve onu vurgular.

Bahşiş

• Satırlar (finalRow) .Select komutu, bir elektronik tablodaki herhangi bir satıra atlamak için kullanışlıdır. FinalRow'un değerini 1 gibi başka bir değere ayarlarsanız, Seçim komutu çalıştığında o satıra gidecektir.