Sayıyı Çift ya da Çiftin Katı Yapma

24 Şubat 2021 774

Sayıyı Çift ya da Çiftin Katı Yapma isimli kodu kullanarak hücredeki sayıları çift ve katları olacak şekilde kolayca yazdırabilirsiniz.

Sub CifteKatla()
     If Range("A1") Mod (2) = 0 Then Range("A1") = Range("A1") + 2 Else Range("A1") = Range("A1") + 1
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 BuÇalışmaKitabı kısmına çift tıklayın.
  4. Üstteki kodu yapıştırın.
50 Farklı Hazır Makro (VBA) Kodu
Gizlenmiş Makro Örnekleri
Roma Rakamlarını Normal Sayılara Dönüştürme
Formu Kapatma Makro Kodu
Sayıların Önündeki Tek Tırnak İşaretini Kaldırma
Çoklu Bulma ve Karşısındaki Değeri Listeleme
Kopyala ve Biçimleri Yapıştır
Formül Bulunan Hücreleri Koruma ve Kilitleme
Aktif Çalışma Sayfasını Koruma
Makro ile Boş Satırları Silme
56 Koşula Kadar Biçimlendirme Yapma
Çalışma Kitabındaki Tüm Pivot Tabloları Yenileme
Çalışma Kitabının Yedeğini Oluşturma
Program Başlangıcı Kodları
Toplu Sütun Silme
Makrolar ile Eliptik Form Oluşturma
Checkbox ile Exceli Kapatıp Açmak
Tüm Sütunda İşlem Yapan Döngü
Şarta Göre Satır Açma ve Renklendirme
MsgBox ile Uyarı Çıkarma Kodu
X Sayı Atlayarak Satır Gizleme
Seçili Hücrenin Sütun Harfini Bulma
Hücreye Girilen Değerleri Farklı Bir Sayfaya Kaydetme
Sütun Genişliklerini Otomatik Ayarlama
Seçimi Yazdırma
Tüm Satırda İşlem Yapan Döngü
Hücredeki Değer Sıfırdan Büyükse İşlem Yapma
UserForm Nesnesine Otomatik Buton Ekleme
Kapanış Mesajı Ekleme
Seçili Satırların Sayısını Bulma
İçindekiler Tablosu Oluşturma
Zaman Aralığı Ekleme
Aktif Satırı ve Sütunu Vurgulama
UserForm Üzerine CommandButton Ekleme
Çalışma Kitabındaki Tüm Çalışma Sayfalarını Koruma
UserForm Resize Özelliği Eklemek
Bilgisayardaki Sürücü Sayısını Bulma
Tam Dizin İsmini Bulma
Seri Numaralarını Ekleme
Sayfadaki Kelime ve Sayı Adetlerini Bulma
Kare Kökünü Hesaplama
Dördüncü Sütunda İşlem Yapılınca Çalışan Makro
Excel Hücresine Gitme Makrosu
Dizinde Klasör Araması Yapma
Otomatik Olarak Tarih ve Zaman Ekleme
Çalışma Kitabının Adını Tarih Olarak Kaydetme
Çalışma Sayfalarını Tek Adımda Korumasını Kaldırma
Satırları Otomatik Sığdır
Tek Sütunu Kes Kopyala ve Yapıştır
Excel Sayfalarındaki Resimleri Silmek
Şeffaf UserForm Oluşturma Kodu

Daha önce yorum yapılmamış!

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