VBA ile bir Excel elektronik tablo sütun genişliği nasıl ayarlanır?

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 .