• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Hücre'yi tanımlamak

Katılım
15 Temmuz 2013
Mesajlar
92
Excel Vers. ve Dili
2016 TR
Sevgili üstat, şunu yapmak istiyoruz; Örneğin "a1" hücresine "Değer Girin" yazısı yazılmalı açık bir renkle.. Tabi biz "a1" hücresine gelip değer girdiğimizde, doğal olarak, o değeri görmek.. Ama "a1" hücresinde değer yokken, yani boşken "Değer Girin" yazısını yada program ile tanımlanan ne ise onu görmek istiyoruz .. Çok teşekkür ederim
 
Sayfa modülüne aşağıdaki kodu yapıştırıp, deneyin ...

Kod:
Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Range("A1")) Is Nothing Then
        If Not IsNumeric(Range("A1")) Then Range("A1") = "Değer Girin"
    End If
End Sub

.
 
İlginiz için teşekkür Sn Haluk bey,
Ama neden olduğunu anlamadım çalışmadı.. yani "değer girin" yazısını göremedim.. Tşekkür
 
Merhaba,
A1 e harf girin göreceksiniz
iyi çalışmalar
 
Aa Evet bu şekil çalışıyor.. Teşekkür..
Eğer mümkün ise a1 hücresi BOŞ iken de görmemiz mümkün müdür?
 
Kod:
Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Range("A1")) Is Nothing Then
        If Not IsNumeric(Range("A1")) Or Range("A1") = Empty Then Range("A1") = "Değer Girin"
    End If
End Sub

.
 
Emeği geçen ve son olarak Haluk hocam, çok teşekkür :)
Sevgi ve Excel ile kalın
 
Geri
Üst