sütuna üç seçenekten biri girilebilsin

Katılım
13 Ocak 2005
Mesajlar
212
arkadaşlar kolay gelsin.
c sütununa sadece E H V tuşları yazılabilsin. yani sadece bu üç harften bir tanesi girilebilsin. başka birşey girilemesin. bunu nasıl yapabilirim.
şimdiden teşekkür ederim.
 

muygun

Özel Üye
Katılım
6 Temmuz 2004
Mesajlar
9,181
Excel Vers. ve Dili
Excel-2003 Türkçe
Slm
C1 hücresini seçin
Veri/Doğrulama Özel de formül kısmına
=EĞER(YADA(C1="e";C1="h";C1="v");DOĞRU;YANLIŞ)
yazın ve Tamam.
Hücreyi aşağı doğru istediğiniz kadar kopyalayın.
 
Son düzenleme:
Katılım
22 Mart 2005
Mesajlar
847
Excel Vers. ve Dili
Excel-2003 TR.
Altın Üyelik Bitiş Tarihi
29-06-2023
Merhaba;

Konuya ilişkin açıklamalı örnek dosya ekte.
 
Katılım
13 Ocak 2005
Mesajlar
212
arkadaşlar öncelikle teşekkür ederim.
peki c, e, g ve j hücrelerine girilen E değerinin 0'a H değerinin 1'e V değerinin ise 2'ye dönüşmesini istiyorum. bunu nasıl yapabilirim acaba.
 
Katılım
22 Mart 2005
Mesajlar
847
Excel Vers. ve Dili
Excel-2003 TR.
Altın Üyelik Bitiş Tarihi
29-06-2023
Merhaba;
Ne yapmak istediğine dair örnek bi dosya eklersen onun üzerinde çalşabiliriz.
 
Katılım
23 Ocak 2007
Mesajlar
5
Excel Vers. ve Dili
excel 2003 Türkçe
"leventer" arkadaş öncelikle çalışmalarında başarılar. Bir hücrenin üzerine gelince açılır liste ve yanında komut düğmesi uygulaması nasıl yapılıyor.(Yukarıda yapmış olduğun çalışmada da var) Malum acemilik. Bir de DÜŞEYARA ile görüntülenen bir hücredeki rakam (örn. 1) değereni "EĞER" ile nasıl "X" şeklinde görüntüleyebilirim. Kolay gelsin.
 
Katılım
13 Ocak 2005
Mesajlar
212
aslında klavyeden ardı ardına hızlıca giriş yapılırken E H V tuşlarına basmak zor oluyor ve zaman alıyor. bunun yerine sağ taraftaki tuşlardan daha hızlı giriş yapabilmek için 0 tuşuna basınca otomatik olarak E'ye; 1 tuşuna basınca otomatik olarak H'ye; 2 tuşuna basınca otomatik olarak V ye dönüşsün istemiştim.
 

Ali

Uzman
Katılım
21 Temmuz 2005
Mesajlar
7,897
Excel Vers. ve Dili
İş:Excel 2016-Türkçe
İlgili sayfanız sayfa sekmesini sağ tuş ile tıklayıp kod görüntüle kısmını seçtikten sonra VBA'ya aşağı kodları yapıştırın.

Kod:
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [C:C]) Is Nothing Then Exit Sub
Select Case Target
Case "0": Target.Value = "E"
Case "1": Target.Value = "H"
Case "2": Target.Value = "V"
End Select
End Sub
 
Katılım
13 Ocak 2005
Mesajlar
212
arkadaşlar öncelikle teşekkür ederim.
peki bu özelliğin C:C sütununa E:E sütununa ve J:J sütunlarına olmasını ve diğer sütunlara olmamasını nasıl sağlayabilirim. şimdiden teşekkür ederim.
 

Ali

Uzman
Katılım
21 Temmuz 2005
Mesajlar
7,897
Excel Vers. ve Dili
İş:Excel 2016-Türkçe
If Intersect(Target, [C:C]) Is Nothing Then Exit Sub

satırını bu aşağıdaki gibi değiştirin.

If Intersect(Target, [C:C,E:E,J:J]) Is Nothing Then Exit Sub



.
 
Katılım
22 Mart 2005
Mesajlar
847
Excel Vers. ve Dili
Excel-2003 TR.
Altın Üyelik Bitiş Tarihi
29-06-2023
"leventer" arkadaş öncelikle çalışmalarında başarılar. Bir hücrenin üzerine gelince açılır liste ve yanında komut düğmesi uygulaması nasıl yapılıyor.(Yukarıda yapmış olduğun çalışmada da var) Malum acemilik. Bir de DÜŞEYARA ile görüntülenen bir hücredeki rakam (örn. 1) değereni "EĞER" ile nasıl "X" şeklinde görüntüleyebilirim. Kolay gelsin.
Merhaba:

İliştirdiğim Dosyadada görüldüğü üzere F sütununda listemizi oluşturacak isimleri giriyoruz. Daha sonra a3 hücresine gelip veri>doğrulama>liste'yi seçerek Kaynak kısmına geliyoruz ve f sütunundaki hücreleri seçerek tamam diyoruz. Bu kadar.
 
Katılım
23 Ocak 2007
Mesajlar
5
Excel Vers. ve Dili
excel 2003 Türkçe
"Düşeyara" da rakamların X görünmesi

Merhaba arkadaşlar ekteki dosyaya bir bakar mısınız?
Listede değişensisimlere göre rakamlar da değişmekte. Rakamları koşullu olarak nasıl X olarak görebilirim...
 
Katılım
23 Ocak 2007
Mesajlar
5
Excel Vers. ve Dili
excel 2003 Türkçe
"Düşeyara" da rakamların X görünmesi

Merhaba arkadaşlar ekteki dosyaya bir bakar mısınız?
Listede değişen isimlere göre rakamlar da değişmekte. Rakamları koşullu olarak nasıl X olarak görebilirim...
 

Ali

Uzman
Katılım
21 Temmuz 2005
Mesajlar
7,897
Excel Vers. ve Dili
İş:Excel 2016-Türkçe
Sayfa1'deki B2 hücrenize

Kod:
=EĞER(DÜŞEYARA(A2;Sayfa2!A1:D5;2;0)=1;"X";"")
Sayfa1'deki C2 hücrenize

Kod:
=EĞER(DÜŞEYARA(A2;Sayfa2!A1:D5;3;0)=2;"X";"")
Sayfa1'deki D2 hücrenize

Kod:
=EĞER(DÜŞEYARA(A2;Sayfa2!A1:D5;4;0)=3;"X";"")
yazınız.
 
Katılım
23 Ocak 2007
Mesajlar
5
Excel Vers. ve Dili
excel 2003 Türkçe
Ali Bey çok teşekkürler. Oldukça işe yaradı. Kolay gelsin...
 
Üst