UserForm Üzerinde Dört İşlem

UserForm Üzerinde Dört İşlem isimli kodu kullanarak, Excel VBA ile dört işlemin kolayca yapılmasını sağlayabilirsiniz.

XD Destek İste
Private Sub CommandButton1_Click()
Dim sayı1, sayı2, sonuç As Double
    sayı1 = Val(TextBox1.Text)
    sayı2 = Val(TextBox2.Text)
    If Option1 = True Then sonuç = sayı1 + sayı2
    If Option2 = True Then sonuç = sayı1 - sayı2
    If Option3 = True Then sonuç = sayı1 * sayı2
    If Option4 = True Then sonuç = sayı1 / sayı2
    TextBox3.Text = Str(sonuç)
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ı

Bu kodu, boş bir Excel sayfasına ekleyeceğiniz bir UserForm, üç TextBox, dört OptionButton ve bir CommandButton nesneleri sonrasında kullanabilirsiniz. Kodu UserForm'un kod bölümüne yapıştırmanız yeterli olacaktır

#UserForm Üzerinde Dört İşlem #userform #dört #işlem
50 Farklı Hazır Makro (VBA) Kodu
Sütunlardaki Farkı Renklendirme
Kopyala ve Değer Olarak Yapıştır
MsgBox ile Uyarı Çıkarma Kodu
Son Sütun Numarasını Bulma
Excel Makroları ile Hücreye Saat Ekleme
Tek Hücreyi Kes Kopyala ve Yapıştır
Bir Aralıktaki Maksimum Değeri Renklendirme
Kapanışta Sayfaların Otomatik Olarak Gizlenmesi
Excel Makro Modulü Silme Kodu
Yorumları İçeren Hücreleri Renklendirme
Excel Hücresine Gitme Makrosu
Excel Üzerinden Klasör Açma Kodu
Gizli Sayfaların Bulunması ve Gösterilmesi
56 Renk Kodunu Sıralama
Top 10 Değeri Renklendirme
Makro ile Biçimleri Temizleme
Excel Dosya Arama Yapma Makrosu
Tüm Satırda İşlem Yapan Döngü
Checkbox ile Exceli Kapatıp Açmak
Transparan UserForm Oluşturmak
Sütunu Kes Kopyala ve Yapıştır
Tüm Sütunda İşlem Yapan Döngü
Sütun Genişliğini Ayarla
Son Dolu Satırın Bir Altına Yazdırma
Şeffaf UserForm Oluşturma Kodu
Sütunda Yazılı Olanlardan Sayfa Adı Yapma
Bir Aralıktaki Minimum Değeri Renklendirme
Excel Açılırken Otomatik İşlem Yaptırma
Kopyala ve Biçimleri Yapıştır
Aktif Hücrenin Satır Numarasını Bulma
Hesap Makinesini Açma
Formu Kapatma Makro Kodu
Sağ Tık ile Açılan Menüye Ekleme Yapma
Satırlardaki Farkı Renklendirme
Açılışta İstediğiniz Sayfanın Aktif Edilmesi
Satırı Kes Kopyala ve Yapıştır
Makrolar ile Eliptik Form Oluşturma
Yanıp Sönme Efekti Verme Kodu
Program Başlangıcı Kodları
Seçilmiş Alanı Kes Kopyala ve Yapıştır
Listbox ve Combobox Satır Kaydırma
Açılışta UserForm Nesnesinin Otomatik Gösterilmesi
Excel Kapanırken Otomatik İşlem Yaptırma
Excel Crackleme İşlemi Makrosu
Belirli Kriterlere Sahip Satırları Silme
Excel Hücresini Seçme Makrosu
Dizileri İç İçe Döngüye Eklemek
Makro ile Boş Satırları Silme
Hücrenin Rengini Değiştirme
Bir Çalışma Kitabında Kaç Sayfa Var
Üstteki alanda, Google Reklamları yerine sizin reklamınızın yayınlanmasını ister misiniz?
Reklam vermek istiyorum

Daha önce yorum yapılmamış!

Yazdığınız uzunca Excel formülleri, formül çubuğumuza sığmıyorsa, farenizi formül çubuğunun alt kısmına getirip basılı tutmak suretiyle, aşağı doğru çekerek formül çubuğunuzu genişletebilirsiniz.

Formül alanını büyütme

Formül alanını büyütme

Bu işlemi daha hızlı yapmak için Ctrl + Shift + U kısayolunu kullanabilirsiniz.
Yükleniyor...