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

[tugkan]

Süper bi çalışma

 

[veleciraptor]

teşekkürler

 

[TUĞCU]

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...

BEN BUNU İNDİREMİYORUM.

 

[klop01]

Sayın TUĞCU,
Yukarıda alıntı yaptığınız alanın altında bulunan alernatif link google drive üzerinden indirme yapabiliyor. Ben şimdi denedim, indirme başarılı oldu.

 

[bilgin71]

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...

Ellerinize sağlık çok güzel bir uygulama olmuş. Köy okulunda çalışıyorum. Renkli yazicimiz yok maalesef. Siyah beyaz çıktı alınca kırmızı ve mavi renkler yine siyah olarak görünüyor. Renklerin belirgin olması için siyah ve gri olarakta ayarlabilir miyiz. Ben hiç bilmiyorum yoksa kendim yapmaya çalışırdım. Yardımınız için şimdiden teşekkürler....

 

[assenucler]

S196n leumruk Üstadım,

Gününüz aydınlık, neşeniz sağlığınız yerinde, kazancınız bol ve yeni yılınız kutlu olsun.

Bu çalışmanızı yeni fark ettim. Q klavye için CTRL+Ç kullanılıyor. 1960 yılından bugüne değin F klavye kullanıyorum. İşlem Formu için ayrı bir makro kısayolu yapılabilir mi?

Emek ve paylaşımınız için teşekkürler.

 

[Haluk]

 

[bilgin71]

Ekli dosyayı görüntüle 212776

Merhaba. Bu benim soruma cevapsa resimleri göremiyorum. Basit olarak bu sayfayı nasil acabilcegimi anlatabilir misiniz.

 

[Haluk]

Merhaba. Bu benim soruma cevapsa resimleri göremiyorum. Basit olarak bu sayfayı nasil acabilcegimi anlatabilir misiniz.

Sizin değil, 26. mesajdaki sorunun çözümüydü...

.

 

[Haluk]

Ellerinize sağlık çok güzel bir uygulama olmuş. Köy okulunda çalışıyorum. Renkli yazicimiz yok maalesef. Siyah beyaz çıktı alınca kırmızı ve mavi renkler yine siyah olarak görünüyor. Renklerin belirgin olması için siyah ve gri olarakta ayarlabilir miyiz. Ben hiç bilmiyorum yoksa kendim yapmaya çalışırdım. Yardımınız için şimdiden teşekkürler....

Okulda renkli yazıcı olsa sanırım @leumruk 'un bu dosyasıyla öğrencilerinize katkınız olurdu. Acaba, bir bağış kampanyası düzenlesek olur mu?

Siz veya @netzone gibi donanım işlerinden iyi anlayan birisi okulun ihtiyaçlarına iyi, kötü cevap verebilecek bir yazıcı seçin ve fiyatını belirleyin. Burada vereceğiniz bir hesap numarasına forum üyeleri katkıda bulunabilir. Hesapta biriken para yeterli seviyeye ulaşırsa, yine buradan haber verirsiniz...

Sadece bir fikir ....

.

 

[assenucler]

Sayın Haluk,

İlginiz ve zaman ayırarak resimli bir açıklama ile yardımcı olmanız her türlü takdirin üzerindedir; desteğiniz için size çok teşekkür ediyor ve yeni yılınızı içtenlikle
kutluyorum.

Üstadım, 26. iletiye eklediğiniz resim ben de birebir çıkmıyor. Tıkandım kaldım.

Sayın leumruk F klavye için bir dosya ekleyebilirse, ya da yeniden bir düzenleme yapabilirse, bu güzel çalışmayı kullanabileceğiz.

Sevgi ve saygılar.

 

[Haluk]

Eklediğiniz resimdeki "Makrolar" bölümünde "Form_Ac" makrosunu işaretlemelisiniz......

Bu arada, kodların "F" veya "Q" klavye kullanılmasıyla bir ilgisi yok, her ikisinde de aynı şekilde çalışır.

.

 

[assenucler]

Haluk üstadım,

Bilgilendirme için teşekkürler. F klavyede "CTRL + x" ile çalışıyor.

 

[leumruk]

Ellerinize sağlık çok güzel bir uygulama olmuş. Köy okulunda çalışıyorum. Renkli yazicimiz yok maalesef. Siyah beyaz çıktı alınca kırmızı ve mavi renkler yine siyah olarak görünüyor. Renklerin belirgin olması için siyah ve gri olarakta ayarlabilir miyiz. Ben hiç bilmiyorum yoksa kendim yapmaya çalışırdım. Yardımınız için şimdiden teşekkürler....

Selamlar,
Yoğunluktan dolayı foruma pek vakit ayıramıyorum. Dosya üzerinde kaba taslak bir düzenleme yaptım. Sanırım işinizi görecektir.
Düzeltme: Yeni dosya 1. mesaja eklenmiştir.

 

[bilgin71]

ilginiz için çok teşekkür ederim ama aşağıdaki hatayı veriyor. Bu konuda da yardımcı olabilir misiniz?

ActiveDocument.Range(Start:=ilk - 1, End:=ilk + t).Font.Bold = Renk(rnk)

Selamlar,
Yoğunluktan dolayı foruma pek vakit ayıramıyorum. Dosya üzerinde kaba taslak bir düzenleme yaptım. Sanırım işinizi görecektir.
Alternatif Link Tıklayınız...

 

[leumruk]

ilginiz için çok teşekkür ederim ama aşağıdaki hatayı veriyor. Bu konuda da yardımcı olabilir misiniz?

ActiveDocument.Range(Start:=ilk - 1, End:=ilk + t).Font.Bold = Renk(rnk)

Geçici çözüm olarak metnin başlangıcına boşluk karakteri ekleyerek deneyiniz. Muhtemelen ilk karakterle ilgili, daha sonra kodlara onunla ilgili bir çözüm ekleyeceğim. İlk karakteri 0 değeriyle tanımlıyor. -1'e düştüğünde aralık dışına çıkıyor.

 

[bilgin71]

Geçici çözüm olarak metnin başlangıcına boşluk karakteri ekleyerek deneyiniz. Muhtemelen ilk karakterle ilgili, daha sonra kodlara onunla ilgili bir çözüm ekleyeceğim. İlk karakteri 0 değeriyle tanımlıyor. -1'e düştüğünde aralık dışına çıkıyor.

İlginiz için tekrar çok teşekkür ederim. Allah razı olsun. Ama ben sorunu yine çözemedim. Söylediğinizi yaptım ama yine olmadı. İlk halindeki renkleri nasıl değiştirebilirim bu konuda yardımcı olur musunuz. Bu sayede bende belki birşeyler öğrenmiş olurum.

 

[leumruk]

CTRL+H ile Değiştir menüsünü açın.
Bul kısmı seçili iken Biçim menüsünden değiştirmek istediğiniz rengi seçin.
Değiştir kutusu seçili iken yeni biçimi girin tümünü değiştir ile değiştirin.

 

[bilgin71]

CTRL+H ile Değiştir menüsünü açın.
Bul kısmı seçili iken Biçim menüsünden değiştirmek istediğiniz rengi seçin.
Değiştir kutusu seçili iken yeni biçimi girin tümünü değiştir ile değiştirin.

Allah razı olsun. Hiç bilmediğim bir özelliği de öğrenmiş oldum. Çok teşekkür ederim...

 

[leumruk]

Allah razı olsun. Hiç bilmediğim bir özelliği de öğrenmiş oldum. Çok teşekkür ederim...

Rica ederim. İyi çalışmalar.