Kelime Ayırma

[ogecen]

Merhaba arkadaşlar,
A1 de;
Adana - Taşköprü - Sabancı Cami – Gaziantep – Gaziantep Kalesi - Hz. Yuşa Türbesi - Bakırcılar Çarşısı - Almacı Pazarı – Kasteller - Tahmis Kahvesi – Şahinbey Milli Mücadele Müzesi - Zeugma Mozaik Müzesi olan bilgileri formül ile B1 e Adana, C1 e Taşköprü, D1 e Sabancı Cami gibi ayrı hücrelere nasıl yazdırabilirim

Saygılarımla

 

[Necdet]

Merhaba,

• Veri
• Metni Sütunları dönüştür
• Sınırlandırılmış
• Ayırıcılar --> diğer değeri -

tamam

 

[ogecen]

Necdet bey, geri dönüş için teşekkür ederim,
Metin sütunlara dönüştür ile çok denedim, ancak kelime uzunlukları çok farklı boyutlarda olduğu için olmadı, ve ya ben beceremedim, bu yüzden formül ile olabilir mi diye düşündüm
Saygılarımla

 

[Necdet]

Açıklamayı iyi uygulayın
Sınırlandırılmış bölümünü seçmelisiniz. Ayrıca tüm verilerinizde tümceler tire ile ayrılmış olmalı.

 

[ASLAN7410]

Merhaba, sanırım bu formül istediğinizi karşılıyor.

B1 hücresine yapıştırıp sağ tarafa doğru formülü sürükleyin.

=KIRP(PARÇAAL(YERİNEKOY(YERİNEKOY($A$1;"–";"-");"-";YİNELE(" ";UZUNLUK($A$1))); (SÜTUN()-SÜTUN($B$1))*UZUNLUK($A$1)+1; UZUNLUK($A$1)))

 

[ogecen]

Aslan7410
Çok teşekkür ederim, başarılı bir çalışma olmuş, elinize sağlık

 

[hüseyintok]

makro ile alternatif olabilir

Sub Ayirma()
Dim cell As Range
Dim text As String
Dim parts As Variant
Dim i As Integer

text = Range("A1").Value
parts = Split(text, " - ")
For i = 0 To UBound(parts)
Cells(1, i + 2).Value = parts(i)
Next i
End Sub