Düşeyara

[hanedan0812]

Arkadaşlar hayırlı günler dilerim.

Ekte gönderdiğim dosyada Personel sayfası B sütununa personelin sicilini yazdığımız zaman
Personel Bilgileri sayfasındaki C ve J sütunları aralığındaki bilgilerini düşeyara ile getirmesi için vba kodunu yapamadım. Yardımcı olursanız sevinirim.
Teşekkürler.

 

[YUSUF44]

Neden makro istiyorsunuz, doğrudan düşeyara formülünü yazsanız olmuyor mu?

Örnek C2'deki formül:

=DÜŞEYARA($B2;'PERSONEL SAYFASI'!$B:$J;SÜTUNSAY($A:A)+1;0)

Boş olanlarda hata vermemesi içinse:

=EĞER(EHATALIYSA(DÜŞEYARA($B2;'PERSONEL SAYFASI'!$B:$J;SÜTUNSAY($A:A)+1;0));"";DÜŞEYARA($B2;'PERSONEL SAYFASI'!$B:$J;SÜTUNSAY($A:A)+1;0))

diğer hücrelere de kopyalayabilirsiniz.

 

[Excelmy]

Ekte gönderdiğim dosyada Personel sayfası B sütununa personelin sicilini yazdığımız zaman
Personel Bilgileri sayfasındaki C ve J sütunları aralığındaki bilgilerini düşeyara ile getirmesi için
vba kodunu yapamadım.

Sayın hanedan0812

Ekli dosyayı inceleyiniz.

 

[hanedan0812]

Teşekkürler

 

[toprak35]

merhaba arkadaşlar, ben sayfa1'deki A,B,C sütunlarındaki verileri sayfa2'de B,C,D sütunlarına aynı satır sırasınca kopyalamak istiyorum fakat sayfa2'de 1 yazdığımda sayfa1'deki 1.sıradaki veriler gelsin, 5 yazdığımda 5.sıradaki veriler kopyalansın ve ben kaç tane satır istersem o kadar satır sayfa2'ye kopyalansın.. bu konuda yardımcı olabilirseniz sevinirim.. iyi çalışmalar...

 

[Ömer]

Merhaba,

Sayfa2 C2 hücresine yazın.

=EĞER($B2="";"";DÜŞEYARA($B2;Sayfa1!$A:$C;2;0))

D2 hücresine formülü yazarken kırmızı işaretlediğim 2 yerine 3 yazarsınız.

Sütun indisi belirleme olayını ( 2 ve 3 ü ) daha pratik yolla formüle ilave edebiliriz fakat ilk aşamada konuyu daha kolay anlamanız için bu şekilde yazdım.

.

 

[toprak35]

Eyvallah.. Çok hayırlı bi iş oldu bu.. Allah razı olsun kardeşim..