Seçilen Liste Kutusunun Değerini Başka Bir Hücreden Alabilir miyiz?

Katılım
27 Ocak 2010
Mesajlar
230
Excel Vers. ve Dili
Türkçe Microsoft Office Professional Plus 2019
ÖRNEK DOSYA


213318


Üstteki görüntüde anlatmaya çalıştım. Bunu nasıl sağlayabilirim?
 

EmrExcel16

Destek Ekibi
Destek Ekibi
Katılım
1 Kasım 2012
Mesajlar
1,520
Excel Vers. ve Dili
Office 365 Türkçe
Deneyiniz..
Kod:
=İNDİS($A$1:$B$1000;KAÇINCI(C1;$B$1:$B$1000;0);1)
 
Katılım
27 Ocak 2010
Mesajlar
230
Excel Vers. ve Dili
Türkçe Microsoft Office Professional Plus 2019
Deneyiniz..
Kod:
=İNDİS($A$1:$B$1000;KAÇINCI(C1;$B$1:$B$1000;0);1)
Sanırım yanlış anlaşıldım ya da anlatamadım.

Yapmak istediğim Liste kutusu içinde İl isimleri görünecek ama hangi ili seçersek o ilin adı değil il trafik kodu veri olarak gelecek

Liste kutusundan seçtiğim değere göre okla gösterdiğim hücrelere değer atamaya çalışmıyorum. Onlar olayı anlatmak için bir örnekti...

Afyonu seçtim diyelim seçimde il görünecek ama o seçimden bir değer çekerken il adı değil il kodu gidecek...
 

EmrExcel16

Destek Ekibi
Destek Ekibi
Katılım
1 Kasım 2012
Mesajlar
1,520
Excel Vers. ve Dili
Office 365 Türkçe
Sanırım yanlış anlaşıldım ya da anlatamadım.

Yapmak istediğim Liste kutusu içinde İl isimleri görünecek ama hangi ili seçersek o ilin adı değil il trafik kodu veri olarak gelecek

Liste kutusundan seçtiğim değere göre okla gösterdiğim hücrelere değer atamaya çalışmıyorum. Onlar olayı anlatmak için bir örnekti...

Afyonu seçtim diyelim seçimde il görünecek ama o seçimden bir değer çekerken il adı değil il kodu gidecek...
Verdiğim formül tamda bunu yapıyor , seçilen ilin solundaki rakamı veriyor. Sizin tam olarak ne istediğinizi yine anlamadım maalesef.
 

YUSUF44

Destek Ekibi
Destek Ekibi
Katılım
4 Ocak 2006
Mesajlar
12,084
Excel Vers. ve Dili
İş : Ofis 365 - Türkçe
Ev: Ofis 365 - Türkçe
Sayın EmrExcel16'nın verdiği formülün benzeri zaten dosyanızda var, yani uygulamışsınız. bunun dışında ne yapmak istediğiniz anlaşılmıyor maalesef. Eğer E2 hücresinden değil de liste kutusundanveri alınsın diyorsanız formülünüzde E2 yerine C1 yazmanız yeterlidir.
 
Katılım
27 Ocak 2010
Mesajlar
230
Excel Vers. ve Dili
Türkçe Microsoft Office Professional Plus 2019
İndis formülüne yakın bir formülü bende örnek dosyada hücre içine yazmıştım. Benim öğrenmek istediğim liste kutusuna bu tarz yani bence dolaylı bir yöntem kullanmadan liste kutusuna görünen değer ile gönderilen/yüklenilen değer farklı nir kullanım tarzı olup olmamasıydı.

Html de option özelliği gibi....
Kod:
<select>
<option value=1>Adana</option>
<option value=2>Adıyaman</option>
<option value=3>Afyon</option>
</select>
Bu şekilde formdan Afyonu seçip post ettiğinizde giden değer Afyon değil 3 değeridir...

gibi bir kullanım olup olmadığı.
 

YUSUF44

Destek Ekibi
Destek Ekibi
Katılım
4 Ocak 2006
Mesajlar
12,084
Excel Vers. ve Dili
İş : Ofis 365 - Türkçe
Ev: Ofis 365 - Türkçe
Aşağıdaki formül aynı sonucu verir :

=KAÇINCI(C1;$B$1:$B$5;0)

Makroyla isterseniz:

PHP:
Sub indis()
plaka = WorksheetFunction.Match([C1], [B1:B5], 0)
MsgBox [C1] & " ilinin plaka kodu : " & plaka
End Sub
 
Katılım
27 Ocak 2010
Mesajlar
230
Excel Vers. ve Dili
Türkçe Microsoft Office Professional Plus 2019
Aşağıdaki formül aynı sonucu verir :

=KAÇINCI(C1;$B$1:$B$5;0)

Makroyla isterseniz:

PHP:
Sub indis()
plaka = WorksheetFunction.Match([C1], [B1:B5], 0)
MsgBox [C1] & " ilinin plaka kodu : " & plaka
End Sub
Henüz excel fonksiyonları tam olarak hakim olmadığım için makro ile işlem yapmamaya çalışıyorum. Kodlama ve asp bildiğim için makrolara hiç yabancı değilim.
Makro için teşekkürler.
 
Katılım
27 Ocak 2010
Mesajlar
230
Excel Vers. ve Dili
Türkçe Microsoft Office Professional Plus 2019
P
Aşağıdaki formül aynı sonucu verir :

=KAÇINCI(C1;$B$1:$B$5;0)

Makroyla isterseniz:

PHP:
Sub indis()
plaka = WorksheetFunction.Match([C1], [B1:B5], 0)
MsgBox [C1] & " ilinin plaka kodu : " & plaka
End Sub
Peki bu makroya o listedeki değerleride dahil etsek yani sub içine 1-adana gibi yazsak nasıl olurdu
 

YUSUF44

Destek Ekibi
Destek Ekibi
Katılım
4 Ocak 2006
Mesajlar
12,084
Excel Vers. ve Dili
İş : Ofis 365 - Türkçe
Ev: Ofis 365 - Türkçe
En basit hali:

PHP:
Sub indis()
plaka = WorksheetFunction.Match([C1], [B1:B5], 0)
MsgBox plaka & "-" & [C1]
End Sub
İhtiyacınıza, kullanacağınız yere ve şekle göre farklı çözümler bulunabilir.
 
Üst