• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Word Belgesinde ":" "İki nokta üst üste" den sonra gelen kelimenin ilk Harfini büyük harf yapma

asdsxx

Altın Üye
Katılım
22 Mayıs 2012
Mesajlar
510
Excel Vers. ve Dili
Excel 2016 Türkçe
Arkadaşlar daha önce hazırlanmış bir word belgesinde ":" "İki nokta üst üste" işaretinden sonra gelen tüm kelimelerin ilk harfini toplu olarak büyük harf yapma imkanı var mı acaba?
kod ile veya normal word menülerinde
Örnek:
Soru: aaaaadsddd
Cevap: sggkkjghks

olması gereken
Soru: Aaaaaadsddd
Cevap: Sggkkjghks

( bazen ":" "İki nokta üst üste" den sonra boşluk yok) böyle durumlarda ise bir boşluk verilerek yapılması gerek)
Örnek:
Soru:aaaaadsddd
Cevap:sggkkjghks

olması gereken
Soru: Aaaaaadsddd
Cevap: Sggkkjghks
 
Merhaba,
Bul kutusu : (: [a-z]) Burada emoji çıktı onun yerinde ( ve : olacak
Değiştir : \1
* Tüm seçenekler
* Joker karakter kutusu tıklı olacak
* Biçim > Yazı Tipi > Küçük-Büyük kutusu tıklı olacak
* Değiştir / Tümünü Değiştir
 
Teşekkürler. Necati Bey.
Çoğunluğu değiştirdi ama bazı kısımları değiştirmedi. Paragraf işaretine tıklayınca büyük harfe değişenler ile değişmeyenlerde farklı işaret çıkıyor.

238545
 
Dosya ekleme sitesine küçük bir örnek yükleyebilir misiniz.
 
Aşağıdaki linkte örnek dosya var. Dosyada tüm ":" sonraki kelimelerin ilk harfleri küçük idi. Şimdi büyük harf olanlar sizin dediğiniz şekilde uygulayınca oldu ama yarısı olmadı.
 
Belgede farklı alfabelerden karakter kodları var. Bu durum oldukça ilginç geldi bana. Farklı karakter kodları bul değiştir işlemlerimizi engelliyor.
Bunun çözümü için de bir şeyler düşünülebilir. Bunu bir kenara koyarak diğer probleme bakalım.

Boşluklardan bazıları "Bölünemez boşluk" olarak görünüyorlar. ₒ şeklinde görünenler bunlardır.
* Öncelikle "Bölünemez boşluk" ları normal hale çevirelim.
* Bul kutusu: ^s (küçükharf s)
* Değiştir : klavyeden bir boşluk
* Tümünü değiştir
* Daha sonra 2 nolu mesajdaki işlemi tekrar uygulayalım.
 
Aşağıdaki kod, 5 No'lu mesaj ekindeki dosya üzerinde çalıştırdığımda, olumlu sonuç verdi;

C#:
Sub Test()
    With Selection.Find
        .ClearFormatting
        .Text = ":?([a-zığüşöç])"
        .Forward = True
        .Wrap = wdFindContinue
        .Format = True
        .MatchCase = False
        .MatchWholeWord = False
        .MatchWildcards = True
        .MatchSoundsLike = False
        .MatchAllWordForms = False
        .Execute
        While .Found
            Selection.Range.Case = wdUpperCase
            Selection.Collapse Direction:=wdCollapseEnd
            .Execute
        Wend
    End With
End Sub

.
 
2 nolu mesajı şu şekilde revize edebiliriz. Bu şekilde bölünemez boşlukları ve diğer koddaki harfleri de buluyor.
Bul kutusu : ":)?[a-zığüşöç])" emoji yerinde ( ve : olacak
Değiştir : \1
* Tüm seçenekler
* Joker karakter kutusu tıklı olacak
* Biçim > Yazı Tipi > Küçük-Büyük kutusu tıklı olacak
* Değiştir / Tümünü Değiştir
 
Necati Bey çok teşekkürler...
8. ve 9. mesajlardaki her iki yöntem de çalıştı.
Ellerinize sağlık...
Selamlar.
 
Geri
Üst