Departmanlara Pdks Hakaretlerini Aktarma

Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...

YasarPiskin

VIP Üye
Kullanıcı
Katılım
6 Ara 2016
Mesajlar
2,059
Excel Versiyonu
Excel 365
Excel Sürümü
64 Bit
Excel Dili
Diğer
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 1 departmanın C sütunundaki sicil numaralarına göre aktarım yapmaktadır. Burada yapmak istediğim şey bir tek departmana değil de 1 den 12 ye kadar olan departmanların C sütunlarındaki sicil numaralarına göre aktarım yapılmasının sağlamak için mevcut kodun iyileştirilmesi hususunda yardımlarınızı rica ediyorum.
 

Ekli dosyalar

Çözüm
@YasarPiskin

Kodu şöyle değiştirip dener misiniz?

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.
(12 satır)
@YasarPiskin

Kodu şöyle değiştirip dener misiniz?

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.
(34 satır)
 
Çözüm
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Benzer Konular Popüler İçerikler Daha Fazlası
Geri
Üst Alt