Metni Cümle, kelime ve hecelerine ayırma(Word dosyasında)

leumruk

Uzman
Uzman
Katılım
15 Nisan 2007
Mesajlar
3,469
Excel Vers. ve Dili
Office 2010 & 2013 tr
Selamlar,
Forumda cevapladığım bazı kodları geliştirerek ve bir araya getirerek örnek bir Word dosyası hazırladım. Bu dosyada metni:
1) Cümlelerine ayırabilirsiniz.
2) Kelimelerine ayırabilirsiniz.
3) Hecelerine ayırabilirsiniz.
Hecelerine:
- Tire ile,
- Çift renk ile
- Ayrı renkler ile ayırabilirsiniz.
Güncelleme:
1) Kelime ayırma kodu hızlandırıldı.
2) Noktalama silme kodu eklendi.
3) Cümle oluşturma makrosunda "iki nokta" ve "kısaltma" şartları eklendi.
4) Yapılan işlemi geri alma özelliği eklendi.
5) Word dosyası seçerek metin ekleme özelliği eklendi.
6) Yapılan işlemlerden sonra, işlemlerin öncesine dönme özelliği eklendi.
7) İşlem yapılan metni, farklı dosya olarak kaydetme özelliği eklendi.
NOT: İŞLEM FORMU "CTRL Ç" ile çalışmaktadır.

Alternatif Link: Tıklayınız...
 

Ekli dosyalar

Son düzenleme:

yanginci34

Altın Üye
Katılım
6 Temmuz 2010
Mesajlar
1,590
Excel Vers. ve Dili
excel2016
Altın Üyelik Bitiş Tarihi
12-10-2026
Hocam emeğinize sağlık. Çok verimli ve güzel bir çalışma olmuş.
 

Ömer BARAN

Uzman
Katılım
8 Mart 2011
Mesajlar
13,002
Excel Vers. ve Dili
Office 2013 ( 32 bit ) TÜRKÇE
Altın Üyelik Bitiş Tarihi
(18.03.2020) - Uzman olduğu için tarih geçersiz oldu.
Merhaba Sayın ALTUN.

Elinize-emeğinize sağlık. Mükemmel ötesi oldu, olayı WORD'e de taşamanız güzel olmuş.
.
 

klop01

Altın Üye
Katılım
19 Aralık 2016
Mesajlar
628
Excel Vers. ve Dili
2021 Türkçe 64 Bit
Altın Üyelik Bitiş Tarihi
07-02-2028
Mustafa Hoca'm,
Çalışmanızdan dolayı tebrik ediyorum. Faydalı bir çalışmaya imza attınız. Ellerinize, bilginize sağlık.
Hızlıca birkaç deneme yapayım dedim. Birkaç husus ortaya çıktı.
Sonuçlar:
1. Aşağıdaki iki örnek cümlede cümlelere ayırma yapmadı. Ayrıca bu cümleleri çoklu renkte hecelemeyip hata veriyor.
Millî Edebiyat akımının temsilcilerinden bir kısmını sıralayalım: Ömer Seyfettin, Halide Edip Adıvar, Ziya Gökalp, Mehmet Emin Yurdakul, Ali Canip Yöntem.
Kendimi takdim edeyim: Meclis kâtiplerindenim.

İki nokta işareti ile ilgili bir sıkıntı var gibi geldi bana.

2. "CommandButton1" yerine "Menüyü Aç" yazılsa ya da CommandButton1'e tıkladığımızda çıkan menü -teknik olarak mümkünse- ekranda olsa daha iyi olabilir diye düşünüyorum.
 

klop01

Altın Üye
Katılım
19 Aralık 2016
Mesajlar
628
Excel Vers. ve Dili
2021 Türkçe 64 Bit
Altın Üyelik Bitiş Tarihi
07-02-2028
Demin yazmayı unutmuşum.

Ord. Prof. Dr. Sulhi DÖNMEZER / Yb. Alim Yılmaz
Yukarıdaki iki isimdeki kısaltmaları cümle görüyor.
Aslında sonunda nokta olan kısaltma sayısı fazla değil. Bunlara yönelik bir işlem yapılabilir.
 

leumruk

Uzman
Uzman
Katılım
15 Nisan 2007
Mesajlar
3,469
Excel Vers. ve Dili
Office 2010 & 2013 tr
Sn klop1,
Öncelikle teşekkür ederim.
Word, sonunda nokta bulunan ifadeleri cümle kabul ediyor. Dolayısıyla aslında cümle olmayan noktalı ifadeler için ayrıca şartlar eklemek gerekiyor. Tespit edebildiklerime ekledim: Sayısal ifadelerden sonra gelen noktalar gibi. Eksikler kullandıkça ortaya çıkacaktır. Onlar için de özel şartlar oluşturmam gerekecek. Kısaltmalar için bir mantık oluşturmaya çalışacağım.

1) İki noktalı ifadeleri özellikle dahil etmedim. İki nokta ve sonrasındaki cümle ya da kelime gruplarını anlam yönünden bir bütün olarak değerlendiriyorum.
Aynı sorun "..." lı cümlelerde de vardı. Onun için özel şart oluşturdum, sorun kalmadı.
Bunun için ":" lı ifadeleri cümle say gibi seçenek eklenebilir.
2) Menü için alternatif düşünülebilir.

Dosyada yapmam gereken birkaç düzenleme daha var, hepsini bitirince güncelleyeceğim. Bu arada tespit edebildiğiniz eksiklikler varsa belirtirseniz onları da çözmüş oluruz.
 

Tevfik_Kursun

