UserForm Üzerine CommandButton Ekleme

UserForm Üzerine CommandButton Ekleme isimli bu hazır kod ile, bir UserForm nesnesi çalışırken üzerine CommandButton nesnesi ekleyebilirsiniz.

XD Destek İste
Private Sub CommandButton1_Click()
Controls.Add ("Forms.CommandButton.1")
Set F1 = Controls.Add("Forms.CommandButton.1")
With F1
    .Left = 15
    .Top = 125
    .Width = 200
    .Height = 20
    .Caption = "CommandButton"
End With
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 -> UserForm yazısına tıklayın.
  4. Solunda klasör simgesi olan Forms yazısının başındaki + simgesine tıklayın.
  5. Alt kısma eklenecek olan UserForm(1) yazısına çift tıklayın.
  6. Üstteki kodu yapıştırın.

Kod Açıklaması

Bir UserForm nesnesi oluşturun ve üzerine manuel olarak bir CommandButton ekleyin. Daha sonra üstteki kodu UserForm'a ekleyip, manuel olarak eklediğiniz butona bastıktan sonra yeni bir CommandButton nesnesi eklendiğini göreceksiniz.

UserForm Üzerine CommandButton Ekleme

Manuel eklediğimiz CommandButton'a tıklıyoruz ve sonuç:

UserForm Üzerine CommandButton Ekleme

Etiketler

Hazır Dosyayı İndir

  DOSYAYI İNDİR
50 Farklı Hazır Makro (VBA) Kodu
Otomatik Olarak Tarih ve Zaman Ekleme
Çalışma Sayfalarını Ayrı PDF Olarak Kaydetme
Boş Hücrelerin Görünmez Alanını Vurgulama
Seçimi Yazdırma
Seçili Sütunların Sayısını Bulma
Txt Dosyası Oluşturma
Grafiği Görüntü Olarak Yapıştırma
Bağlantılı Resim Ekleme
Şeffaf UserForm Oluşturma Kodu
Bir sayfadaki Veriyi Diğer Sayfaya Aktarma
Metni Tersten Yazdırma
Seri Numaralarını Ekleme
Birleştirilmiş Tüm Hücreleri Ayırma
Sayfadaki Ad Tanımlamaları Silme
Aktif Hücreye Günün Tarihini Yazma
Tüm Çalışma Sayfalarını Gösterme
Boşluk Olan Hücreleri Renklendirme
Açılışta Üç Kere Şifre Hakkı Vermek
Her Kapatma İşleminde Otomatik Olarak Kaydetme
Her Bir Sütundaki Maksimum Değeri Bulma
Excel Makroları ile Dosya Silme
Gizlenmiş Makro Örnekleri
Aktif Hücrenin Üstüne Satır Ekleme
Belirli Kriterlere Sahip Satırları Silme
Excel Kapanırken Otomatik İşlem Yaptırma
Çalışma Sayfalarını Alfabetik Olarak Sıralama
Satır Yüksekliklerini Otomatik Ayarlama
Tüm Boş Çalışma Sayfalarını Silme
Seçili Hücrenin Sütun Harfini Bulma
Makrolar İşlem Yaparken Ekranın Kilitlenmesi
Excel Tam Ekran Yapma
Transparan UserForm Oluşturmak
Dizileri İç İçe Döngüye Eklemek
Sütunları Otomatik Sığdırma
Excel Satır Silme Kodu
Hücrenin Rengini Değiştirme
Seçimdeki Alternatif Satırları Vurgulama
Toplu Satır Silme
Kopyala ve Değer Olarak Yapıştır
Açılışta İstediğiniz Sayfanın Aktif Edilmesi
Belirli Bir Metne Sahip Hücreleri Vurgulama
MsgBox ile Uyarı Çıkarma Kodu
Hoş Geldiniz Mesajı Ekleme
Birleştirilmiş Hücrelerin Başlangıç Bitiş Sütununu Belirleme
Özel Sayfaları Yazdırma
Excel Makroları ile Form Çağırma
Pivot Verilerini Almayı Devre Dışı Bırakma Etkinleştirme
Satır Yüksekliğini Ayarla
Hücre Aralığını Kes Kopyala ve Yapıştır
Excel Makroları ile Dosya Sayısını Bulma
Üstteki alanda, Google Reklamları yerine sizin reklamınızın yayınlanmasını ister misiniz?
Reklam vermek istiyorum

Daha önce yorum yapılmamış!

Excel'de hatalı birşeyler mi yaptınız? Hemen panik olmayın, bunun kolay bir yöntemi var:
Kısayol kullanarak Ctrl + Z tuşlarına birden basarak geri almak işlemini yapabilirsiniz ya da Excel Şerit Menü'nün üstünde ya da altında yer alan Hızlı Erişim Araç çubuğundaki Geri Al simgesini kulllanabilirsiniz.

geri al

Aynı işlemi tekrar ileri almak isterseniz, üstteki resmin hemen yanında yer alan İleri Al simgesi işinizi görecektir.

ileri al
Yükleniyor...