renkli hücreye sadece rakam girme: msgbox 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. 
 
Aşağıdaki kodu aktif sayfaya yapıştırınız
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
    Dim myRange As Range
    Dim intLowerlimit As Integer
    Dim intUpperlimit As Integer
    
    Set myRange = Range("A2:B5,D6:E8")  ' Sınırları yazın
    intLowerlimit = 1            ' istediğiniz alt limit
    intUpperlimit = 8            ' istediğiniz ust limit
    
    If Not Intersect(Target, myRange) Is Nothing Then
      If Not IsNumeric(Target.Value) Then
        MsgBox ("Sadece rakam girebilirsiniz!")
        Cells(Target.Row, 6).Value = "Rakam değil!"
        Cells(Target.Row, 6).Font.Color = RGB(255, 0, 0)
      ElseIf Not (Target.Value / 1 = Target.Value  1) Then
        MsgBox ("Geçerli değil")
        Cells(Target.Row, 6).Value = "Dogru degil"
        Cells(Target.Row, 6).Font.Color = RGB(255, 0, 0)
      ElseIf Target.Value  intUpperlimit Then
        MsgBox ("Sayı ust limitten fazla! " _
              & intLowerlimit & " and " & intUpperlimit)
        Cells(Target.Row, 6).Value = "Sayı limit değeri ustunde!"
        Cells(Target.Row, 6).Font.Color = RGB(255, 0, 0)
      Else
        Cells(Target.Row, 6).Value = "Dogru"
        Cells(Target.Row, 6).Font.Color = RGB(0, 255, 0)
      End If
    End If
End Sub

Benzer Sonuçlar
No	Makro Adı
1	renkli hücreye sadece rakam girme: msgbox
2	textboxa sadece rakam girme
3	textboxa sadece rakam girme-karakter sınırlı-boş geçemez
4	userformun code bölümüne yapıştır,textboxları çoğaltabilirsin
5	kırmızı renkli sayıyı seç g12 ye yazsın
6	sütunu seç kırmızı renkli rakamları a1 e toplasın
7	Sadece belli bir hücre rengine sahip olan hücrelerin toplamını hesaplamak
8	renkli hücreleri toplama / sayma (İstediğim renkte kaç tane hücre var)
9	sadece a1 hücresinin yazdırılması
10	Özel Sayfaları Yazdır: Yazdırma seçeneklerinden ayarı kullanmak yerine, bu kodu, özel sayfa aralığı yazdırmak için kullanabilirsiniz. 5 ila 10 arasındaki sayfaları yazdırmak istediğinizi varsayalım. Sadece bu VBA kodunu çalıştırmanız ve başlangıç sayfası ve bitiş sayfasını girmeniz yeterlidir.
11	renkli hücreye şifreli giriş (sarı)
12	rakamı yazıya çevirme makrosu
13	herhangi bir form üzerindeki metin kutusuna girilecek karakter sayısını sınırlandırma
14	iki hücrenin formül sonucu farklı olduğu zaman msgbox
15	a1 hücresi boşsa kaydetme
16	kayıt engelenebilir mi?
17	sayfada sadece formüllü hücreleri kilitler diğerleri açık kalır
18	hücre değiştirilemez uyarısı, diğer hücreye yönlendirme
19	textboxa sadece nokta veya virgül girmek
20	sadece harf veya rakam girme

Benzer Sonuçlar

Makro Adı

renkli hücreye sadece rakam girme: msgbox

textboxa sadece rakam girme

textboxa sadece rakam girme-karakter sınırlı-boş geçemez

userformun code bölümüne yapıştır,textboxları çoğaltabilirsin

kırmızı renkli sayıyı seç g12 ye yazsın

sütunu seç kırmızı renkli rakamları a1 e toplasın

Sadece belli bir hücre rengine sahip olan hücrelerin toplamını hesaplamak

renkli hücreleri toplama / sayma (İstediğim renkte kaç tane hücre var)

sadece a1 hücresinin yazdırılması

Özel Sayfaları Yazdır: Yazdırma seçeneklerinden ayarı kullanmak yerine, bu kodu, özel sayfa aralığı yazdırmak için kullanabilirsiniz. 5 ila 10 arasındaki sayfaları yazdırmak istediğinizi varsayalım. Sadece bu VBA kodunu çalıştırmanız ve başlangıç sayfası ve bitiş sayfasını girmeniz yeterlidir.