Word'de silme

[VeliDemir]

Merhaba. Öncellikle bu hizmeti sunduğunuzdan ötürü sizlere teşekkür ederim.

Bir Word dosyasında yer alan | ve .@ karakterleri ile bu karakterlerin arasında olan yazıların silinmesini sağlayan bir makro programını sizlerden rica ediyorum.

ÖRNEK:

MAKRO PROGRAMINDAN ÖNCE

|Yıldızlara yolculuk sadece bir hayaldir.@a |Bu sene kış çok çetin geçiyor.@
bugün|Gözlerinin rengi mavidir.@


|Perdeler çok kirlenmiş.@|Gün Ağardı.@Antenler


MAKRO PROGRAMINDAN SONRA

a bugün


Antenler

 

[Haluk]

Merhaba;

Makrosuz bir çözüm aşağıdaki animasyonda belirtilmiştir.

Not: MS Word ve makroları ile ilgili sorularınızı forumun aşağıdaki linkte yer alan bölümüne iletirseniz, daha iyi olacaktır.

 

[Haluk]

Tekrar merhaba;

Animasyonda yapılan işin makro kaydet yöntemiyle elde edilen kodları ise, aşağıda verilmiştir.

Sub Macro1()
'
' Macro1 Macro
'
'
    Selection.Find.ClearFormatting
    Selection.Find.Replacement.ClearFormatting
    With Selection.Find
        .Text = "\|*\@"
        .Replacement.Text = " "
        .Forward = True
        .Wrap = wdFindContinue
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchAllWordForms = False
        .MatchSoundsLike = False
        .MatchWildcards = True
    End With
    Selection.Find.Execute Replace:=wdReplaceAll
End Sub

 

[VeliDemir]

Çok teşekkür ederim

 

[VeliDemir]

Merhaba. Yukarıda anılan makro programına wildcard olmayan # ÷ < > karakterlerini de Word dosyasından silme özelliğini ekleyebilir misiniz?

 

[Haluk]

Merhaba;

Kodun; | ve @ karakterleri arasındaki herşeyi silmesi gerekir. Sizin istediğiniz başka bir şey mi ?

.

 

[VeliDemir]

Merhaba. Bu konuda yer alan makro kodu | ve @ karakterleri arasındaki herşeyi siliyor. Bununla birlikte, anılan makro koduna bazı eklemeler yapılarak ÷ < > € ~ karakterlerinin de silinmesini istiyorum.

İyi geceler.

Dipnot: ÷ < > € ~ karakterleri wildcard değildir.

 

[Haluk]

Tekrar merhaba;

Belirttiğiniz karakterleri aşağıdaki animasyonda kırmızı ile işaretledim, daha önceki mesajımda da belirttiğim gibi makro kodu bunları da siliyor.

Siz daha başka bir şey istiyorsanız, bilemiyorum ya da ben ne demek istediğinizi anlayamıyorum.

Başka bir arkadaş size yardımcı olacaktır, iyi günler.

 

[VeliDemir]

Bu makro işimi gördü. Çok teşekkür ederim.

 

[Haluk]

Rica ederim, kolay gelsin...

.