Bir tabloda yer alan bilgilerin başka bir yere kopyalanması

[takari]

Bir türlü halledemediğim bir sorunum var basit gibi ama çözemedim yapmak istediğimi örnek dosya da açıkladım. Yardımlarınızı bekliyorum.
Teşekkürler,saygılar

Arkadaşlar,
Çalışma sayfamda belirli bir aralıkta bir ders programı var. Yapmak istediğim şey bu program tablosunun altında yer alan bölgede hoca isminin yanına ders kodlarını çıkarabilmek. Hoca adını veri doğrulamadan liste fonk. kullanarak açılır kutudan hallediyorum. Ama ders kodaları için bir formül bulamadım. Uzman arkadaşlardan yardım istiyorum.
tekrar teşekkürler saygılar,

 

[takari]

Arkadaşlar hiç çözüm bulabilen yok mu?

 

[takari]

Çözümlerini zevkle takip ettiğimiz uzman arkadaşlardan yardım istiyorum.

 

[takari]

=EĞER(EHATALIYSA(KAYDIR(I$2;KAÇINCI($I40;I$3:I$34;0);-1));"";KAYDIR(I$2;KAÇINCI($I40;I$3:I$34;0);-1))&""&EĞER(EHATALIYSA(KAYDIR(K$2;KAÇINCI($I40;K$3:K$34;0);-1));"";KAYDIR(K$2;KAÇINCI($I40;K$3:K$34;0);-1))&""&EĞER(EHATALIYSA(KAYDIR(M$2;KAÇINCI($I40;M$3:M$34;0);-1));"";KAYDIR(M$2;KAÇINCI($I40;M$3:M$34;0);-1))&""&EĞER(EHATALIYSA(KAYDIR(O$2;KAÇINCI($I40;O$3:O$34;0);-1));"";KAYDIR(O$2;KAÇINCI($I40;O$3:O$34;0);-1))&""&EĞER(EHATALIYSA(KAYDIR(Q$2;KAÇINCI($I40;Q$3:Q$34;0);-1));"";KAYDIR(Q$2;KAÇINCI($I40;Q$3:Q$34;0);-1))

Böyle bir şey yaptım ancak tek sütunda birden fazla ders varsa sadece birini veriyor. Makroculara mı sorsak ne yapsak.