• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Sayfalardan sütun süzme

Katılım
15 Ekim 2006
Mesajlar
35
Excel Vers. ve Dili
2003 tr
Kheops dan alıntı :

Elimde 380 küsur sheet'lik bir excel dosyası var ve her sheet tablosu aynı fakat içeriği farklı. Ben bu sayfaların hepsinde sadece bir sütun kalsın istiyorum. Tek tek yapmak çok uzun sürecek. Tek bir komutla, scriptle ya da formül'le bunun bi yöntemi var mıdır?


Şimdiden teşekkür ederim....
 
Aşağıdaki gibi olabilir. Bu kod "A:C" kolonlarını siler. Siz kendinize göre değiştirirsiniz.

Kod:
Sub sil()
  For i = 1 To Sheets.Count 
      Sheets(i).Columns("A:C").ClearContents
  Next i
End Sub
 
teşekkür

yardimlariniz icin tesekkurler
 
Geri
Üst