Bu örnekte Excel VBA’da tüm satırları ve sütunları nasıl seçeceğinizi öğreneceğiz.
Çalışma sayfanıza bir komut düğmesi yerleştirin ve aşağıdaki kod satırlarını ekleyin:
- Aşağıdaki kod satırı tüm sayfayı seçer.
Cells.Select
Code language: VB.NET (vbnet)
Not: Komut butonumuzu ilk çalışma sayfasına yerleştirdiğimiz için bu kod satırı ilk sayfanın tamamını seçer. Başka bir çalışma sayfasındaki hücreleri seçmek için önce bu sayfayı etkinleştirmeniz gerekir. Örneğin, aşağıdaki kod satırları ikinci çalışma sayfasının tamamını seçer.
Worksheets(2).Activate
Worksheets(2).Cells.Select
Code language: VB.NET (vbnet)
- Aşağıdaki kod satırı üçüncü sütunu seçer.
Columns(3).Select
Code language: VB.NET (vbnet)
- Aşağıdaki kod satırı beşinci satırı seçer.
Rows(5).Select
Code language: VB.NET (vbnet)
- Birden çok satır seçmek için aşağıdaki gibi bir kod satırı ekleyin:
Rows("5:7").Select
Code language: VB.NET (vbnet)
- Birden çok sütun seçmek için aşağıdaki gibi bir kod satırı ekleyin:
Columns("B:E").Select
Code language: VB.NET (vbnet)
- Rows ve Columns özelliklerini Row ve Column özellikleriyle karıştırmamaya dikkat edin. Rows ve Columns özellikleri, bir Range nesnesi döndürür. Row ve Column özellikleri tek bir değer döndürür.
Kod satırı:
MsgBox Cells(4, 2).Row
Code language: VB.NET (vbnet)
Sonuç:
- D5 hücresini seçin. Aşağıdaki kod satırı, etkin hücrenin tüm satırını seçer.
ActiveCell.EntireRow.Select
Code language: VB.NET (vbnet)
- D5 hücresini seçin. Aşağıdaki kod satırı, etkin hücreyi içeren sütunun ikinci hücresine 3 değerini girer.
ActiveCell.EntireColumn.Cells(2).Value = 3
Code language: VB.NET (vbnet)
- D5 hücresini seçin. Aşağıdaki kod satırı, etkin hücreyi içeren satırın altındaki satırın ikinci hücresine 4 değerini girer.
ActiveCell.EntireRow.Offset(1, 0).Cells(2).Value = 4
Code language: VB.NET (vbnet)
Çeşitli Örnekler:
RowHeight:
ColumnWidth:
AutoFit