banka listesi hazırlama yardım

[mustafa7456]

Değerli hocalarım. ekteki kitapta 7-8 adet sayfa var. bunlarda bilirkişilere ait listeler var. her ay sayıları azalıp çoğlabiliyor ve her ay farklı farklı isimler olur. veriler sabit değil yani. sıkıntım şu.: herhangi bir kişi bir kere görev yapabileceği gibi 10 kere de görev yapabilir. bunların evrakları ayrı ayrı geldiği için bordroda her birini ayrı ayrı yazmak zorundayım. banka listesini hazırlarken a-z ye sıralayıp tek tek topluyordum . SİZDEN İSTEĞİM, Bİ FORMÜL VEYA MAKRO GİBİ BİŞEY VARSA KENDİSİ OTOMATİK BÜTÜN SAYFALARDAKİ KİŞİLERİ BANKA LİSTESİNE TOPLAMINI YAPARAK HAZIRLAYABİLİRMİ.
Şimdiden yardımlarınız için çok teşekkür ederim.

 

[halit3]

Değerli hocalarım. ekteki kitapta 7-8 adet sayfa var. bunlarda bilirkişilere ait listeler var. her ay sayıları azalıp çoğlabiliyor ve her ay farklı farklı isimler olur. veriler sabit değil yani. sıkıntım şu.: herhangi bir kişi bir kere görev yapabileceği gibi 10 kere de görev yapabilir. bunların evrakları ayrı ayrı geldiği için bordroda her birini ayrı ayrı yazmak zorundayım. banka listesini hazırlarken a-z ye sıralayıp tek tek topluyordum . SİZDEN İSTEĞİM, Bİ FORMÜL VEYA MAKRO GİBİ BİŞEY VARSA KENDİSİ OTOMATİK BÜTÜN SAYFALARDAKİ KİŞİLERİ BANKA LİSTESİNE TOPLAMINI YAPARAK HAZIRLAYABİLİRMİ.
Şimdiden yardımlarınız için çok teşekkür ederim.

merhaba

Dosyanızdaki ödenecek tutar hücreleri sayfalarda farklı sutünları gösteriyor örneğin R ve Q sutünlarında bunların hepsinin aynı olmasını sağlayın diğer taraftan bir adet veri sayfası oluşturun bilirkişiler için yanlızca adı soyadı ve tc kimlik numarası olsun buradaki bilgilere göre bütün sayfalardan verileri almak daha kolay olacaktır.

 

[mancubus]

makro da istiyorsunuz. o foruma açsanız konuyu daha iyi olurdu.

sayfalarınızdaki şablonlar nedeniyle benim çok işime yarayan aşağıdaki kod sorun çıkardı.

7 ve 31. satırlar arasındaki tüm sütun verilerini kopyalamak üzere revize ettim. İşinize yaramayan satır ve sütunları siler sütun başlıklarınızı yazarsınız.

veya başka bir kod kullanır, bunu kullanmazsınız.

Sub CopyFromWorksheets()
'http://www.vbaexpress.com/kb/getarticle.php?kb_id=151

Dim wrk As Workbook
Dim sht As Worksheet
Dim trg As Worksheet
Dim rng As Range
Dim colCount As Long
 
Set wrk = ActiveWorkbook
 
For Each sht In wrk.Worksheets
    If sht.Name = "BANKA LİSTESİ" Then
        MsgBox "BANKA LİSTESİ adında bir sayfa var. Siliniz veya ismini değiştiriniz!", _
        vbOKOnly + vbExclamation, "Hata"
        Exit Sub
    End If
Next
 
Application.ScreenUpdating = False
 
Set trg = wrk.Worksheets.Add(After:=wrk.Worksheets(wrk.Worksheets.Count))
trg.Name = "BANKA LİSTESİ"

Set sht = wrk.Worksheets(1)
colCount = sht.Cells(1, Columns.Count).End(xlToLeft).Column
 
For Each sht In wrk.Worksheets
    If sht.Index = wrk.Worksheets.Count Then
        Exit For
    End If
    Set rng = sht.Range(sht.Cells(7, 1), sht.Cells(31, 1).Resize(, colCount))
    trg.Cells(Rows.Count, 1).End(xlUp).Offset(1).Resize(rng.Rows.Count, rng.Columns.Count).Value = rng.Value
Next sht
 
Application.ScreenUpdating = True

End Sub

 

[halit3]

Değerli hocalarım. ekteki kitapta 7-8 adet sayfa var. bunlarda bilirkişilere ait listeler var. her ay sayıları azalıp çoğlabiliyor ve her ay farklı farklı isimler olur. veriler sabit değil yani. sıkıntım şu.: herhangi bir kişi bir kere görev yapabileceği gibi 10 kere de görev yapabilir. bunların evrakları ayrı ayrı geldiği için bordroda her birini ayrı ayrı yazmak zorundayım. banka listesini hazırlarken a-z ye sıralayıp tek tek topluyordum . SİZDEN İSTEĞİM, Bİ FORMÜL VEYA MAKRO GİBİ BİŞEY VARSA KENDİSİ OTOMATİK BÜTÜN SAYFALARDAKİ KİŞİLERİ BANKA LİSTESİNE TOPLAMINI YAPARAK HAZIRLAYABİLİRMİ.
Şimdiden yardımlarınız için çok teşekkür ederim.

Dosyanızdaki fazla sutünları sildim veri sayfası ekledim bu sayfaya alacaklı adı soyadı ve tc numaralarını yaz yeterli olacaktır.

sorgulamalar veri sayfasındaki tc numarasına göre yapılıyor.

Diğer tarafdan gelir vergisi hesaplaması için kullanıcı tanımlı fonksiyon ekledim.

Banka listesindeki düğmeye tıklamanız yeterli olacaktır.
veri sayfasındaki vergi matrağı aktarma ile gelmektedir.

 

[muygun]

Merhaba;
Bir çözümde ben yapmaya çalıştım ama aynı sonuçları bulamadım.
Nedeni ise ;
TC no ile doğrulama yapılsa (aynı kişiye ait farklı tc var) farklı sonuç çıkıyor.
AD SOYAD ile doğrulama yapılsa (aynı TC ye ait isimlerin sonunda boşluk olduğundan) farklı sonuç çıkıyor.
Syn halit3 ve mancubus'un tespitleri yerinde öncelikle verilerinizin doğru olmasını sağlayın.
Eki inceleyin.
İyi çalışmalar.

 

[mustafa7456]

sizler harikasınız. ellerinize sağlık. emekleriniz çooook teşekkür ederim.
BU SİTEYE BAYILIYORUM YA.