Makro ile Hızlı Doldurma

01 Ocak 2021 02 Ocak 2021 935

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
Sendkey Yöntemi ile F Q Klavye Dönüşümü
Sayıların Önündeki Tek Tırnak İşaretini Kaldırma
Program Başlangıcı Kodları
Makro ile Dosya Açma
Seri Numaralarını Ekleme
Sayfadaki Ad Tanımlamaları Silme
MsgBox ile Uyarı Çıkarma Kodu
UserForm Üzerine CommandButton Ekleme
Aktif Hücrenin İçeriği Hakkında Bilgi Verme
Çalışma Kitabındaki Tüm Pivot Tabloları Yenileme
Tüm Satırları ve Sütunları Gösterme
Txt Dosyası Oluşturma
Çalışma Kitabının Yedeğini Oluşturma
Roma Rakamlarını Normal Sayılara Dönüştürme
Belirli Bir Metne Sahip Hücreleri Vurgulama
Makrolar ile Dosyaları Kopyalama
Seçimi Yazdırma
Negatif Sayıları Vurgulama
Kapanışta Sayfaların Otomatik Olarak Gizlenmesi
Çalışma Sayfasını Kaydetme
Checkbox ile Exceli Kapatıp Açmak
Çalışma Sayfalarını Tek Adımda Korumasını Kaldırma
Makro ile Hızlı Doldurma
Seçili Sütunların Sayısını Bulma
Aktif Çalışma Sayfası Dışında Tümünü Silme
Ad Yöneticisindeki Tüm Adları Görünür Yapmak
Seçilmiş Alanı Kes Kopyala ve Yapıştır
Özet Tablo Aralığını Otomatik Güncelleştirme
Ondalık Sayıları Tam Sayıya Çevirme
TextBox Nesnelerinin Arasında Boşluk Bırakma
Birden Çok Çalışma Sayfası Ekleme
Tüm Çalışma Sayfalarını Tek Adımda Koruma
Belli Sütunlarda Alfabetik Sıralama
Birden Çok Sütun Ekleme
Etkin Sayfa Hariç Çalışma Sayfalarını Gizleme
Excel Seçenekleri Penceresini Açma
Ekran Çözünürlüğünü Bulma
PDF Dosyalarını Birleştirme
Yanıp Sönme Efekti Verme Kodu
Satır Yüksekliklerini Otomatik Ayarlama
Aç Penceresini Açan Makro
Makrolar ile Klasör Oluşturma
Hücre İçerisine Kelime Ekleme
Metinden Konuşma Oluşturma
Çift Satırlı Msgbox Örneği
Formüllü Hücreleri Renklendir
Yazı Efekti Verme Kodu
Sağ Tık ile Açılan Menüye Ekleme Yapma
Bir Kitaptaki Sayfaları Başka Kitaba Taşıma
UserForm Kapatma Kodu

Daha önce yorum yapılmamış!

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