Aktif Hücrenin Üstüne Satır Ekleme

28 Ocak 2021 476

Aktif Hücrenin Üstüne Satır Ekleme isimli kod, seçili olan hücrenin hemen üzerine bir satır ekler ve eklenen satırdaki aktif hücreye günün tarihini yazar

Dim Hücre As Range
Sub ÜstüneSatırEkle()

On Error Resume Next
Set Hücre = ActiveCell
Hücre.Rows("1:1").EntireRow.Insert Shift:=xlDown
Hücre.Offset(-1, 0).Value = Date
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ı

Vba ile satır eklemenin nasıl yapılması gerektiğini araştıranlar için yol gösterici faydalı bir kod örneğidir. Eklenen hücre fark edilsin diye günün tarihinin otomatik getirilmesi seçeneği eklenmiştir. Gerek görmeyenler bu satırı kaldırabilir.

50 Farklı Hazır Makro (VBA) Kodu
TextBox Nesnesinde Kuruş Göstermek
Tüm Satırda İşlem Yapan Döngü
Makro Çalışırken İmlecin Hareket Etmemesini Sağlama
Kare Kökünü Hesaplama
Satır Yüksekliğini Ayarla
Yorumları Yazdırma
Excel Makroları ile İşlemci Bilgilerini Bulma
56 Renk Kodunu Sıralama
Kilitlenmemiş Hücreleri Seçme İşlemi
Dolar Okutma Makrosu
Dizileri İç İçe Döngüye Eklemek
Excel Üzerinden Klasör Alma Kodu
Makro ile Git Penceresini Açma
Açık Olan Tüm Excel Sayfalarını Kayıt Ederek Kapatma
Makrolar ile Sonraki Sayfaya Geçmek
Makro Etkinletirilmezse Sayfalar Gizlenir
Aktif Satırı ve Sütunu Vurgulama
Aktif Hücrenin Sütun Numarasını Bulma
Makrolar ile Klasör Silme
Tüm Çalışma Sayfalarını Tek Adımda Koruma
Excel Açılırken Otomatik İşlem Yaptırma
Excel Şerit Menü Çubuğunu Gizleme
UserForm Açılırken Efekt Ekleme
Makro ile Hızlı Doldurma
Aktif Çalışma Sayfası Dışında Tümünü Silme
Sürücü Seri Numarasını Gösterme
Adlandırılmış Aralıkları Vurgulama
Formül Bulunan Hücreleri Koruma ve Kilitleme
Metnin İçinden TC Kimlik Numarasını Ayırma
Excel Makroları ile Hücreye Saat Ekleme
Zaman Aralığı Ekleme
Excel Kapanırken Otomatik İşlem Yaptırma
2. Derece Denklemin Grafiğini Çizmek
Sayıyı Çift ya da Çiftin Katı Yapma
ComboBox Nesneleri ile Toplama Yapma
Alarmlı Saat Ekleme Kodu
Excel Menüsüne Ekleme Yapma Kodu
Tam Dizin İsmini Bulma
Makro ile Açılan Liste Oluşturma
Excel Hücrelerini Çözme
Excel Makroları ile Klasör Silme
Kaydedilmemiş Açık Çalışma Kitaplarını Sayma
Bir Aralıktaki Minimum Değeri Renklendirme
Tarih ve Saatten Saati Kaldırma
Otomatik Sıra Numarası Ekleme
Excel Makro ile Hücreye Veri Yazma
Program Başlangıcı Kodları
Aktif Çalışma Sayfasını Koruma
Excel Seçenekleri Penceresini Açma
Excel Sayfalarındaki Resimleri Silmek

Daha önce yorum yapılmamış!

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