regexp yazımı

[Erdem Akdemir]

Merhaba,

A1 hücresinde hakaan1 yazıyor. Bu ifade içinden çift olan a harfini ve sayıyı çekmek istiyorum. Aşağıdaki kodu yazdım ama sonuç olarak n1 ifadesini getiriyor ama istediğim a1 ifadesi hatta bunları iki ayrı item içinde a ve 1 olarak nasıl getirebilirim.

Sadece Regexp çözümler için konuyu açtım. Öğrenmek için uğraştığım bir nesne ve çok kafa karıştırıcı.

Sub deneme()

Set reg = CreateObject("VBScript.RegExp")
reg.Pattern = "(\w)\1*([0-9])"
Set d = reg.Execute(Sayfa1.Range("a1"))
sonuc = d.Item(0).Value


End Sub

 

[Zeki Gürsoy]

Şu deseni kullanın; "aa" ve "1" dönecektir. "aa" için grup değeri "a" dır.

Öğrenmek için şu başlıkta ayrıntılı anlattım.

http://www.excel.web.tr/f165/duzenli-fadelerde-pattern-sembollerin-anlamlary-t122962.html

(\w)\1|\d+

 

[Erdem Akdemir]

Zeki bey teşekkür ederim.
Konuyu inceledim ve ordan çok şey öğrendim.

 

[Erdem Akdemir]

Zeki bey,

Çalışmanız çok başarılı. Elinize sağlık.

 

[Zeki Gürsoy]

Rica ederim. Ürkütücü bir konu sanırım ilgi görmüyor pek.

 

[Erdem Akdemir]

Rica ederim. Ürkütücü bir konu sanırım ilgi görmüyor pek.

Başlarken bende çok ürkütücü bulmuştum ama uğraştıkça ampul birden yandı diyebilirim.????

 

[Murat OSMA]

Başlarken bende çok ürkütücü bulmuştum ama uğraştıkça ampul birden yandı diyebilirim.

Erdem, ben sana çok da zor değil, ben çözdüğüme göre sen hayli hayli halledersin demiştim değil mi?
Zeki Bey'in bilgisi anlatımı iyidir mâlûm, onun da desteğiyle kolay kavrarsın. k::

Web'ten veri alma/gönderme işlerini de çözdün mü tamamdır. ​

 

[Erdem Akdemir]

Selam Murat'ım,

Sen çabuk öğreniyorsun excel olaylarını bu kadar mütevazi olma.
Web'ten veri alma işini seninle çözeceğiz, kaçış yok

 

[Murat OSMA]

Neyse.. konuyu dağıtmayalım.

Görüşürüz. ​