Veri Süz Veri Göster

[önder34]

Merhaba arkadaşlar ekders puantajı ile ilgili yaptığım çalışmada 4b sözleşmeli ve ücretli emekli ücretlileri veri söz yöntemi kullandığımda göstermesin onlara ait ekders toplamlarıda görünmesin göster dediğimde onlarıda listeye dahil etsin istiyorum .Ben sadece veri süz kullanarak yapmaya çalıştım ama olmadı üçünü aynı aynada almıyor.Yardımlarınızı bekliyorum

 

[önder34]

soruma yardımcı olabilecek kimse yok mu ?

arkdaşlar soruma çözüm üretebilecek kimse yok mu lütfen !

 

[halit3]

arkdaşlar soruma çözüm üretebilecek kimse yok mu lütfen !

bunları denermisiniz

Sub GİZLE()
Cells.Select
Selection.EntireRow.Hidden = False
For i = 10 To 77
Cells(i, "cd").Value = "=RC[-53]+RC[-40]+RC[-27]+RC[-14]+RC[-1]"
If Cells(i, "d").Value = "4-B Sözleşmeli" Then
Rows(i).EntireRow.Hidden = True
Cells(i, "cd").Value = ""
ElseIf Cells(i, "d").Value = "Emekli(ücretli)" Then
Rows(i).EntireRow.Hidden = True
Cells(i, "cd").Value = ""
ElseIf Cells(i, "d").Value = "Ücretli" Then
Rows(i).EntireRow.Hidden = True
Cells(i, "cd").Value = ""
End If
Next
Range("A1").Select
MsgBox "işlem tamam"
End Sub

Sub GÖSTER()
Cells.Select
Selection.EntireRow.Hidden = False
For i = 10 To 77
Cells(i, "cd").Value = "=RC[-53]+RC[-40]+RC[-27]+RC[-14]+RC[-1]"
Next
Range("A1").Select
MsgBox "işlem tamam"
End Sub

 

[önder34]

Sayın Halit bey tek kelimeyle harikasınız kodlar işlem yapıyor iki düğme ekledim va çalışıyor.Takıldığım nokta "RC[-53]+RC[-40]+RC[-27]+RC[-14]+RC[-1]" buradaki RC ve rakmaları çözemedim . Çünkü benim satır eklemem gerekecek personel sayısı fazla olduğu bu fonksiyonda değişikilk yapmak gerekecek mi . Yardımınız için sonsuz teşekkürler

 

[halit3]

For i = 10 To 77

satırların değişiminde
yanlızca yukarıdaki kodda değişiklik yapacaksınız. 10 sayısı başlangıç satır sayısı,
77 sayısı başlangıç bitiş sayısı.

sütunlarda değişiklik yaparsanız kodların hepsinde değişiklikler gerekir.

 

[önder34]

teşekkür ederim ilginiz ve yardımınız için saygılarımla

 

[önder34]

Sayın halit bey çözmediğim sorun var gizleme yaptığım da tüm 4-b sözleşmeli ücretli ve emekli(ücretlileri isimlerini ve satırları gizliyor ancak ekders ücret toplamlarında sadece 4-b lilere ait ücretleri çıkarıyor diğerlerini toplamdan çıkarmıyor Gizlendiğinde hepsinin ücret toplamlarıda genel toplamda çıkarılmış olarak görünmesi gerekiyor ben çözemedim yardımınız bekliyorum

 

[halit3]

3 nolu mesajdaki kodu yeniden düzenledim

 

[önder34]

Sayın Halit bey soru ve sorunlarıma hızır gibi cevaplarla yetiştiniz .Size minnettarım sonsuz saygılarımla