sadece - işaretine kadar olan metni aldırmak istiyorum

[aurer]

Merhaba,

bir hücre içindeki - işaretine kadar olan metni aldırmak istiyorum, birde bunu for döngüsüne sokarak aldırmak istiyorum nasıl yapabilirim, yardımlarınızı bekliyorum, şimdiden teşekkür ederim. iyi çalışmalar,

 

[hamitcan]

Dosyanızı ekleyin.

 

[aurer]

dosya eklenmiştir.

 

[hamitcan]

Veri>Metni Sütunlara Dönüştür(Sınırlandırılmış>Diğer(-) işaretini yazarak) fonksiyonunu kullanın.

 

[aurer]

dediğinizi yaptım ama işe yaramadı, metni istediğim kritere göre ayırmadı.

 

[hamitcan]

Metni seçin, kodu çalıştırın.

Sub Makro1()
    Selection.TextToColumns Destination:=Range("E5"), DataType:=xlDelimited, _
        TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _
        Semicolon:=False, Comma:=False, Space:=False, Other:=True, OtherChar _
        :="-", FieldInfo:=Array(Array(1, 1), Array(2, 1), Array(3, 1)), _
        TrailingMinusNumbers:=True
End Sub