Sertifika basımı yaptığım excel de geliştirme

[cemalc41]

Merhabalar,

Foruma yeni üye oldum.
Bu sebeple cesaretlenip elimde bulunan, sertifika basımı için hazırlamış olduğum excel dosyası için geliştirme talebinde bulunmak istiyorum.
Ekte göndermiş olduğum dosya hakkında açıklama yapmam gerekirse;
Firmamızda henüz ERP sistemi çalışmaları devam ettiğinden şu an için excel dosyasını kullanarak sertifika basımını gerçekleştiriyoruz.
Paket numarası (A9) hücresine giriş yapıldığında paket bilgileri "folyo ambar" sayfasında ilgili pakete ait bilgileri düşeyara ile buluyor.
B2,C2,D2 ve G2 de gelen bilgilere göre uygun toleranslar A5 hücresinden seçiliyor. Bu bilgilerde "toleranslar" sayfasından alınıyor.
D9 hücresindeki değere göre, A12 hücresinde listeden aynı numaralı bir veya birden fazla olan (yanında -01, -16 olarak ek olan) seçeneklerden uygun olanı seçiyoruz. Burada istediğim açılır menüde sadece D9 hücresindeki değerin benzerlerinin gelmesi. Bunların arasından istediğimizi seçebilelim. Ya da büyükten küçüğe sıralı olarak listelenmesi. Kayıt yapılan yerde sıralı girilmediğinden arama sırasında bulmakta zorlanıyoruz.
Son olarakta alaşım bilgilerini almak için A17 hücresi açılarak daha önceden hazırlamış olduğum metodla gelen alaşım değerleri seçiliyor.

Sizden istediğim, olabiliyorsa, A12 hücresinde sadece D9 dakine benzer(ilk 7 hane) numaraların gelmesi.
A17 hücresinde ben seçmeden değerin hazır gelmesi.

Yardımcı olabilirseniz çok sevinirim.

 

[Ömer BARAN]

Merhabalar.

Aşağıdaki şekilde (sırasıyla) işlem yaparak sonuç alabilirsiniz.
--Folyo Çemberler sayfası K2 hücresine (aşağı doğru kopyalanacak-yardımcı sütun-);

=EĞERSAY($B$2:$B$15;"<"&B2)+1

--Folyo Çemberler sayfası L2 hücresine (aşağı doğru kopyalanacak-yardımcı sütun-);

=SOLDAN(İNDİS($B$2:$B$15;KAÇINCI(SATIR()-1;$K$2:$K$15;0);1);7)

-- Folyo Çemberler sayfası A12 hücresinin veri doğrulama formülünü aşağıdaki ile değiştirin.

='Folyo Çekmeler'!$L$2:$L$15

--Folyo Çemberler sayfası M16 hücresini kopyalayıp DH1, DH2, DH3 ve DH4 sayfalarındaki U1 hücrelerine yapıştırın.
--Folyo Çemberler sayfası B17 hücresine (sağa doğru M17 hücresine kadar kopyalanacak)
NOT: İlgili sayfalardaki veriler 100 satırdan fazla olacaksa formüldeki 100 sayılarını gerçek belgenize göre son satır numaralarıyla değiştirin.

=EĞERHATA(İNDİS('DH1'!$A$1:$AA$[B][COLOR="Blue"]100[/COLOR][/B];KAÇINCI($A$17;'DH1'!$A$1:$A$[B][COLOR="Blue"]100[/COLOR][/B];0);KAÇINCI(B$16;'DH1'!$A$1:$AA$1;0));
EĞERHATA(İNDİS('DH2'!$A$1:$AA$[B][COLOR="Blue"]100[/COLOR][/B];KAÇINCI($A$17;'DH2'!$A$1:$A$[B][COLOR="Blue"]100[/COLOR][/B];0);KAÇINCI(B$16;'DH2'!$A$1:$AA$1;0));
EĞERHATA(İNDİS('DH3'!$A$1:$AA$[B][COLOR="Blue"]100[/COLOR][/B];KAÇINCI($A$17;'DH3'!$A$1:$A$[B][COLOR="Blue"]100[/COLOR][/B];0);KAÇINCI(B$16;'DH3'!$A$1:$AA$1;0));
EĞERHATA(İNDİS('DH4'!$A$1:$AA$[B][COLOR="Blue"]100[/COLOR][/B];KAÇINCI($A$17;'DH4'!$A$1:$A$[B][COLOR="Blue"]100[/COLOR][/B];0);KAÇINCI(B$16;'DH4'!$A$1:$AA$1;0));""))))

18-24'üncü satırları silebilirsiniz.
.