decimal kontrol Hazır Excel Makroları (VBA) | Excel Programları

Makroyu Kopyala

'Excel Makro (VBA) online eğitimleri için: https://www.excelsizeyeter.com/excelsizeyeter.com/udemy_giris.php adresine tıklayınız. Bir eğitim alana bir eğitim bedavadır. İkinci eğitim olarak Excel, Excel pratik çözümler, finans eğitimleri vb. alabilirsiniz. 
 
Public Function DecControl(KeyAscii As Integer, Text As TextBox, ByVal NOOFDEC As Integer) As Integer
If KeyAscii = 8 Then
    DecControl = KeyAscii
    Exit Function
End If
If NOOFDEC = 0 Then
    If InStr(1, "0123456789-", Chr(KeyAscii)) = 0 Then
        DecControl = 0
        Exit Function
    Else
        DecControl = KeyAscii
        Exit Function
    End If
Else
    If InStr(1, "0123456789.-", Chr(KeyAscii)) = 0 Then
        DecControl = 0
        Exit Function
    End If
End If

If Len(Text) - Text.SelStart > NOOFDEC And Chr(KeyAscii) = "." Then
    DecControl = 0
    Exit Function
End If
If KeyAscii  8 Then
If InStr(1, Text, ".")  0 And Chr(KeyAscii) = "." Then
    DecControl = 0
    Exit Function
End If
Dim pos As Integer
Dim RET As Integer
pos = InStr(1, Text.Text, ".")
If pos = 0 Then
    If InStr(1, "0123456789.-", Chr(KeyAscii)) = 0 Then
        RET = 0
    Else
        RET = KeyAscii
    End If
Else
    'IF AFTER DECIMAL
    If Text.SelStart + 1 > pos Then
        a = Len(Text.Text) - InStr(1, Text, ".")
        If a >= NOOFDEC Then
            RET = 0
        Else
            RET = KeyAscii
        End If
    Else
        RET = KeyAscii
    End If
End If
Else
    RET = KeyAscii
End If
DecControl = RET

End Function

Benzer Sonuçlar
No	Makro Adı
1	decimal kontrol
2	belli sayfada true-false kontrolü
3	excelde kendi eklenti ve fonksiyonlarınızı oluşturun
4	excel operatörleri hk
5	menü çubuğunun silinmesi ve özel bir menünün oluşturulması
6	Negatif İşaretleri Kaldırın: Bu kod, seçimdeki tüm hücreleri kontrol eder ve tüm negatif sayıları pozitif hale getirir. Bir aralık seçin ve bu kodu çalıştırın.
7	Seçimden Çoğaltıcıları Vurgulayın: Bu makro, seçiminizin her bir hücresini kontrol eder ve yinelenen değerleri vurgular. Kodu rengini de değiştirebilirsiniz.
8	yazdırmak için süzme şart olsun 2
9	Yanlış Kelimelerle Hücreleri Vurgulayın: Yazım hatası nedeniyle tüm hücreleri kontrol etmek zorlaşırsa bu kod tam size göre. Seçimdeki her bir hücreyi kontrol eder ve yanlış yazılmış bir kelimenin bulunduğu hücreyi vurgular.
10	Rakamlardan Ondalıkları Kaldırın: Bu kod, seçili aralıktaki rakamların tüm basamaklarını kaldırmanıza yardımcı olur.
11	virgülden sonra sıfır ekleme
12	Excel'de bölgesel ayarların tespiti: ondalık ayırıcı, Gün sembolü ve günü bir mesaj kutusunda görüntüleyen kod, para birimi kodu
13	rakamı / sayıyı İngilizce yazıya çevirmek (Dolar ve cent para birimi şeklinde)
14	Aralıktaki Minimum Değeri vurgulayın: Seçilen tüm hücreleri kontrol eder ve hücrenin Minimum değeriyle vurgulanır.
15	Maksimum Değeri Aralıkta vurgulayın: Seçilen tüm hücreleri kontrol eder ve hücrenin maksimum değeri ile vurgulanır.
16	Büyük Harfe Dönüştür: Hücreleri seçin ve bu kodu çalıştırın. Seçilen aralığın her bir hücresini kontrol eder ve ardından büyük harfli metne dönüştürür.
17	Kare Kök Hesaplama: Bir formül uygulamadan karekök hesaplamak için bu kodu kullanabilirsiniz. seçilen tüm hücreleri kontrol eder ve sayıları kareköre dönüştürür.
18	çalışma kitabındaki son kullanılmış hücre 2
19	Küp Kökünü Hesapla: Bir formül uygulamadan küp kökünü hesaplamak için bu kodu kullanabilirsiniz. Seçilen tüm hücreleri kontrol eder ve sayıları küp köklerine dönüştürür.
20	Negatif Sayıları Vurgulama: Bir hücre aralığı seçin ve bu kodu çalıştırın. Aralığın her hücresini kontrol eder ve negatif bir numaraya sahip olduğunuz tüm hücreleri vurgular.

Benzer Sonuçlar

Makro Adı

decimal kontrol

belli sayfada true-false kontrolü

excelde kendi eklenti ve fonksiyonlarınızı oluşturun

excel operatörleri hk

menü çubuğunun silinmesi ve özel bir menünün oluşturulması

Negatif İşaretleri Kaldırın: Bu kod, seçimdeki tüm hücreleri kontrol eder ve tüm negatif sayıları pozitif hale getirir. Bir aralık seçin ve bu kodu çalıştırın.

Seçimden Çoğaltıcıları Vurgulayın: Bu makro, seçiminizin her bir hücresini kontrol eder ve yinelenen değerleri vurgular. Kodu rengini de değiştirebilirsiniz.

yazdırmak için süzme şart olsun 2

Yanlış Kelimelerle Hücreleri Vurgulayın: Yazım hatası nedeniyle tüm hücreleri kontrol etmek zorlaşırsa bu kod tam size göre. Seçimdeki her bir hücreyi kontrol eder ve yanlış yazılmış bir kelimenin bulunduğu hücreyi vurgular.

Rakamlardan Ondalıkları Kaldırın: Bu kod, seçili aralıktaki rakamların tüm basamaklarını kaldırmanıza yardımcı olur.