Bir Satırdaki Verileri Karaktere Göre Ayırma

[ozguozbek]

ÖRNEĞİN RESİMDE DE GÖZÜKTÜĞÜ GİBİ AYNI SATIRIN İÇİNDE 3 FARKLI VERİ VAR VE HER BİRİNİN ARASINDA <br> KARAKTERİ VAR. BEN BİR FORMÜL ARACILIĞI İLE BU 3 VERİYİ AYRI AYRI 3 SATIRDA YAZDIRABİLİRMİYİM ?

SAYGILAR...

MARMARİS - MUĞLA<br> ADANA HATAY<br> 5111111111 / --> YANİ BURASI 1 SATIR


İSTEDİĞİM;

YUKARIDAKİ A1 İSE. ÖRNEĞİN ;

A2 KOLONUNDA = MARMARİS - MUĞLA
A3 KOLONUNDA = ADANA HATAY
A4 KOLONUNDA = 5111111111 /

NASIL YAZMASINI SAĞLAYABİLİRİM ?

 

[Orion1]

Sub ayir()
Dim deg, i As Integer, sat As Integer
Range("A2:A65536").ClearContents
deg = Split(Range("A1").Value, "<br>")
sat = 2
For i = LBound(deg) To UBound(deg)
    Cells(sat, "A").Value = deg(i)
    sat = sat + 1
Next i
End Sub

 

[ozguozbek]

hızlı cevabınız için çok teşekkür ederim ama bu kodları nereye yazacağım

 

[ozguozbek]

tamam onu yaptım ama b1 c1 d1 kolonuna yazdırmak istiyorum yukarıda yanlış sormuşum

 

[muygun]

Merhaba;
İşlevlerle bir çözümde benden
İyi çalışmalar.

 

[Ali]

A sütunun komple seçin.CTRL+H tuşu ile değiştir menüsünü açın.Aranan kısmına <br> yeni değer kısmına / yazın. Tümünü değiştiri tıklayın. A sütununuzda <br> olan tüm değerler / ile ayrılmış olacak.

Yani

MARMARİS - MUĞLA/ADANA HATAY/ 5111111111

şekline dönüşecek. Şimdi Veri/Metni Sütunlara Dönüştür/Sınırlandırılmış kısmını tıklayıp ileri deyin. Diğer kısmı kutucuğuna / yazıp ileri ve sonu tıkladığınızda verileriniz. B, C ve D sütunlarına ayrılacaktır.

.

 

[ozguozbek]

cevaplar süper ancak sn. Evren Gizlen verdiğiniz formül a2 a3 a4 sütünları yerine b1 c1 d1 e yazsa bunu nasıl yapabiliriz ?

 

[ozguozbek]

A sütunun komple seçin.CTRL+H tuşu ile değiştir menüsünü açın.Aranan kısmına <br> yeni değer kısmına / yazın. Tümünü değiştiri tıklayın. A sütununuzda <br> olan tüm değerler / ile ayrılmış olacak.

Yani

MARMARİS - MUĞLA/ADANA HATAY/ 5111111111

şekline dönüşecek. Şimdi Veri/Metni Sütunlara Dönüştür/Sınırlandırılmış kısmını tıklayıp ileri deyin. Diğer kısmı kutucuğuna / yazıp ileri ve sonu tıkladığınızda verileriniz. B, C ve D sütunlarına ayrılacaktır.

.

bu işimi gördü harikasınız çook teşekkürler...