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....
 
Katılım
15 Haziran 2006
Mesajlar
3,704
Excel Vers. ve Dili
Excel 2003, 2007, 2010 (TR)
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
 
Katılım
15 Ekim 2006
Mesajlar
35
Excel Vers. ve Dili
2003 tr
teşekkür

yardimlariniz icin tesekkurler
 
Üst