Pdks Puantajı Şubelere Aktarma

YasarPiskin · 22 Mar 2023

Bir önceki konu kapandığı için tekrar açıyorum. FACE sayfasındaki mevcut kod A sütunundaki sicil numaralarının günlük hareketlerini D sütunundaki tarih esas alınarak N1 hücresindeki YOLLA butonu ile departmanları temsil eden 1, 2, 3.... sayfalarının C sütunundaki sicil numaralarına göre aktarım yapmaya çalıştığım mevcut kod sadece 3 nolu departmana aktarım yapmaktadır. Her departmandaki sicil tek yerde kullanılmaktadır. Mevcut kodu her departmana aktarım yapmasını sağlayacak şekilde iyileştirilmesi hususunda yardımlarınızı rica ediyorum.

Ömer BARAN · 22 Mar 2023

1'den 12'ye kadar sayfalar olduğunu görünce, bunların AY sayfaları olduğunu düşünmüş ve
FACE isimli sayfada D sütunundaki TARİH'in ay kısmına bakarak bilginin hangi sayfaya yazdırılacağı kararı verilecek şekilde
kod önerisinde bulunmuştum.

Her neyse, kodu şöyle değiştirin.

NOT: Forum yazılımımızdan kaynaklı bir sorun nedeniyle ilgili yere yazamadığım,
kodda yer alan If sf.Range("D" & i) Mod 7 = 1 Or Application.Count(Sheets.... kısmındaki
Count ibaresini CountIf olarak değiştirip kullanın.

VBA:

İndirmek için giriş yapmanız gerekmektedir.
(37 satır)

YasarPiskin · 22 Mar 2023

Çok teşekkür ederim.

	Günlük Puantajı Şubelere Aktarma YasarPiskin 30 Mar 2023 Makro Soruları
	Günlük Pdks Hareketlerini Aktarma YasarPiskin 22 Haz 2023 Makro Soruları
	Departmanlara Pdks Hakaretlerini Aktarma YasarPiskin 21 Mar 2023 Makro Soruları
	PDKS Sistemlerinden Veri Çekme ExcelDepo 28 Tem 2024 Makro Soruları
	Cihaz Numaralarına Göre Günlük PDKS Raporu Alma YasarPiskin 17 Mar 2023 Makro Soruları