+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Excel (https://accesstr.net/forum-microsoft-excel.html)
+--- Forum: Excel Cevaplanmış Soruları (https://accesstr.net/forum-excel-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Hücre boş geçerse mesaj ver (/konu-hucre-bos-gecerse-mesaj-ver.html)
Sayfalar:
1
2
Hücre boş geçerse mesaj ver - ozkovlu29 - 10/08/2016
Merhabalar,
excel de hücre boş geçmek istemediğimiz hücre içeriğini nasıl mesaj verdirebiliriz.
Mesela;
A2 hücresini boş geçmek istemiyoruz. Boş geçince ekrana bi mesaj versin "Lütfen ilgili kısmı boş geçemezsiniz"
Saygılarımla...
Cvp: Hücre boş geçerse mesaj ver - EGE35_m - 11/08/2016
(10/08/2016, 16:50)ozkovlu29 yazdı: Merhabalar,
excel de hücre boş geçmek istemediğimiz hücre içeriğini nasıl mesaj verdirebiliriz.
Mesela;
A2 hücresini boş geçmek istemiyoruz. Boş geçince ekrana bi mesaj versin "Lütfen ilgili kısmı boş geçemezsiniz"
Saygılarımla...
umarım bu kod işinizi görür
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Range("a1").Value = "" Then
MsgBox "A1 Hücresine Değer Girmelisiniz....", vbCritical, ""
Exit Sub
End If
End SubCvp: Hücre boş geçerse mesaj ver - ozkovlu29 - 11/08/2016
(11/08/2016, 01:06)EGE35_m yazdı:(10/08/2016, 16:50)ozkovlu29 yazdı: Merhabalar,
excel de hücre boş geçmek istemediğimiz hücre içeriğini nasıl mesaj verdirebiliriz.
Mesela;
A2 hücresini boş geçmek istemiyoruz. Boş geçince ekrana bi mesaj versin "Lütfen ilgili kısmı boş geçemezsiniz"
Saygılarımla...
umarım bu kod işinizi görür
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Range("a1").Value = "" Then
MsgBox "A1 Hücresine Değer Girmelisiniz....", vbCritical, ""
Exit Sub
End If
End Sub
Cvp: Hücre boş geçerse mesaj ver - ozkovlu29 - 11/08/2016
Tam istediğim gibi, teşekkür ederim.
Cvp: Hücre boş geçerse mesaj ver - atoz112 - 11/08/2016
Sayın ozkovlu29,
sadece bir hatırlatma ve bilgilendirme olması adına,
konularınızda bir katılımcı tarafından yazılmış bir mesajdan ALINTI yapmak istediğinizde lütfen,bütün bir yazıyı olduğu gibi değil aksine SADECE kullanmayı gerekli gördüğünüz kısmını dahil ediniz.teşekkürler.
Bilginize…iyi çalışmalar,saygılar.
Cvp: Hücre boş geçerse mesaj ver - atoz112 - 11/08/2016
Sayın ozkovlu29,
Öncelikle;
Sayın EGE35_m’e konuya katkılarından dolayı hem teşekkürler hem de konulara katılımlarının devamlılık içinde olmasını temenni etmek istiyorum.
Fakat,paylaşılan kod üzerine kısa bir bilgilendirme olması adına şu açıklamanın yapılması uygun görülmüştür.
İlgili kod ile sadece A1 hücresi için geçerli bir uyarı mesajı yazılması söz konusu olacaktır.fakat eğer ki örneğin;A1:A10 hücre aralığında kullanılacak bir alan üzerinde veri girişleri olduğu var sayıldığında bu alan içerisindeki hücrelerin BOŞ olmamasını sağlamak için,kısa süreli imkan nedeni ile ancak geçici bir çözüm olması adına alternatif bir kullanım sağlatmak için,aşağıdaki kodları yine aynı olay yordamı içerisinde kullanmak söz konusu olabilir
Dim a As Integer
For a = 1 To 10
If Range("A" & a).Value = "" Then
MsgBox "A" & a & " hücresine Değer Girmelisiniz....", vbCritical, "BOŞ HÜCRE UYARISI"
Exit Sub
End If
NextBu kodlar ile,yukarıda bahsi yapıldığı üzere,A1 ile A10 hücreleri arasındaki aralığa değer girişlerinin yapılması ve BOŞ geçilmemesi sağlanabilir.
Daha farklı yöntemlerin de olabilmesi muhtemeldir.belki ilerleyen süreç içerisinde harici katılımlar eşliğinde bu çözümlerin sunulması geçerli olabilir.
Bilginize…iyi çalışmalar,saygılar.