Makro ile Hızlı Doldurma

01 Ocak 2021 02 Ocak 2021 1078

Makro ile Hızlı Doldurma isimli kod, Excel sayfasındaki alanların hızlı bir şekilde doldurulmasını sağlayan işlevi görmektedir.

Public Sub Hizli_Doldurma()
Dim alan1 As Range
Dim alan2 As Range

Set alan1 = Sayfa1.Range("A1:A2")
Set alan2 = Sayfa1.Range("A1:A20")

alan1.AutoFill Destination:=alan2
End Sub

Gerekli Adımlar

Kodu çalıştırmanız için aşağıdaki adımları yerine getirmeniz gerekir.

  1. Microsoft Visual Basic for Applications penceresini (Alt + F11) açın.
  2. Project - VBAProject alanının, ekranın sol tarafında görüldüğünden emin olun. Görünmüyorsa, Ctrl + R kısayolu ile hızlıca açın.
  3. Araç çubuklarından Insert -> Module yazısına tıklayın.
  4. Solunda klasör simgesi olan Modules yazısının başındaki + simgesine tıklayın.
  5. Alt kısma eklenecek gelecek olan Module(1) yazısına çift tıklayın.
  6. Üstteki kodu yapıştırın.

Kod Açıklaması

Üstteki kodu boş bir Module içerisine yapıştırıp, A1 ve A2 hücrelerine herhangi bir şeyler yazıyorsunuz ve kodu çalıştırıyorsunuz.

50 Farklı Hazır Makro (VBA) Kodu
Aktif Hücrenin Sütun Numarasını Bulma
Seçilmiş Alanı Kes Kopyala ve Yapıştır
Dizileri İç İçe Döngüye Eklemek
Sütunlardaki Farkı Renklendirme
A Sütunundaki Verileri C Sütununda Sıralama
MsgBox ile Uyarı Çıkarma Kodu
Son Dolu Satırın Bir Altına Yazdırma
Hücre Biçimlendir Yazı Tipi Penceresini Açma
Birden Çok Satır Ekleme
Açık Excel Kitaplarını Yerleştirme
İçinde Bulunduğumuz AY Sayfasının Aktif Edilmesi
Belirli Bir Metne Sahip Hücreleri Vurgulama
Seri Numaralarını Ekleme
Excel Kitabındaki Sayfa Adlarının Listelenmesi
Birleştirilmiş Hücrelerin Başlangıç Bitiş Sütununu Belirleme
Metnin İçinden TC Kimlik Numarasını Ayırma
Formu Kapatma Makro Kodu
Pivot Verilerini Almayı Devre Dışı Bırakma Etkinleştirme
Sütun Genişliğini Ayarla
Makro Çalışırken İmlecin Hareket Etmemesi
A1 Referans Stilini Etkinleştirme
Excel Makroları ile İşlemci Bilgilerini Bulma
Çalışma Sayfaları için Yakınlaştırma Yüzdesini Ayarlama
Belli Sütunlarda Alfabetik Sıralama
Çoklu Bulma ve Karşısındaki Değeri Listeleme
Bilgisayar Bilgilerini Özetleme
ComboBox Nesneleri ile Toplama Yapma
Excel Tam Ekran Yapma
Dizileri Döngüye Eklemek
Negatif Sayıları Poztif Sayıya Çevirme
Sayıların Önündeki Tek Tırnak İşaretini Kaldırma
Makrolar ile Dosyaları Kopyalama
Kullanıcı Adınızı Bulma
UserForm Açılırken Efekt Ekleme
Excel Makroları ile Dosya Silme
Makro Etkinleştirilmeden Sayfalar Görüntülenmesin
Birden Çok Çalışma Sayfası Ekleme
Hedef Aramayı Kullanma
Sağ Tık ile Açılan Menüye Ekleme Yapma
Toplu Satır Silme
Cümle Durumuna Dönüştürme
Veri Giriş Formunu Etkinleştirme
Çalışma Kitabını Kapatırken Otomatik Kaydetme
Seçili Her Satırdan Sonra Bir Satır Ekleme
Kapanışta Sayfaların Otomatik Olarak Gizlenmesi
Tüm Sütunda İşlem Yapan Döngü
Sayfaların Seçilmesini Sağlama
Tekrar Eden Verileri Farklı Sütunda Yazma
Otomatik Sıra Numarası Ekleme
Tüm Çalışma Sayfalarını Tek Adımda Koruma

Daha önce yorum yapılmamış!

Backlink Reklam Bu alanda 50 karakterlik açıklama ile web sitenize ait Backlink Reklam yayınlayabilirsiniz.
Yükleniyor...