E

Çözüldü Hücre Boşsa Gruptan Birini Random Yazdır

  • Konuyu başlatan Konuyu başlatan ekrmy
  • Başlangıç tarihi Başlangıç tarihi

ekrmy

Site Üyesi
Excel Versiyonu
Excel 2016
Excel Sürümü
64 Bit
Excel Dili
Türkçe
Merhabalar,

Aldığımız Data'da kayıtlar kullanıcılara atanmayabiliyor. Kullanıcı bölümü boş kalıyor. Örnek bir dosya oluşturdum.

  • B sütunu kaydın hangi kullanıcı tarafından kontrol edileceğini ifade etmektedir.
    • Ataması yapılmamış kaydın kullanıcı kısmı boş gelmektedir.
    • Amaç boş hücreleri random ilgili ekipteki (Grup) kişilere atamak. Liste'de kullanıcıların hangi grupta olduğu belirtilmiştir.
Rastgele formülü ile uğraşsam da yapamadım. Destek olursanız çok sevinirim.

İyi çalışmalar.
 

Ekli dosyalar

@ekrmy

-- UZAY ve ROBOT ibareleri KOD'da da kullanıldı.
VBA ekranında CTRL+H ile bunları gerçek belgedeki verilerle değiştirin.

-- Benzer değişiklik Çalışan Listesi sayfasındaki E sütununda yer alan ÖZET BİLGİ sütunundaki formülde de yapıldı.
Bu formüldeki UZAY ve ROBOT ibarelerini de benzer şekilde, gerçek verilerdeki ibarelerle değiştirin.

-- Hem TEMİZLE, hem de DAĞITIM makrosunda DEĞİŞİKLİKler mevcut.

Çalışan Kişiler sayfasında bir GRUP için SEGMENTerden biri var diğeri yoksa
ilgili GRUP dikkate alınarak, BOŞ olanlardan yine DENGELİ olarak dağıtım yapılır.

Belgedeki kodlar aşağıda gösterildi.

VBA:
Görüntülemek için giriş yapmanız gerekmektedir.
(50 satır)
.
Üsdat teşekkür ederim emekleriniz için, kaçırdığım/atladığım birşey mi oldu acaba aynı şekilde sorun devam ediyor :)
 

Ekli dosyalar

@ekrmy
Bundan önceki cevabımda hedef, Çalışan Listesi sayfasında SEGMENT bilgisi olmayanların da dağıtıma dahil olmasına yönelikti.
Çünkü sorunuzu öyle anlamıştım ve Çalışan Listesi sayfasında son iki satırda bu bilgiler yok idi.

Her neyse, gerek yukarıdaki gibi bir durum ve gerekse de eklediğiniz son belgedeki isteklerin tümünü karşıladığını düşündüğüm belgeniz ekte.
Denersiniz. Umarım tamamlanmıştır.

Gerçek belgenizde UZAY ve ROBOT ibarelerinden farklı ibareler olabileceğini sanıyorum.
Bu iki kelimenin, Kişi Listesi sayfası E sütunundaki sonuç kontrol hesaplama formüllerinde ve
VBA ekranındaki kodlarda da kullanılıyor olduğunu bir kez daha hatırlatayım.
Hem sayfada hem de VBA ekranında CTRL+H yöntemiyle ROBOT ve UZAY kelimelerini gerçek kelimelerinizle değiştirirsiniz.

.
 

Ekli dosyalar

@ekrmy
Bundan önceki cevabımda hedef, Çalışan Listesi sayfasında SEGMENT bilgisi olmayanların da dağıtıma dahil olmasına yönelikti.
Çünkü sorunuzu öyle anlamıştım ve Çalışan Listesi sayfasında son iki satırda bu bilgiler yok idi.

Her neyse, gerek yukarıdaki gibi bir durum ve gerekse de eklediğiniz son belgedeki isteklerin tümünü karşıladığını düşündüğüm belgeniz ekte.
Denersiniz. Umarım tamamlanmıştır.

