Bir hücredeki veriyi parçalarına ayırma

[wisekhan02]

Çalıştığım bir projede elimdeki datalardaki kodlama sistemi noktalarla bölünüyor.Bende bu hücredeki metni her nokta geldiğinde ayırmak istiyorum vba kullanarak fakat mid fonksiyonunu kullanarak yapamıyorum.Çünkü noktalar arası karakter sayıları her satırda farklılık gösterebiliyor.
Örneğin;
Hücre içindeki kod 0100.1452E.3.HP iken ben benim belirlediğim hücrelerde parçalanmasını istiyorum 0100 1452E 3 HP şeklinde
ya da mesela 0100.1538E1.9.HZ'yi 0100 1538E1 9 HZ şeklinde farklı hücrelere getirmeli parçaal fonksiyonu ilede olmuyor çünkü metin uzunlukları değişiyor görüldüğü gibi.Bu nedenle noktaları referans alarak bölecek birşey istiyorum ancak bunu excelin metni sutunlara dönüştür özelliği ile de yapmak istemiyorum çünkü oluşturduğum excel şablonunu hantallaştırıyor ve parçalanmış hücreleri ana hücremi değiştirdiğimde otomatik olarak değiştirmiyor haliyle.
Şimdiden yardımlarınız için çok teşekkür ederim.

 

[parametre]

http://www.excel.web.tr/f48/hucre-icindeki-belirli-iki-karakter-arasini-almak-t6183.html

buradaki çalısma işinizi gorurmu

 

[Mehmet Şahin]

Merhaba,

=SUBSTITUTE(a1;".";" ")

şeklinde deneyiniz.

vba için;

Cells(i, "b") = Application.WorksheetFunction.Substitute(Cells(i, "a"), ".", " ")