Kaydır fonksiyonu ve düşey ara birlikte nasıl kullanılır

[Arrayn]

SA Arkadaşlar

Siteyi detaylı inceleyince muhakkak bir şeyler buluyorsunuz.

Veri Doğrulamada Liste Kaynak alanına aşağıdaki fonksiyonu kopyaladığımda
gördüm ki Sayfa2 A sütununa bilgi girip sütunun yüksekliği artınca Sayfa1 de tanımladığım açılan listede görebiliyorum ve altında boşlukları almıyor.

=KAYDIR(Sayfa2!$A$2;0;0;BAĞ_DEĞ_DOLU_SAY(Sayfa2!$A $2:$A$1000);1)


Acaba açılır listeden seçtiğim Sayfa2 deki A sütununa ait satırının sağındaki yani B C deki bilgileri de nasıl çekerim ?

Sitede bir tur daha atmayı düşünüyorum
KAYDIR fonksiyonu ile DÜŞEYARA veya INDIS fonksiyonunu birlikte kullanılmış örneklerini bulmam lazım gibi geliyor !!!

Son olarak bu birleşik fonksiyonun hedefi Sayfa2 değilde, kapalı bir excel dosyası olacak .... Mümkün mü ?

 

[Korhan Ayhan]

Merhaba,

Veri doğrulama işleminde başvurduğunuz alan aynı sayfa üzerinde olmalıdır. Başka kitaba başvuru yapamazsınız.

 

[Arrayn]

Sağolasın ben de arayıp duracaktım. O zaman verileri Sayfa2 'ye gireceğim.


Aşağıdaki fonksiyonda Bağ_Değ_Dolu_Say yerine başka ne kullanabileceğimi biliyor musunuz ?
A sütununa girilen en son dolu hücrenin satır numarasını verecek.



=KAYDIR(Sayfa2!$A$2;0;0;BAĞ_DEĞ_DOLU_SAY(Sayfa2!$A $2:$A$1000);1)

 

[Korhan Ayhan]

Merhaba,

BAĞ_DEĞ_DOLU_SAY formülü zaten size eğer arada boş satırlar yoksa son satır numarasını verecektir.

Alternatif olarak aşağıdaki formülü kullanabilirsiniz.

=ARA(2;1/(B1:B65535<>"");B1:B65535)

 

[uzmanamele]

SA Arkadaşlar

Siteyi detaylı inceleyince muhakkak bir şeyler buluyorsunuz.

Veri Doğrulamada Liste Kaynak alanına aşağıdaki fonksiyonu kopyaladığımda
gördüm ki Sayfa2 A sütununa bilgi girip sütunun yüksekliği artınca Sayfa1 de tanımladığım açılan listede görebiliyorum ve altında boşlukları almıyor.

=KAYDIR(Sayfa2!$A$2;0;0;BAĞ_DEĞ_DOLU_SAY(Sayfa2!$A $2:$A$1000);1)


Acaba açılır listeden seçtiğim Sayfa2 deki A sütununa ait satırının sağındaki yani B C deki bilgileri de nasıl çekerim ?

Sitede bir tur daha atmayı düşünüyorum
KAYDIR fonksiyonu ile DÜŞEYARA veya INDIS fonksiyonunu birlikte kullanılmış örneklerini bulmam lazım gibi geliyor !!!

Son olarak bu birleşik fonksiyonun hedefi Sayfa2 değilde, kapalı bir excel dosyası olacak .... Mümkün mü ?

Merhaba
2 adet ad tanımlamayla istediğinizi yapmanız mümkün.
veri doğrulama için tanımlanan ad "liste" olsun

=KAYDIR(Sayfa2!$A$2;0;0;BAĞ_DEĞ_DOLU_SAY(Sayfa2!$A$2:$A$1000);1)

düşeyara vs için kullanacağınız tanımlı ad "tablo" olsun

=KAYDIR(Sayfa2!$A$2;0;0;BAĞ_DEĞ_DOLU_SAY(Sayfa2!$A$2:$A$1000);[COLOR="Red"]3[/COLOR])

düşeyara için formül

=DÜŞEYARA(A2;tablo;2;)

 

[Arrayn]

