• 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.

Çözüldü belirli sütunları silme

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.

Safih00

Yeni Üye
Kullanıcı Bilgileri
Aktiflik
Çevrimdışı
Katılım
6 May 2022
Mesajlar
9
Aldığı beğeni
0
Excel V
Office 2013 TR
Konuyu Başlatan
Herkese merhaba

3.sütunda bir değer aratıp belirli sütunları sildirmek istiyorum mesele A sütunundan E sütununa kadar.

Bunu offset ile "Range("C:C").find("Fatih").offset(0,1)=empty" vb. gibi ama bu kodla 5 sütun silmek istediğim zaman 5 satır kod yazmam gerekiyor.

Bu kodun daha pratik bir yolu var mıdır üstadlarım. Örnek görsel ve dosya koyuyorum yardımcı olursanız çok sevinirim.

1731495238776-png.30228
 

Ekli dosyalar

  • 1731495238776.png
    1731495238776.png
    12.3 KB · Gösterim: 19
  • örnek dosya.xlsx
    11.8 KB · Gösterim: 3
Çözüm
I1 hücresine aramak istediğiniz değeri yazın.
Ben select verdim.
İstediğiniz buysa bir altındaki satırı aktif edin.
Select ile ilgili satırı pasife alın.
Soruda belirsizlikler var. 2 Tane Fatih varsa ilkini bulur diğerini pas geçer.
Keza satır silmek, sütun silmek veya satırda belirli bir aralığı silmek yada
sütunda belirli bir aralığı silmek farklı kod yazımları gerektiren hususlar.
Farkettiyseniz istediğiniz buysa diye ben de bir koşul yapısı ekledim.
Kolay gelsin.

Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
Açıklamalar yetersiz. 3. sütunda aratacağınız değer ne? Silinecek sütunlar neye göre belirlenecek? Sütunlar komple mi silinecek, sadece hücrelerdeki veriler mi temizlenecek? Daha net açıklarsanız yapmak istediğinizi buna göre bir çözüm önerisinde bulunabiliriz.
 
Açıklamalar yetersiz. 3. sütunda aratacağınız değer ne? Silinecek sütunlar neye göre belirlenecek? Sütunlar komple mi silinecek, sadece hücrelerdeki veriler mi temizlenecek? Daha net açıklarsanız yapmak istediğinizi buna göre bir çözüm önerisinde bulunabiliriz.
3. sütunda aratacağım değer textbox1.text olsun
silinecek sütunlar görseldeki gibi sadece A sütunundan E sütununa kadar
hücrelerdeki değerler silincek sadece
 
Aratacağanız değer ne ifade ediyor verileri silmek için o halde, doğrudan seçin range aralığını ve Range("A:E").ClearContents ile temizleyin o halde bu kadar uğraşmaya ne gerek var?
 
Aratacağanız değer ne ifade ediyor verileri silmek için o halde, doğrudan seçin range aralığını ve Range("A:E").ClearContents ile temizleyin o halde bu kadar uğraşmaya ne gerek var?

Beyefendi ben bunu başka bir projede kullanacam örnek olarak verdim bu dosyayı. Yargılamak yerine biraz yardımcı olmaya çalışın lütfen destek ekibindensiziniz yardıma ihtiyacım olmasa yazmam. Yazıdıgım konuyu gereksiz buluyorsanız rica edeceğim silelim konuyu
 
I1 hücresine aramak istediğiniz değeri yazın.
Ben select verdim.
İstediğiniz buysa bir altındaki satırı aktif edin.
Select ile ilgili satırı pasife alın.
Soruda belirsizlikler var. 2 Tane Fatih varsa ilkini bulur diğerini pas geçer.
Keza satır silmek, sütun silmek veya satırda belirli bir aralığı silmek yada
sütunda belirli bir aralığı silmek farklı kod yazımları gerektiren hususlar.
Farkettiyseniz istediğiniz buysa diye ben de bir koşul yapısı ekledim.
Kolay gelsin.

Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
 

Ekli dosyalar

  • örnek dosya_mkR.xlsm
    23.2 KB · Gösterim: 1
Çözüm
I1 hücresine aramak istediğiniz değeri yazın.
Ben select verdim.
İstediğiniz buysa bir altındaki satırı aktif edin.
Select ile ilgili satırı pasife alın.
Soruda belirsizlikler var. 2 Tane Fatih varsa ilkini bulur diğerini pas geçer.
Keza satır silmek, sütun silmek veya satırda belirli bir aralığı silmek yada
sütunda belirli bir aralığı silmek farklı kod yazımları gerektiren hususlar.
Farkettiyseniz istediğiniz buysa diye ben de bir koşul yapısı ekledim.
Kolay gelsin.

Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
excelcan çok teşekkür ederim istediğim tam olarak buydu
 
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
Geri
Üst