• DİKKAT !

    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 Dosya Yükleme tamamen ücretsizdir.

Çözüldü Başlık Yazılı Olmayan Boş Sütunları Makro İle Döngü Kullanarak Silmek

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.

ERDAL

Gold Üye
Katılım
3 Nis 2021
Mesajlar
293
Çözümler
1
Aldığı beğeni
51
Excel V
Office 2013 TR
Gold Bitiş
21 Mart 2027
Konu Sahibi
Merhaba Değerli ExcelCozum.Com kullanıcıları;

Yapmak İstediğim; " Excel çalışma kitabındaki başlık yazılı olmayan boş sütunları(Eğer başlık yazılı değilse sil) makro ile döngü kullanarak silmek istiyorum.

Örnek tabloyu ekledim.

Yardımlarınız için şimdiden teşekkür ederim.
 
Eğer sütunları tablo olarak tanımlamadıysanız son dolu sütuna kadar işlem yapılabilir. Şayet başlıklar 20 veya başka rakam sütundan oluşur sabitti derseniz işlem yapılabilir
 
Sayın ERDAL, buyurun:
 
Çözüm
alternatif olsun
sabit 20 sütun

Sub sutunsil()

For i = 20 To 1 Step -1
If Cells(1, i) = "" Then

Columns(i).Delete

End If
Next i
End Sub
 
Konu Sahibi
Adnan Bey,

Elinize emeğinize sağlık teşekkür ederim.

Acaba sabit 20 sütun yerine son sütunu bularak yapabiliriyiz.
 
Tabiiki son sütuna göre yapılabilir. Aşağıdaki kodu kullanab
HTML:
CSS:
İçeriği görebilmek için Giriş yap ya da Üye ol.
ilirsiniz
 
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
Geri
Üst