çokludüşeyara

[husocan005]

Arkadaşlar kağıt israfını önlemek için Üst yazı ile yazı ekine koyduğum çıktıyı tek sayfa olarak yazdırmak için yardımınıza ihtiyacım var. Açıklama excel sayfasının içinde belirtilmiştir.
Şimdiden teşekkürler

http://www.dosya.tc/server9/bn52bt/deneme.xlsx.html

 

[cems]

1-Listedeki firma ismi düşeyara fonksiyonunda kolaylık olması için başa alındı
2-Listedeki firma isimleri yardımcı sütuna kopyalanıp benzersiz liste yapıldı
3-Baskı sayfasında firma ismi veri doğrulama ile açılır kutu haline getirildi. ( isme tıklayıın )
4-Diğer bütün veriler düşeyara formülleri ile , isim seçildikçe getirildi
5-Borç faturası da otomatik alındı

Sayfa ayarları yapılarak her basmada 1 sayfaya odaklandı.

6-Saatin ilerlemesi ve kafanın durması nedeni ile bir sözleşme nos'sunda birden fazla borç kaydı bulma şahsi işler nedeni ile yarın öğleden sonraya ya da acilse bir ustanın müdahalesine bırakıldı.

Fikir ise ;- veri doğrulama içinde veri doğrulama - ile diğer borç miktarları getirilebilir.

http://s6.dosya.tc/server10/ckw529/222e.rar.html

 

[husocan005]

hocam fikir doğru fakat 2 veya üzeri fatura olanların gelmemesi sıkıntı önemli değil beklerim birde benzersiz listesi sonsuz yapabilirmiyiz. Emeğine sağlık

 

[cems]

hocam fikir doğru fakat 2 veya üzeri fatura olanların gelmemesi sıkıntı

Konunun doğru cevabı ÇOKLUDÜŞEYARA adlı, modüle atılan Kullanıcı tanımlı fonksiyon

Function ÇOKLUDÜŞEYARA(aranan As String, alan As Range, sutun As Integer) As String
If aranan = "" Or sutun = 0 Then GoTo cik
veri = alan.Value2
For i = 1 To UBound(veri)
    If veri(i, 1) Like "*" & aranan & "*" Then
        ÇOKLUDÜŞEYARA = ÇOKLUDÜŞEYARA & veri(i, sütun) & vbLf
    End If
Next i
Exit Function
cik: ÇOKLUDÜŞEYARA = ""
End Function

ve baskı sayfasında aynı sozleşme numarasına çoklu fatura getieecek ikinci ve sonraki satırlarda

=ÇOKLUDÜŞEYARA(D28;LİSTE!A2:J28;10)

Normalde çözmesi gerek, çalışıyor ama boş gösteriyor . Günümün yoğunluğundan bölünerek bakabildiğimden bir yerlerde göremediğim bir hatam var , uğraşmaya devam ederken zaman da alacağından formülleri iyi bilen bir ustanın hatam konusunu didiklemesi dosyanın çözümünde ve benim o hatamı görmemde çok yardımcı olabilir.

http://s6.dosya.tc/server10/py9tio/coklu_dusey_ara.rar.html

Bu arada siz bu soru başlığına " ÇOKLUDÜŞEYARA " kelimesini ekler misiniz ?

 

[husocan005]

Arkadaşlar yardımlarınızı bekliyorum. Cems hocam tekrar teşekkürler

 

[çıtır]

Dosyanız;
http://s6.dosya.tc/server10/fgwppm/COKDUSEY.rar.html

 

[husocan005]

hocam fakat ivme projenin isimleri aynı fakat farklı sözleşme borçlarınıda alt alta sıraladı o zaman yanlış oluyor. Birde benzersiz listeyi sonsuz yapabilirmiyiz ben oraya 500 adet isim kopyalasam olurmu

 

[çıtır]

İsteğiniz böyle birşey mi?
http://www.dosya.tc/server9/niotm0/COKDUSEY1.rar.html

 

[Asri]

@çıtır ın düzenlediği dosya üzerinden makro ile çözüm

Her kayıt girdiğinizde benzersiz liste yeniden oluşturulur.
Tüm formüller sınırsız olarak ayarlandı.
YAZI sayfasına satır ve kolon ekleme-silme işlemi yapmayınız.

http://www.dosya.tc/server9/m9d3xo/COKDUSEY3.zip.html

 

[husocan005]

olmadi üstadlar listeye yeni veriler eklediğimde sözleşme tesisat ve nmuhatap geliyo fakat fatura bilgileri gelmiyo birde adres

 

[cems]

fatura bilgileri gelmiyo birde adres

Sebebi , listeye ek yaptığınız halde uzayan tablodan veri alan formulleri genişletmemeniz olabilir. Yani ek liste yaptığınızda eski formüller yeni hale uyarlanmadan fatura bilgileri gelemez.

Düşeyara konusunu buradan izleyin https://www.youtube.com/watch?v=uubPaMDKFUI

Fatura bilgileri hücrelerine tek tıklayın ve yukarıdaki formül satırında görünen formulü kontrol edin. Veri alınan alan yeni listenin tamamını kapsamalıdır.

 

[Asri]

olmadi üstadlar listeye yeni veriler eklediğimde sözleşme tesisat ve nmuhatap geliyo fakat fatura bilgileri gelmiyo birde adres

9. Mesajımdaki dosya güncellendi. Kontrol ediniz.

Her kayıt girdiğinizde benzersiz liste yeniden oluşturulur.
Tüm formüller sınırsız olarak ayarlandı.
Görünümde bir kaç düzenleme yapıldı.
YAZI sayfasında, satır ve kolon ekleme-silme işlemi yapmayınız.

 

[çıtır]

Gerekli düzeltmeler yapıldı.
http://www.dosya.tc/server9/b20w92/COKDUSEY2.rar.html

 

[husocan005]

yine olmuyo listeye ekleme yaptğımda hiç görünmüyo üst yazıda

 

[çıtır]

Hangisi için yazdığını belirt , son gönderdiğimde gerekli düzeltme yapıldı,listeye ekler.Üst yazı A6 ve D28 Seçim yapmalısınız.Sözleşme no farklı olmalıdır.

 

[husocan005]

cems çıtır ve asri hocam sizi yordum biraz emeğinize sağlık asri hocamın yaptığı oldu ve güzel calisiyo teşekkür ederim hepinize.

 

[çıtır]

cems çıtır ve asri hocam sizi yordum biraz emeğinize sağlık asri hocamın yaptığı oldu ve güzel calisiyo teşekkür ederim hepinize.

Rica ederim.Kolay gelsin.