VBA Otomatik Doldurma (Adım Adım Kılavuz) - Excel VBA'da Otomatik Doldurmayı Kullanma Örnekleri

Excel VBA'da Otomatik Doldurma Ne Yapar?

Hücrelerin üstündeki önceki hücrelerdeki değerlere göre otomatik olarak doldurulduğu çalışma sayfasında otomatik doldurma gördük, Excel'in bizim için görevi yerine getirmesi için VBA kullanabiliriz, bunu yapmak için Selection.Autofill yöntemini kullanıyoruz ve hedef, yani değerlerin hangi hücrelere kadar doldurulması gerektiği.

VBA otomatik doldurmanın en iyi kullanımı, ilk hücrenin formülünü sütunun hücresine doldurmamız gerektiğinde ortaya çıkar. Formülü genellikle ilk hücreye uygularız. Ya kopyalayıp son hücreye yapıştırırız ya da küçük ok tuşuna çift tıklayarak otomatik doldururuz. Excel'de otomatik doldurmayı kullanmanın bir başka en iyi örneği, seri numaraları eklememiz gereken zamandır. Genellikle ilk üç sayıyı yazıyoruz; sonra, gerekli son hücreye kadar aşağı sürükleriz.

VBA'da AutoFill yönteminin görevini gerçekleştirebiliriz. Bu yazıda, otomatik doldurma yöntemini nasıl kullanabileceğimizi ve kodu yazmanın yollarını göstereceğiz. Şimdi bu aracı VBA kodlamada nasıl kullanabileceğimizi göreceğiz.

VBA'da Otomatik Doldurma Nasıl Kullanılır?

Otomatik doldurmayı VBA'da kullanmak için, otomatik doldurma yönteminin sözdizimini anlamamız gerekir. Otomatik doldurmanın söz dizimi aşağıdadır.

  • Aralık ("A1"): Dolgu serisinin modelini tanımlayan hücreler nelerdir.
  • Hedef: Dolgu serisi desenine devam etmek istediğiniz hücreye kadar. Burada tüm hücre yelpazesinden bahsetmemiz gerekiyor.
  • XlAutoFillType olarak yazın: Burada seri doldurma türünü seçebiliriz. Aşağıda bu parametredeki öğelerin listesi bulunmaktadır - xlFillCopy, xlFillDays, xlFillDefault, xlFillFormats, xlFillMonths, xlFillSeries, xlFillValues, xlFillWeekdays, xlFillYears, xlFlashFill, xlGrowtharTrend, xl.

Excel VBA'da Otomatik Doldurma Örnekleri

Excel'de VBA Otomatik Doldurmanın bazı basit ve gelişmiş örneklerini görelim.

Örnek 1 - xlFillDefault

İlk olarak, ilk üç hücreye 3 seri numarası girin.

VBA alt prosedüründe, VBA aralığından Aralık ("A1: A3") olarak bahsedin

Kod:

Alt Otomatik Doldurma_Örnek1 () Aralık ("A1: A3"). Sub  

Şimdi Otomatik Doldurma yöntemine erişin.

Hedefi Aralık olarak girin ("A1: A10")

Kod:

Aralık ("A1: A3"). Otomatik Doldurma Hedefi: = Aralık ("A1: A10") 

Türü xlFillDefault olarak seçin .

Kod:

Aralık ("A1: A3"). Otomatik Doldurma Hedefi: = Aralık ("A1: A10"), Tür: = xlFillDefault 

Şimdi kodu çalıştırın, seri numaralarını 1'den 10'a kadar alacağız.

Son hedef hücresinden A10 olarak bahsettiğimiz için orada durdu ve hedef hücreyi excel'in son hücresi olarak girebiliriz.

Örnek 2 - xlFillCopy

Aynı sayılar için, türü xlFillCopy olarak kullanacağız.

Kod:

Alt Otomatik Doldurma_Örnek1 () Aralık ("A1: A3"). Otomatik Doldurma Hedefi: = Aralık ("A1: A10"), Tür: = xlFillCopy Son Alt

Kalan hücrelere ilk üç hücrenin bir kopyası var.

Örnek 3 - xlFillMonths

Bu örnek için ilk 3 ayı ilk 3 hücreye girdim.

Otomatik doldurma türünü xlFillMonths olarak değiştirin.

Kod:

Alt Otomatik Doldurma_Örnek1 () Aralık ("A1: A3"). Otomatik Doldurma Hedefi: = Aralık ("A1: A10"), Tür: = xlFillMonths Son Alt  

Bu ay serisini dolduracak.

Örnek 4 - xlFillFormats

Bu örnek için, sayıları girdim ve bu hücrelere biçimlendirme uyguladım.

Şimdi türü xlFillFormats olarak değiştireceğim .

Kod:

Alt Otomatik Doldurma_Örnek1 () Aralık ("A1: A3"). Otomatik Doldurma Hedefi: = Aralık ("A1: A10"), Tür: = xlFillFormats End Sub  

Bu kodu çalıştırın ve ne olacağını görün.

İlk üç hücrenin biçimlerini sonraki üç hücreye ve tekrar sonraki üç hücreye vb. Doldurmuştur.

Örnek 5 - xlFlashFill

Bu örnek için, aşağıdaki resimde gösterildiği gibi A1 hücresinden A10'a birkaç değer girdim.

Bu listeden sayısal kısmı çıkarmak istiyorum. Excel'e kalıptan bahsetmek için, ilk hücreye ilk hücrenin sayısal kısmını manuel olarak gireceğim.

Şimdi kodu her zamanki gibi yazacağım ve türü xlFlashFill olarak değiştireceğim . Bu sefer B sütun aralığını kullanacağız.

Kod:

Alt Otomatik Doldurma_Örnek1 () Aralık ("B1"). Otomatik Doldurma Hedefi: = Aralık ("B1: B10"), Tür: = xlFlashFill End Sub  

Bu kodu çalıştırırsam aşağıdaki gibi bir sonuç alacağız.

Bu, VBA Otomatik Doldurma yöntemine genel bir bakıştır. Umarım beğenmişsindir.

Bu VBA Otomatik Doldurma Excel Şablonunu buradan indirebilirsiniz - VBA Otomatik Doldurma Excel Şablonu

Ilginç makaleler...