Gerçek belgenizde UZAY ve ROBOT ibarelerinden farklı ibareler olabileceğini sanıyorum.
Bu iki kelimenin, Kişi Listesi sayfası E sütunundaki sonuç kontrol hesaplama formüllerinde ve
VBA ekranındaki kodlarda da kullanılıyor olduğunu bir kez daha hatırlatayım.
Hem sayfada hem de VBA ekranında CTRL+H yöntemiyle ROBOT ve UZAY kelimelerini gerçek kelimelerinizle değiştirirsiniz.

.
Merhaba Ömer Bey,

H Sütununda isimleri olan kullanıcılara atama yapmıyor. Dosyada belirtiyorum. Teşekkür ederim.
 

Ekli dosyalar

-- Kodun baş tarafında yer alan aşağıdaki satırların sol başlarına birer tane TEK TIRNAK işareti ekleyerek etkisiz hale getirin.
(TEK TIRNAK ekleyince satırın yazı rengi yeşile dönüşür)

VBA:
Görüntülemek için giriş yapmanız gerekmektedir.
(5 satır)

-- Sonra da, kodun sonuna yakın 20: End If: Next şeklindeki satırın üstüne yeni bir satır olarak şu satırı ekleyin.

VBA:
Görüntülemek için giriş yapmanız gerekmektedir.
(1 satır)

.
 
-- Kodun baş tarafında yer alan aşağıdaki satırların sol başlarına birer tane TEK TIRNAK işareti ekleyerek etkisiz hale getirin.
(TEK TIRNAK ekleyince satırın yazı rengi yeşile dönüşür)

VBA:
Görüntülemek için giriş yapmanız gerekmektedir.
(5 satır)

-- Sonra da, kodun sonuna yakın 20: End If: Next şeklindeki satırın üstüne yeni bir satır olarak şu satırı ekleyin.

VBA:
Görüntülemek için giriş yapmanız gerekmektedir.
(1 satır)

.
Ömer Hocam,
Elinize emeğinize sağlık. Gerçekten büyük emek, her şey için çok teşekkürler. Minnettarım...
 
@ekrmy
O halde nihai çözüm dosyasını ve kodları bu cevaba ekleyeyim.
Benzer ihtiyacı olanlar, mesajlar, belgeler arasında boğulmadan kolaylıkla sonuca ulaşabilsin.

Çözüm belgesi ekteki gibi olup, belgede kullanılan kodlar aşağıda gösterilmiştir.
Belki sadece Çalışan Listesi sayfasında;
-- E sütunundaki formül de birinci formülle değiştirilebilir
-- F sütununa da aşağıdaki ikinci formül uygulanabilir.
Böylece hem veri miktarı değişikliğinde formülleri güncelleme gerekmez, hem de yapılan yeni dağıtım sonuçları elde edilmiş olur.

Sonradan eklenen not: Formüller ve kodlarda, hızlanmaya yönelik küçük değişiklikler yapıldı ve eklenen sonuç belgesi de
buna göre güncellendi. 13.08.2021 01:00


Kod:
Görüntülemek için giriş yapmanız gerekmektedir.
(2 satır)

VBA:
Görüntülemek için giriş yapmanız gerekmektedir.
(53 satır)

.
 

Ekli dosyalar

Bir önceki nihai çözüm cevabımı güncelledim.
Örnek belge dahil yeni haline, sayfayı yenileyerek tekrar bakılmasında yarar var.
Ömer Hocam,

Özelden durumu belirttim. Eşit atamada sorun var. Belirttiğiniz güncel kod ve dosyada denedim sonuç değişmedi.

Tekrar dağıtım yap dediğimde totalde kayıt sayısı düşük olana tüm yeni atamaları yaptı. Sanırım var olan atamalarıda değerlendiriyor. Var olan H boşsa yeni kayıt anlamına geliyor amacımız bu yeni kayıtları ilgili takım ve gruplara eşit olarak dağıtmak. Atladığım bir nokta varsa kusuruma bakmayın lütfen. :)

