Güncelleme: Ağustos 2021; Excel 365, 2019, 2016'da çalışır.
Bugünün Excel otomasyon eğitiminde, bir çalışma sayfası sütununun genişliğini gerektiği gibi hızlı bir şekilde nasıl değiştireceğimizi öğreneceğiz - ancak VBA (Visual Basic for Applications) kullanarak programlı olarak.
Önkoşullar
VBA kodu yazmak için öncelikle geliştirici sekmenizin etkinleştirildiğinden emin olmanız gerekir. Prosedürden emin değilseniz, ayrıntılı prosedürümüze baktığınızdan emin olun .
- Windows bilgisayarınızda Microsoft Excel'i açın .
- Ana Şeritte Geliştirici'ye basın .
- Visual Basic Komutuna basın . Bu, VBA Düzenleyicisini açacaktır .
- Sol taraftaki proje gezgininde, kodunuzu ekleyeceğiniz belirli bir sayfayı vurgulayın. Alternatif olarak, yeni bir modül ekleyebilir veya kodumuzu mevcut bir VBA modülüne ekleyebilirsiniz.

Bir sütun genişliğini ayarlama
Bu örnekte, aktif Çalışma Sayfasında bir sütun seçeceğiz ve buna göre değiştireceğiz.
- VBA Düzenleyicisini kullanarak, aşağıdaki kodu çalışma sayfanıza veya modülünüze kopyalayın.
Sub Set_Column_Width()
Dim MySheet As Worksheet
Set MySheet = ActiveSheet
' Select one or multiple columns, set your column width as needed
With MySheet.Columns("B")
.ColumnWidth = 50
End With
End Sub
- F5'e basarak kodunuzu çalıştırın veya Çalıştır >> Alt Çalıştır veya Form'u seçin.
- Dosya >> Kaydet'e veya Disk simgesine basarak çalışmanızı kaydedin.
Birden çok sütun aralığının genişliğini değiştirme
Bu örnekte bir dizi sütun seçiyoruz ve ardından genişliği değiştiriyoruz.
Kodu, önceki bölümde açıklananla aynı şekilde uygulayabilirsiniz.
Sub Set_Column_Range_Width()
Dim MySheet As Worksheet
Set MySheet = ActiveSheet
' Set your column width as needed
With MySheet.Range("A:F")
.ColumnWidth = .ColumnWidth * 1.5
End With
End Sub
Sonraki adımlar
VBA ile mi başlıyorsunuz? Excel kılavuzu için VBA temellerini incelediğinizden emin olun .