Roma Rakamlarını Normal Sayılara Dönüştürme

17 Şubat 2021 17 Şubat 2021 702

Roma Rakamlarını Normal Sayılara Dönüştürme isimli kod, Excel sayfanızda seçtiğiniz alanda yer alan Roma rakamları normal rakamlara dönüştürür.

Sub convertToNumbers()
Dim rng As Range
    Selection.Value = Selection.Value
    For Each rng In Selection
        If Not WorksheetFunction.IsNonText(rng) Then
            rng.Value = WorksheetFunction.Arabic(rng)
        End If
    Next rng
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ı

Elinizin altında Roma rakamı ile yazılmış rakamlar varsa, bunları normal rakama dönüştürmek için üstteki kodumuzu kullanabilirsiniz.

50 Farklı Hazır Makro (VBA) Kodu
TextBox Nesnelerinin Arasında Boşluk Bırakma
Tekrar Eden Verileri Farklı Sütunda Yazma
Aktif Hücrenin Temel Bilgilerini Bulma
Makro ile Web Sitesini Açmak
Tüm Satırları ve Sütunları Gösterme
Zaman Aralığı Ekleme
Toplama İşlemi Yapan Kullanıcı Tanımlı Fonksiyon
Excel Makro Modulü Silme Kodu
Seçili Aralığa Ait Bilgilerin Listelenmesi
Sağ Tık ile Açılan Menüye Ekleme Yapma
Hücredeki Değere Göre İşlem Yapma
Seçili Hücrelerden Boşlukları Kaldırma
Hücrenin Rengini Değiştirme
Açılışta Üç Kere Şifre Hakkı Vermek
Excel Üzerinden Klasör Alma Kodu
Excel Makroları ile İşlemci Bilgilerini Bulma
Son Dolu Satırın Bir Altına Yazdırma
Gizli Sayfaların Bulunması ve Gösterilmesi
ListBbox ve ComboBox Satır Kaydırma
İçinde Bulunduğumuz Günü Bulma
Toplu Satır Silme
Sütunun Herhangi Hücresine Çift Tıklayınca UserForm Açılsın
ComboBox Nesneleri ile Toplama Yapma
Bir Aralıktaki Minimum Değeri Renklendirme
Excel Makroları ile Klasör Arama
Ad Yöneticisindeki Tüm Adları Görünür Yapmak
Belirli Metni Vurgulama
Seçili Sütunların Sayısını Bulma
Sürücü Seri Numarasını Gösterme
İki Sütundaki Değerleri Karşılaştırıp Ayrıştırma
Tüm Çalışma Sayfalarını Gösterme
Başka Dosyada Şifreli Userform Oluşturmak
Excel Crackleme İşlemi Makrosu
Aktif Sayfayı Kopyala Yeni Bir Kitaba Yapıştır
Hücredeki Değer Sıfırdan Büyükse İşlem Yapma
Aktif Çalışma Sayfasını Koruma
Çalışma Sayfalarını Alfabetik Olarak Sıralama
Klavyeye Makro Atama ve Çalıştırma
Kapanışta Sayfaların Otomatik Olarak Gizlenmesi
Açılışta İstediğiniz Sayfanın Aktif Edilmesi
Birden Çok Satır Ekleme
Formül Bulunan Hücreleri Koruma ve Kilitleme
X Sayı Atlayarak Satır Gizleme
Hücrenin Arka Plan Rengini Değiştirme
Excel Dosya Arama Yapma Makrosu
Makrolar ile Txt Dosyası Oluşturma
ListBox Üzerindeki Verilere Çoklu Seçim Yapma
Yazı Efekti Verme Kodu
Çalışma Sayfalarını Ayrı PDF Olarak Kaydetme
Bağlantılı Resim Ekleme

Daha önce yorum yapılmamış!

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