Hücre'ye girilen verileri kısıtlama

[donjuan1905]

Herkese selamlar...

Bir hücreye girilebilecek verileri kısıtlamak istiyorum.

Mesela A1 hücresine "Amerika","İsrail","Almanya","Fransa" dışında hiçbir veri girilemesin.

Yardımcı olursanız sevinirim.

 

[N.Ziya Hiçdurmaz]

Veri doğrulama özelliğini kullanınız

 

[BG]

Merhaba

Herkese selamlar...

Bir hücreye girilebilecek verileri kısıtlamak istiyorum.

Mesela A1 hücresine "Amerika","İsrail","Almanya","Fransa" dışında hiçbir veri girilemesin.

Yardımcı olursanız sevinirim.

A1 hücresini seçip veri/doğrulama/liste yi seçiniz, kaynak alanına Amerika;İsrail;Almanya;Fransa (noktalı virgüllerle) yazınız

 

[donjuan1905]

Yardımlarınız için teşekkürler ama daha fazlasına da ihtiyacım var.

Mesela aynı hücreye 2 seçeneği birden yazdırma gibi bir imkanım varmı. Mesela "Amerika,İsrail" gibi...

 

[N.Ziya Hiçdurmaz]

Yanıt

Private Sub Worksheet_Change(ByVal Target As Range)
Dim BUL As Range
If Intersect(Target, [A1]) Is Nothing Then Exit Sub
Set BUL = Range("G1").Find([A1])
If Not BUL Is Nothing Then
[A1].Select
Else
MsgBox "Uygun veri girmediniz", vbInformation
End If
Set BUL = Nothing
End Sub

 

[BG]

Sayın donjuan1905

alternatif olsun, bir çözümde benden, dosyanız ektedir, iyi çalışmalar dilerim.