• Foruma hoş geldin 👋 Ziyaretçi

    Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı ya da giriş yapmalısınız. Foruma üye olmak tamamen ücretsizdir.

    Giriş yap veya Şimdi kayıt ol

Çözüldü B,C,D,E,F Sutunları Toplamı sıfır ise Sutunları sil

Rastgele Konu
Bu konu çözüldü olarak işaretlenmiştir. Çözülmediğini düşünüyorsanız konuyu rapor edebilirsiniz.
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
bulentkars

bulentkars

Yeni Üye
Katılım
30 May 2022
Mesajlar
605
Çözümler
5
Aldığı beğeni
95
Excel V
Office 365 TR
Arkadaşlar Merhaba;

Ekte örnek tabloda örnek ile anlattım;

Özetle;
B,C,D,E,F sutunlarının ayrı ayrı toplamlarına bakacak eğer Sıfır veya boş ise ilgili sutunları ve onlara kaşrşlık olan
H,I,J,K,L,M,N,O,P,Q sütünlerinı silmek istiyorum.

Yardımcı olabilirseniz sevinirim. Şimdiden Teşekkürler
 

Ekli dosyalar

Tarihe göre sırala Oylara göre sırala
örneklerinizi inceledim. Ancak yapılmak istenileni anlayamadım. örneğinizi manuel olarak detaylı anlatırsanız yardımcı olurum.
 
Olumlu oy 0 Negatif oyla
Merhaba;

B sutunu başlığının yardımcı sutunu I ve M sutunu
B sütününda eğer veri yoksa yani boş ise B ve I sutununu silecek.
C sütününü kontrol edecek eğer sutunda veri yok ise C ve J sutununu silecek.

Kontrol edilecek sutunlar B:F
her hangi bir sutun boş ise
H:Q arasını silecek.

1696346334618.png
 
Olumlu oy 0 Negatif oyla
eklediğiniz resimde silinecek sütunları yazarmısınız. D sütunu boş D ve J sütunları kaldırılacak hiç olmayacak. E sütunu boş olduğu için K ve E sütunu kaldırılacak MI????
 
Olumlu oy 0 Negatif oyla
Diğer örneklerde daha az sütun vardı sütun sayılarında farklılıklar mı var sabit mi
 
Olumlu oy 0 Negatif oyla
örnek1 de 1ve 2 barem örnek 2 de 1,2,3 barem var resimde 5 barem var sütunlar farklılıklar göstermiyor mu
 
Olumlu oy 0 Negatif oyla
Standart tablo Özet sayfası
sutunlar özet sayfasına göre yerleri sabit
B:F Arası boş olanların
H:Q arası sütunları silecek.
 
Olumlu oy 0 Negatif oyla
umarım doğru anlamışımdır
 

Ekli dosyalar

Olumlu oy 1 Negatif oyla
Çözüm
Adnan Bey Merhaba;

Tam istediğim gibi olmuş. Elinize emeğinize sağlık
sadece;

top1 = Application.WorksheetFunction.Sum(Range("B2:B6"))
B2:B son dolu hücreyi olursa tam istediğim olacak.
 
Olumlu oy 0 Negatif oyla
orayı( "b2:b" & son) olarak düzeltiniz
 
Olumlu oy 0 Negatif oyla
Adnan Bey;

Çok çok teşekkür ederim elinize emeğinize sağlık..

Bu satır fazla görünüyor silsem sorun olmaz değil mi? Teşekkürler

sut = Cells(1, Columns.Count).End(xlToLeft).Column


HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da üye ol.
 
Olumlu oy 0 Negatif oyla
onu sütun sayısı fazla yada az olsun denilmesi ihtimaline karşı yazmıştım silinebilir
 
Olumlu oy 0 Negatif oyla
iyi akşamlar
 
Olumlu oy 0 Negatif oyla
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
Geri
Üst