Korhan Hocam,

Yazdığın kod çok daha iyi ......
Sayfa2 de A sütununun en sonundaki veriyi getiriyor (aralarda boşluklar olsa bile)

SATIR() fonksiyonunu kullanarak sizin yazdığınız fonksiyonun getirdiği son verinin SATIR numarasını almak mümkün olmadı

Bir öneriniz var mı acaba?


=ARA(2;1/(Sayfa2!A2:A65535<>"");Sayfa2!A2:A65535)

 

[Arrayn]

Sayın Uzmanamele,

sizin mesajınızı görmeden bir önceki cevabı yazmış ve sorumu sormuş bulundum

kusurabakmayın

 

[uzmanamele]

Korhan Hocam,

Yazdığın kod çok daha iyi ......
Sayfa2 de A sütununun en sonundaki veriyi getiriyor (aralarda boşluklar olsa bile)

SATIR() fonksiyonunu kullanarak sizin yazdığınız fonksiyonun getirdiği son verinin SATIR numarasını almak mümkün olmadı

Bir öneriniz var mı acaba?


=ARA(2;1/(Sayfa2!A2:A65535<>"");Sayfa2!A2:A65535)

Merhaba
A sütunundaki son verinin adresi için deneyiniz.

=ADRES(TOPLA.ÇARPIM(MAK(SATIR($A$1:$A$100)*(($A$1:$A$100)<>"")));1)

Sadece satır numarası için;

=TOPLA.ÇARPIM(MAK(SATIR($A$1:$A$100)*(($A$1:$A$100)<>"")))

 

[Arrayn]

Hocam denedim ve son girilen değerin satır adres adını aşağıdaki gibi döndürdü
$A$29

bu ifadeyi 29 olarak alamadım HÜCRE("sat";...... içine aldım ama olmadı...


2. Kodunuzu görmedim ... bir de onu deneyeyim

 

[Arrayn]

Allah Razı olsun sizden Korhan ve Uzmanamele hocam

40 yıl uğraşsam aşağıdaki kodu veri doğrulamaya giremezdim.

=KAYDIR(Sayfa2!$A$2;0;0;TOPLA.ÇARPIM(MAK(SATIR(Sayfa2!$A$1:$A$100)*((Sayfa2!$A$1:$A$100)<>"")));1)

Hakkınızı ve ayırdığınız zamanınızı helal edin

 

[vzeir]

Merhaba sevgili üstadlarım,

Benzer bir problem olduğunu düşündüğüm için buraya yazıyorum, aşağı kaydırdım yukarı kaydırdım bir türlü işin içinden çıkamadım.

sayfa2'de her koli grubunda kaç koli olması gerektiği yazıyor. Bu verileri ben giriyorum.

sayfa1'e sırasıyla her gruptaki kolilerin 1'den başlayıp sayfa2'de belirttiğim son numaraya kadar satır satır inmesi ve o grup bitince yeni grubun 1 numarasından başlaması gerekiyor.

Eğer sayfa1'de A sütununa koli grubunu elle girersem numara sıralı geliyor ancak ben harflerin de otomatik gelmesini istiyorum, nasıl yaparız?



Yardımlarınız için şimdiden teşekkür ederim.

 

[vzeir]

Merhaba,

İhtiyacım olan formülü kurcalayarak buldum, kafa yoran olduysa teşekkürler. Gönül isterdi ki makroyla çözülsün ancak bu hali de işimi gördü.
Çözümü ekledim.

 

[ÖmerBey]

Problemi çözmüşsünüz ama kullanmak isterseniz aşağıdaki kodlar işinizi görebilir.

Sub KoliYap()
Set s1 = Sheets("Sayfa1")
Set s2 = Sheets("Sayfa2")
x = 2
say = 1
    For i = 2 To s2.[A65500].End(3).Row
        Koli = s2.Cells(i, "A")
        bitiş = s2.Cells(i, "B")
        Do Until say > bitiş
            son = s1.Range("A65500").End(3).Row + 1
            s1.Cells(x, "A") = Koli
            s1.Cells(x, "B") = say
            say = say + 1
            x = x + 1
        Loop
        say = 1
    Next
End Sub