Makro ile Hızlı Doldurma

01 Ocak 2021 02 Ocak 2021 1029

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 Çalışma Sayfasını Koruma
Satırı Kes Kopyala ve Yapıştır
Çoklu Bulma ve Karşısındaki Değeri Listeleme
Yorumları Yazdırma
Grafik Türünü Değiştirme
Hücredeki Değişikliklerin Kaydını Tutma
Bir sayfadaki Veriyi Diğer Sayfaya Aktarma
Salt Okunur Excel Dosyasını Kontrol Etme
Ondalık Sayıları Tam Sayıya Çevirme
Seçili Hücrelerdeki Harfleri Büyük Harfe Değiştirme
Bir Dizeden Sayısal Veriler Elde Etme
Veri Giriş Formunu Etkinleştirme
Hücre Aralığını Görüntüye Dönüştürme
Her Bir Sütundaki Maksimum Değeri Bulma
Makrolar ile Klasör Oluşturma
Sütun Genişliğini Ayarla
Makro ile Açılan Liste Oluşturma
TextBox Nesnelerinin Arasında Boşluk Bırakma
Metin Sarmayı Kaldırma
Excel Makroları İle Not Defterini Açmak
Tüm Çalışma Sayfalarını Tek Adımda Koruma
Kullanıcı Adınızı Bulma
Klavyeye Makro Atama ve Çalıştırma
Excel Hücresine Gitme Makrosu
İlk ve Son Hücre Arasındaki Satır Sayısı
Bir Aralığa Alfabenin Harflerini Ekleme
UserForm Nesnesine Otomatik Buton Ekleme
Excel Seçenekleri Penceresini Açma
56 Koşula Kadar Biçimlendirme Yapma
Çalışma Kitabının Yedeğini Oluşturma
Aktif Hücreye Açıklama Ekleme
ListBox Üzerindeki Verilere Çoklu Seçim Yapma
UserForm Üzerinde Dört İşlem
Açılışta UserForm Nesnesinin Otomatik Gösterilmesi
Çalışma Kitabını Kapatırken Otomatik Kaydetme
Aktif Hücreye Günün Tarihini Yazma
Toplu Satır Silme
Son Satır Numarasını Bulma
Makro ile Klasör Açma
Sayfadaki Kelime ve Sayı Adetlerini Bulma
Belirli Kriterlere Sahip Satırları Silme
Tekrar Eden Verileri Farklı Sütunda Yazma
Kapanış Mesajı Ekleme
Açılışta Üç Kere Şifre Hakkı Vermek
Tarih ve Saatten Tarihi Kaldırma
Sayıyı Çift ya da Çiftin Katı Yapma
Otomatik Sıra Numarası Ekleme
Sütunlardaki Farkı Renklendirme
56 Renk Kodunu Sıralama
Negatif Sayıları Vurgulama

Daha önce yorum yapılmamış!

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