Altın Üye
Katılım
30 Temmuz 2012
Mesajlar
3,593
Excel Vers. ve Dili
Office 2016 Pro - Türkçe 64 Bit
Altın Üyelik Bitiş Tarihi
12-02-2029
Sayın Leumruk,
Ellerinize sağlık, teşekkürler
 

klop01

Altın Üye
Katılım
19 Aralık 2016
Mesajlar
628
Excel Vers. ve Dili
2021 Türkçe 64 Bit
Altın Üyelik Bitiş Tarihi
07-02-2028
Sayın leumruk,
Yazım Kılavuzu'na(TDK, 2012) göre İki Nokta işaretinden sonra büyük harf varsa yeni bir cümle başlamış demektir.
Bazen İki Nokta işaretinden sonra küçük harf de olabiliyor.
Kural olarak "İki Noktadan sonra büyük harf varsa cümle kabul et." şartı doğru bir şart olacaktır.

Kısaltmalardan en azından sıkça kullanılanları koda tanıtmak belki bir çözüm olabilir derim. Şimdi kabaca saydım da 150 civarında sonu noktalı kısaltma var.

Şimdilik tespitlerim bu kadar. Dosya son şeklini alınca Yazım Kılavuzu'na(TDK, 2012)'ye göre inceleme yapabilirim.
 

Korhan Ayhan

Administrator
Yönetici
Admin
Katılım
15 Mart 2005
Mesajlar
41,453
Excel Vers. ve Dili
Microsoft 365 Tr-En 64 Bit
Elinize sağlık Mustafa bey.

Paylaşımınız için teşekkürler..
 

leumruk

Uzman
Uzman
Katılım
15 Nisan 2007
Mesajlar
3,469
Excel Vers. ve Dili
Office 2010 & 2013 tr
Sayın leumruk,
Yazım Kılavuzu'na(TDK, 2012) göre İki Nokta işaretinden sonra büyük harf varsa yeni bir cümle başlamış demektir.
Bazen İki Nokta işaretinden sonra küçük harf de olabiliyor.
Kural olarak "İki Noktadan sonra büyük harf varsa cümle kabul et." şartı doğru bir şart olacaktır.

Kısaltmalardan en azından sıkça kullanılanları koda tanıtmak belki bir çözüm olabilir derim. Şimdi kabaca saydım da 150 civarında sonu noktalı kısaltma var.

Şimdilik tespitlerim bu kadar. Dosya son şeklini alınca Yazım Kılavuzu'na(TDK, 2012)'ye göre inceleme yapabilirim.
Aslında kastettiğim iki noktalı ifadelerin cümle olmadığı değildi. Kendinden önceki cümle ile anlamsal olarak bir bütünlük oluşturduğundan bölmek istemedim. Bir nevi sıralı cümle veya açıklama cümlesi gibi düşündüm. Bu nedenle kullanıcının tercihine bırakmak faydalı olacaktır.
Kısaltmalar için bir mantık kurulamazsa öneriniz tek çözüm yolu olacaktır ki görünüşe göre öyle olacak...
 

leumruk

Uzman
Uzman
Katılım
15 Nisan 2007
Mesajlar
3,469
Excel Vers. ve Dili
Office 2010 & 2013 tr
Selamlar,
Sn. klop01'in tespitleri ve Ömer BARAN beyin önerileri de dikkate alınarak dosya güncellenmiştir.
Güncelleme ayrıntıları 1. mesajda belirtilmiştir.
Birinci mesaja git...
 

leumruk

Uzman
Uzman
Katılım
15 Nisan 2007
Mesajlar
3,469
Excel Vers. ve Dili
Office 2010 & 2013 tr
Altın üyeliği olmayanlar için alternatif link eklenmiştir.
İlk sayfaya gitmek için: Tıklayınız...
 

klop01

Altın Üye
Katılım
19 Aralık 2016
Mesajlar
628
Excel Vers. ve Dili
2021 Türkçe 64 Bit
Altın Üyelik Bitiş Tarihi
07-02-2028
Sayın leumruk,
Son dosya bayağı gelişmiş, ellerinize sağlık.

Gördüğüm iki husus, bir öneriyi paylaşayım:
1. Bazı işlemler için İŞLEMİ BAŞLAT deyince ekrana çıkan küçük kutucukta "İşlem tamamlandı." yazmasına rağmen "TAMAM" butonuna tıklayınca işlem yapılıyor.
Bu durum düzeltilebilirse iyi olabilir. Değilse İşlemin sonucunu görmek için TAMAM'a tıklayınız. gibi bir uyarı.

2. Noktalama temizleme yaparken / \ = $ > < # - — _ noktalama işaretlerini ve yaygın simgeleri kaldırmıyor.
Aslında bu kısımda koda q, w, x, â, î, û dâhil büyük ve küçük harfleri tanıtıp diğerlerini kaldır komutu verilerek kesin bir çözüm üretilebilir belki.

3. Word'ün tamamında işlem yapana ek olarak seçilen kısımda işlem yapan bir seçenek de olsa iyi olabilir.
 
Son düzenleme:

leumruk

Uzman
Uzman
Katılım
15 Nisan 2007
Mesajlar
3,469
Excel Vers. ve Dili
Office 2010 & 2013 tr
Dosya güncellenmiştir. 1 .Mesajdan indirebilirsiniz.
Metin seçerek makroyu çalıştırdığınızda, sadece seçili metinde işlem yapar.
Noktalama silme işlemine tüm semboller eklenmiştir.
 

klop01

Altın Üye
Katılım
19 Aralık 2016
Mesajlar
628
Excel Vers. ve Dili
2021 Türkçe 64 Bit
Altın Üyelik Bitiş Tarihi
07-02-2028
Elinize sağlık, faydalı bir dosya oluştu.
 
Üst