• DİKKAT

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

Hücrenin solundaki hücre boş ise veri girilemesin..

Katılım
10 Eylül 2009
Mesajlar
288
Excel Vers. ve Dili
2003 Türkçe
İyi akşamlar herkese öncelikle..
Benim şöyle bir sorunum var. B7 hücresine veri girilebilmesi için solundaki yani A7 hücresine veri girişi yapılmış olmasını nasıl sağlayabilirim. Yani B7 hücresine veri girdiğimde A7 boş ise uyarı versin A7 boş diye..
 
Teşekkürler Fedeal Bey ancak ben excelde yeni olduğum için verdiğiniz kodu geliştiremiyorum. Ben komple A sütunu boş ise B sütunu için ve C sütunu boş ise D sütunu için bu uyarıyı verdirmek istiyorum, ilginiz için teşekkür ederim. Bu arada nasip olursa yarın bende altın üye olacağım, o kadar bilgi ediniyoruz. Benimde bir katkım olsun siteye. İyi geceler diliyorum.

Birde çalışma kitabımda bir çok sayfa var bu kodu ilgili sayfasının kod sayfasınamı yapıştırmamız gerekiyor..
 
Birde çalışma kitabımda bir çok sayfa var bu kodu ilgili sayfasının kod sayfasınamı yapıştırmamız gerekiyor..
Evet ilgili sayfanın kod bölümüne yapıştırırsanız işinizi görür alttaki kodu yapştırın.

Kod:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Intersect(Target, [b1:b65000]) Is Nothing Then GoTo atla
If ActiveCell.Offset(0, -1).Value = "" Then
MsgBox "A" & ActiveCell.Row & " HÜCRESİ DOLU OLMALI", , "EXCEL.WEB"
ActiveCell.Offset(0, -1).Select
End If
atla:
If Intersect(Target, [d1:d65000]) Is Nothing Then Exit Sub
If ActiveCell.Offset(0, -1).Value = "" Then
MsgBox "c" & ActiveCell.Row & " HÜCRESİ DOLU OLMALI", , "EXCEL.WEB"
ActiveCell.Offset(0, -1).Select
End If
End Sub
 
Emrah bey çok teşekkür ederim. Kodunuz tam ve sorunsuz olarak çalıştı. Ellerinize ve emeğinize sağlık..
 
Ricaederim iyi çalışmalar.
 
Geri
Üst