Hücredeki Değere Göre Yeni Sayfa Ekleme

20 Nisan 2021 26 Nisan 2021 716

Hücredeki Değere Göre Yeni Sayfa Ekleme kodu, A1 hücresine 1 yazıldığı zaman yeni bir sayfa ekleme işleminin nasıl yapılacağını öğretmektedir.

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address = "$A$1" And Target.Value = 1 Then
Dim sayfa As Worksheet
    Dim önek As String
    Dim sonek As Integer
   
    Set Sayfam = Worksheets.Add
    önek = "Sayfam"
    SonEkim = 1
   
    On Error Resume Next
    Sayfam.Name = önek & sonek
    If Err.Number <> 0 Then
        önek = sonek + 1
        Sayfam.Name = önek & sonek
    End If
    End If
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. Microsoft Excel Objects yazısının solundaki + simgesini tıklayın ve hangi sayfada deneme yapacaksanız, o sayfanın adının üstüne çift tıklayın.
  4. Üstteki kodu yapıştırın.

Kod Açıklaması

Bir sayfanın A1 hücresindeki değer 1 ise, kodlar devreye girer ve yeni bir sayfa ekleme işlevini yerine getirir.

Hazır Dosyayı İndir

Dosyayı indirmek için giriş yapmanız ve VIP Üyelik Paketine sahip olmanız gerekir.
50 Farklı Hazır Makro (VBA) Kodu
Makrolar ile Sonraki Sayfaya Geçmek
Boş Hücreleri Vurgulama
Toplama İşlemi Yapan Kullanıcı Tanımlı Fonksiyon
Birleştirilmiş Hücrelerin Başlangıç Bitiş Sütununu Belirleme
Boşluk Olan Hücreleri Renklendirme
Dolar Okutma Makrosu
Excel Makroları ile Klasör Arama
Formüllü Hücreleri Renklendir
Tüm Boş Çalışma Sayfalarını Silme
Dizileri İç İçe Döngüye Eklemek
Excel Dosya Silme İşlemi Makrosu
Aç Penceresini Açan Makro
Excel Tam Ekran Yapma
Excel Seçenekleri Penceresini Açma
C Klasörüne Sanal Dizin Oluşturma
Özel Sayfaları Yazdırma
Çalışma Kitabının Kaç Kez Açıldığını Öğrenme
Yanıp Sönme Efekti Verme Kodu
Excel Makroları İle Not Defterini Açmak
Alfabenin Harflerini Sayfaya Sıralı Olarak Ekleme
Seçili Aralığa Ait Bilgilerin Listelenmesi
Tek Sütunu Kes Kopyala ve Yapıştır
Excel Makroları ile Hücreye Saat Ekleme
Gizli Sayfaların Bulunması ve Gösterilmesi
Seçili Sütunların Sayısını Bulma
Excel Hücresini Seçme Makrosu
Açık Excel Kitaplarını Yerleştirme
Çalışma Kitabındaki Tüm Çalışma Sayfalarını Koruma
Yanlış Yazılmış Hücreleri Vurgulama
Metin Sarmayı Kaldırma
Excel Dosya Arama Yapma Makrosu
Başka Dosyada Şifreli Userform Oluşturmak
ListBbox ve ComboBox Satır Kaydırma
Sütunlardaki Farkı Renklendirme
Çoklu Bulma ve Karşısındaki Değeri Listeleme
2. Satırdaki Bilgileri Silmek
Gizlenmiş Makro Örnekleri
İçinde Bulunduğumuz Günü Bulma
Excel Satır Silme Kodu
Sayfada Alan Seçme ve Listeleme
Kapanışta Sayfaların Otomatik Olarak Gizlenmesi
UserForm Resize Özelliği Eklemek
Otomatik Olarak Tarih ve Zaman Ekleme
Hücredeki Değişikliklerin Kaydını Tutma
Seçimi Yazdırma
Satır Yüksekliğini Ayarla
Belli Sütunlarda Alfabetik Sıralama
Hücre Biçimlendir Yazı Tipi Penceresini Açma
Hücrenin Rengini Değiştirme
Aktif Hücreye Açıklama Ekleme

Daha önce yorum yapılmamış!

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