Dosyaları ek olarak paylaşıyorum.
 

Ekli dosyalar

Ekli dosyalar

  • 1630919632825.webp
    1630919632825.webp
    2.4 KB · Görüntüleme: 0
@ekrmy
50 numaralı cevap ekindeki belgeyi yeniledim.
Belgeyi tekrar indirerek gerekli kontrolü yaparsınız.

.
Merhaba Ömer Bey,

Dosyada işlem hızı %100 farklı olmuş elinize sağlık.

Ek olarak paylaşıyorum.

1. Segment te çalışan varken diğer segmentte kayıt ataması yapıyor. Kırmızı olarak belirtim.
2. Çalışan listesinde eski dağılım sanırım segment ve kullanıcı adından sayıyor. Kullanıcıya atanmış farklı segment kayıtları olabiliyor. Kullanıcıdaki net sayıyı görmek için kullanıcı adından gitmesi yeterli olacak gibi.

Şimdilik bu 2 durumu tespit ettim.

Emeğinize sağlık Ömer Bey.
 

Ekli dosyalar

@ekrmy
50 numaralı cevap ekindeki belgeyi tekrar yeniledim.
Belgeyi tekrar indirerek gerekli kontrolü yaparsınız.

Son mesaja eklediğiniz belgede hatalı sonuç almanızın nedeni; Robot yerine Rabot yazılması. ;)
Ayrıca; yenilediğim belgede Çalışan Listesi sayfası E sütunundaki SAYIM, ANA DATA sayfası H sütunundaki İSİM ADETİ olarak değiştirildi.

.
 
@ekrmy
50 numaralı cevap ekindeki belgeyi tekrar yeniledim.
Belgeyi tekrar indirerek gerekli kontrolü yaparsınız.

Son mesaja eklediğiniz belgede hatalı sonuç almanızın nedeni; Robot yerine Rabot yazılması. ;)
Ayrıca; yenilediğim belgede Çalışan Listesi sayfası E sütunundaki SAYIM, ANA DATA sayfası H sütunundaki İSİM ADETİ olarak değiştirildi.

.
Merhaba Ömer Bey,

Hatam için kusura bakmayın. :)
Dağıtım ve diğer konularda bir sorun görünmüyor gibi sadece yeni dağıtımda fazladan yazım yapıyor :) Örneğin 1 kayıt gitmiş kişiye 2 yazıyor veya gitmiş 5 gitmiş 8 yazıyor.

İyi çalışmalar.
 

Ekli dosyalar

Çalışan Listesi sayfası E sütununda,
ANA DATA sayfasındaki Grup ve Proje sütunlarına hiç bakmadan doğrudan İSİM sayısının mı bulunması gerekiyor?

Verdiğiniz olması gereken sonuç sayıları 1'er fazla sanırım. ANA DATA sayfasında sadece H sütunu filtrelendiğinde; atakan 39, ceren 43 adet.

.
 
Çalışan Listesi sayfası E sütununda,
ANA DATA sayfasındaki Grup ve Proje sütunlarına hiç bakmadan doğrudan İSİM sayısının mı bulunması gerekiyor?

Verdiğiniz olması gereken sonuç sayıları 1'er fazla sanırım. ANA DATA sayfasında sadece H sütunu filtrelendiğinde; atakan 39, ceren 43 adet.

.
ANA DATA sayfasındaki Grup ve Proje sütunlarına hiç bakmadan doğrudan İSİM sayısının mı bulunması gerekiyor?
-Evet
Verdiğiniz olması gereken sonuç sayıları 1'er fazla sanırım. ANA DATA sayfasında sadece H sütunu filtrelendiğinde; atakan 39, ceren 43 adet.
Evet 1 fazla yazmışım Ömer Bey
 
Üst