• DİKKAT

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

sutunda silme

  • Konbuyu başlatan Konbuyu başlatan tuncel
  • Başlangıç tarihi Başlangıç tarihi
Katılım
16 Şubat 2006
Mesajlar
11
arkadaşlar merhaba

ben excell raporunun herhangi bir sütunudaki satırların ilk 6 karekterden sonra nasıl silebilirim.

örnek:st-210 anadol marş kollektörü

anadol marş kollektörü'nü formülle nasıl silerim.

bu 10.000 satırlık bir rapor.
 
Kod:
=PARÇAAL(A1;1;6)

ile st-210 olanı ayırırsınız.

Kod:
=KIRP(YERİNEKOY(A1;PARÇAAL(A1;1;6);""))

ilede st-210'dan sonra geleni ayırırsınız.
 
Makrolu Çözüm. A sütunu baz alınmıştır.
Kod:
Sub Makro1()
[A1:A10000].TextToColumns Destination:=Range("A1"), DataType:=xlFixedWidth, _
FieldInfo:=Array(Array(0, 1), Array(6, 1)): [B:B] = vbNullString
End Sub
 
çok teşekkür ederim.sağol bayağı işime yaradı
 
Geri
Üst