excel trafik kodları

[aaffccdd]

arkadaşlar mesajı göndermiştim ama cevep geldimi bilmiyorum.
karışık şekilde verilmiş bir sütundaki trafik kodlarına karşılık gelen şehir ismini aynı sütuna yazabilirmi
ve ya başka sütuna.yardım ederseniz sevinirim.

 

[skywalker48]

önce örnek dosya göndermelisin

 

[aaffccdd]

dosya nasıl gönderiliyor.

 

[Ömer]

Merhaba,

Linki inceleyiniz..


Sorunun devamında, ataç eklemek( Dosya eklemek).

 

[Leoncio]

Merhaba;
Aşağıdaki fonksiyonu kullanabilirsiniz.

=sehir(A10)



Option Explicit

Function Sehir(Plaka As String)
Dim Vilayet As String
Select Case Plaka
Case 1: Vilayet = "Adana"
Case 2: Vilayet = "Adıyaman"
Case 3: Vilayet = "Afyon"
Case 4: Vilayet = "Ağrı"
Case 5: Vilayet = "Amasya"
Case 6: Vilayet = "Ankara"
Case 7: Vilayet = "Antalya"
Case 8: Vilayet = "Artvin"
Case 9: Vilayet = "Aydın"
Case 10: Vilayet = "Balıkesir"
Case 11: Vilayet = "Bilecik"
Case 12: Vilayet = "Bingöl"
Case 13: Vilayet = "Bitlis"
Case 14: Vilayet = "Bolu"
Case 15: Vilayet = "Burdur"
Case 16: Vilayet = "Bursa"
Case 17: Vilayet = "Çanakkale"
Case 18: Vilayet = "Çankırı"
Case 19: Vilayet = "Çorum"
Case 20: Vilayet = "Denizli"
Case 21: Vilayet = "Diyarbakır"
Case 22: Vilayet = "Edirne"
Case 23: Vilayet = "Elazığ"
Case 24: Vilayet = "Erzincan"
Case 25: Vilayet = "Erzurum"
Case 26: Vilayet = "Eskişehir"
Case 27: Vilayet = "Gaziantep"
Case 28: Vilayet = "Giresun"
Case 29: Vilayet = "Gümüşhane"
Case 30: Vilayet = "Hakkari"
Case 31: Vilayet = "Hatay"
Case 32: Vilayet = "Isparta"
Case 33: Vilayet = "İçel"
Case 34: Vilayet = "İstanbul"
Case 35: Vilayet = "İzmir"
Case 36: Vilayet = "Kars"
Case 37: Vilayet = "Kastamonu"
Case 38: Vilayet = "Kayseri"
Case 39: Vilayet = "Kırklareli"
Case 40: Vilayet = "Kırşehir"
Case 41: Vilayet = "Kocaeli"
Case 42: Vilayet = "Konya"
Case 43: Vilayet = "Kütahya"
Case 44: Vilayet = "Malatya"
Case 45: Vilayet = "Manisa"
Case 46: Vilayet = "Kahramanmaraş"
Case 47: Vilayet = "Mardin"
Case 48: Vilayet = "Muğla"
Case 49: Vilayet = "Muş"
Case 50: Vilayet = "Nevşehir"
Case 51: Vilayet = "Niğde"
Case 52: Vilayet = "Ordu"
Case 53: Vilayet = "Rize"
Case 54: Vilayet = "Sakarya"
Case 55: Vilayet = "Samsun"
Case 56: Vilayet = "Siirt"
Case 57: Vilayet = "Sinop"
Case 58: Vilayet = "Sivas"
Case 59: Vilayet = "Tekirdağ"
Case 60: Vilayet = "Tokat"
Case 61: Vilayet = "Trabzon"
Case 62: Vilayet = "Tunceli"
Case 63: Vilayet = "Şanlıurfa"
Case 64: Vilayet = "Uşak"
Case 65: Vilayet = "Van"
Case 66: Vilayet = "Yozgat"
Case 67: Vilayet = "Zonguldak"
Case 68: Vilayet = "Aksaray"
Case 69: Vilayet = "Bayburt"
Case 70: Vilayet = "Karaman"
Case 71: Vilayet = "Kırıkkale"
Case 72: Vilayet = "Batman"
Case 73: Vilayet = "Şırnak"
Case 74: Vilayet = "Bartın"
Case 75: Vilayet = "Ardahan"
Case 76: Vilayet = "Iğdır"
Case 77: Vilayet = "Yalova"
Case 78: Vilayet = "Karabük"
Case 79: Vilayet = "Kilis"
Case 80: Vilayet = "Osmaniye"
Case 81: Vilayet = "Düzce"
End Select
Sehir = Vilayet
End Function