• DİKKAT

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

aynı hücredeki hafr ve rakamları bir birinden ayırmak

Katılım
24 Temmuz 2006
Mesajlar
12
03453450MIRLE
003453400BEYAZ
000DESERTO
0BURSAMAVİ
0BURSAMAVİ
034500BODRUM
000CUPPER
0450COGNAC
003450CIPRIA
034345REDRAME
00000HATUN
00000LILLA
000APRICOT
0GIALLOF/2
000LEVIRED
aynı hücredeki sayılardan ve harflerden oluşan metnin sadece metin kısmını farklı bir hücreye almak istiyorum bu konuda bir fikri olan var mı?
 
Harf Ayırma

Sayın Levent Beyin bir çalışmasını gönderiyorum size
 
Aşağıdaki kodları da kullanabilirsiniz.
Kod:
Sub HarfleriAyir()
' Raider
Set regEx = CreateObject("vbscript.RegExp")

   regEx.Pattern = "[0-9/]"
   regEx.IgnoreCase = 0
   regEx.Global = 1
   
For a = 1 To [a65536].End(3).Row
    Cells(a, "B") = regEx.Replace(Cells(a, "A"), "")
Next

Set regEx = Nothing
End Sub
 
Macrolu bir dosyayı açın.

alt+F11 tuşların aynı anda basın.
 
Sayın Levent Beyin bir çalışmasını gönderiyorum size

Necdet Bey,
regexp ile biraz çalışmalar yaptım. Zeki Gürsoy Bey'in tablosundan bayağı şey öğrendim. Ancak şunu regexp yapamadım;
karakterleri birbirinden boşluk veya karakter ile ayırmak. Örneğin
"ergün" metnini "e r g ü n" gibi. "güler" metnini " g-ü-l-e-r" gibi.
Ama dediğim gibi regexp ile yapmak istiyorum.
 
Geri
Üst