Sosyometri Listesinde Kırmızı ve Siyah Yıldızlar

merakli · 4 Ara 2021

@Ömer BARAN Bey Öğrenciler Arası Tercih İstatistiklerini Listeleme İşlemi başlığı altında Kırmızı, Siyah ve Mavi Çiftlerin Listelerini Oluşturmuştu.

Bu raporda ise,

Kırmızı ve Siyah Yıldızların Listeleme işlemi yapmaya çalışıyoruz.
Kimdir bu Kırmızı ve Siyah Yıldızlar?

Kırmızı Yıldız
İstenilenler listesinde en az 5 ve üstünde kişinin istediği isimleri simgeliyor.
Kaç kişi istediyse o kişilerin listesi de bu ismin altında listeleniyor

Siyah Yıldız
İstenilmeyenler listesinde en az 5 ve üstünde kişinin istemediği isimleri simgeliyor.
Kaç kişi istemediyse o kişilerin listesi de bu ismin altında listeleniyor.

Excel dosyasında Açıklama sayfasında da görsel olarak açıklamaya çalıştım.
Raporlama sonucunda çıkacak isimleri de manuel olarak ekledim.

Ömer BARAN · 5 Ara 2021

Kırmızı ve Siyah yıldızlar için şu kodlar kullanılabilir.
Her iki sayfada A3:B4 aralığının biçimlendirmeleri hazır olmalıdır.
Yalnız 4-5 her neyse grup sayısı fazla olduğunda alta geçerek listeleme sıkıntılı.
Listelemelerin tümü yıldız isimleri 3'üncü satırda olacak şekilde sağa doğru sütunlarda yapılır ve renk/kenarlık vs
A3:B4'ten alınarak ve her grubun sağında sonraki grupla arasındaki noktalı kenarlık, sütun genişlikleri vs dahil listeleme gerçekleştirilir.

[REPLY]

VBA:

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

[/REPLY]

merakli · 5 Ara 2021

Ömer BARAN' Alıntı:
Kırmızı ve Siyah yıldızlar için şu kodlar kullanılabilir.
Her iki sayfada A3:B4 aralığının biçimlendirmeleri hazır olmalıdır.
Yalnız 4-5 her neyse grup sayısı fazla olduğunda alta geçerek listeleme sıkıntılı.
Listelemelerin tümü yıldız isimleri 3'üncü satırda olacak şekilde sağa doğru sütunlarda yapılır ve renk/kenarlık vs
A3:B4'ten alınarak ve her grubun sağında sonraki grupla arasındaki noktalı kenarlık, sütun genişlikleri vs dahil listeleme gerçekleştirilir.

*** Hidden text: cannot be quoted. ***

Teşekkür ederim çalıştı.
çok veri olduğunda şuan siyah yıldızlarda olduğu gibi liste sağa doğru uzayacak bu işlemi 5 tablo sonrasında alt satırlardan devam etmesi sağlanabilir mi?

Ömer BARAN · 5 Ara 2021

Ömer BARAN' Alıntı:
Kırmızı ve Siyah yıldızlar için şu kodlar kullanılabilir.
Her iki sayfada A3:B4 aralığının biçimlendirmeleri hazır olmalıdır.
Yalnız 4-5 her neyse grup sayısı fazla olduğunda alta geçerek listeleme sıkıntılı.
Listelemelerin tümü yıldız isimleri 3'üncü satırda olacak şekilde sağa doğru sütunlarda yapılır ve renk/kenarlık vs
A3:B4'ten alınarak ve her grubun sağında sonraki grupla arasındaki noktalı kenarlık, sütun genişlikleri vs dahil listeleme gerçekleştirilir.

*** Hidden text: cannot be quoted. ***

Elbette imkansız değil de; belirtmiştim sıkıntılı iş. Zira kaç satır aşağıdan başlanacağı da sabit değil.
Bakarız uygun bir vakit.

merakli · 5 Ara 2021

Ömer BARAN' Alıntı:
Elbette imkansız değil de; belirtmiştim sıkıntılı iş. Zira kaç satır aşağıdan başlanacağı da sabit değil.
Bakarız uygun bir vakit.

30 kişilik sınıfta 15 kişiyi geçme ihtimali çok az
Satır yüksekliklerini 16 yaptığımızda ve görseldeki gibi 15 isim/satırla sınırladığımızda işimizi fazlasıyla görecektir.
Çıktısı aşağıdaki gibi

Ömer BARAN · 5 Ara 2021

Önceki kodda küçük bir düzenlemeyle sanırım halloldu (sayfayı yenileyerek önceki kodları kontrol edin)
Grup adetini (5 ve daha fazla ismi yazılan kişi adeti) ve en fazla yazılma adetini (YUSUF AL için 10 sayısını)
kaynakta artırarak kodların yeni halini bir deneyin bakalım.

.

merakli · 5 Ara 2021

evet siyah yıldızlar 4 ten itibaren böldü bunu sabit hep 5. den sonra alt satıra indirme yapabilir miyiz?

Ömer BARAN · 5 Ara 2021

Koddaki If say > 5 Then kısmındaki 5 sayısı yan yana yazılacak grup adetini belirliyor.
Bunu 4 yaparsanız 4 grup yan yana yazılmış olur.
Ayrıca; eksat = 3 + ef kısmındaki 3 sayısı -1, alta geçildiğinde boş bırakılacak satır sayısını veriyor, onu da değiştirebilirsiniz.
Örneğin 2 yazarsanız 1 satır boşluk olur.

merakli · 5 Ara 2021

Ömer BARAN' Alıntı:
Koddaki If say > 5 Then kısmındaki 5 sayısı yan yana yazılacak grup adetini belirliyor.
Bunu 4 yaparsanız 4 grup yan yana yazılmış olur.
Ayrıca; eksat = 3 + ef kısmındaki 3 sayısı -1, alta geçildiğinde boş bırakılacak satır sayısını veriyor, onu da değiştirebilirsiniz.
Örneğin 2 yazarsanız 1 satır boşluk olur.

kodu güncellediniz sanki 5 li olarak böldü
Teşekkürler.

	Tarih listesindeki boşluğu sorgulama Gotouzaklar 1 Eyl 2019 Makro Soruları
	Listview Listesinde Seçili Personeli Silme halily 6 Tem 2022 Makro Soruları
	Veri Listesinde Değişen Verileri Sıfırlama Ömer BARAN 19 Şub 2021 Makro Soruları
	Listview Listesinden Seçilen Sayfayı Yazdırma Ömer BARAN 25 Şub 2023 Makro Soruları