Merhabalar arkadaşlar işim excel ile değil ama excelde yapılabileceğini tahmin ediyorum konu başlığından anlaşılıyodur yinede daha acıklayıcı anlatmam gerekirse sorunum 2 ye ayrılıyor;


1. Elimde alt alta sıralanmış bu tür kelime guruplarını var hücrelerdeki tekrarları kaldırıp teke düşürmem gerekiyo ama bunu yaparken Oil kelimesi kaldırırken aynı zamanda Oil Industry kelimesinin içerisindeki Oil kelimesini kaldırmıyacak


2. si ise yukarıdaki gibi kelimeleri tek bir hüçreye birleştirip aralarına virgül koyması
Yardımınız gerçekten çok makbule geçecek çok uzak olduğum bir konu en aznından 2 sinden bir tanesini bile halledebilmem beni epey bi meşgaleden kurtaracak şimdiden çok teşekkür ederim.

Aşağıdaki kod ile koyca tekrarlanan kelimeleri yok edebilirsin.

Kod: Tümünü seç

Sub TekrarYok()
For X = [A65536].End(3).Row To 1 Step -1
If WorksheetFunction.CountIf(Range("A1:A" & X), Cells(X, "A")) > 1 Then Rows(X).Delete
Next
MsgBox "Artık tekrarlanan kelime yok.", vbInformation
End Sub

çok teşekkür ederim üstad biraz uğraş sonucu formülü nasıl kullanacağımıda öğrenerek denedim ki uygulamada tam netice aldım geriye birleştirip aralarına virgün atmam kaldı