🚀 go-pugleaf

pxd74 napisał(a):
> Użytkownik "amiron" <arturronek@poczta.onet.pl> napisał w wiadomości
> news:dkqmq2$ksh$1@news.onet.pl...
> 
>>Witam,
>>
>>Nie jestem stałym bywalcem tej grupy, ale nie znalazłem nic
>>odpowiedniego w archiwum.
>>Otóż, czy mogę i ew. w jaki sposób wykorzystać wyrażenia regularne w vba.
>>A już super by było gdybym mógł to wykorzystać w obiekcie
>>Selection.Find
>>w wordzie.
>>
>>PS.
>>Dokładnie chodzi mi o znajdowanie ciagu pomiędzy dwoma nietypowymi
>>separatoorami i usuwanie jego np
>>"$$różny tekst do wycięcia$$" -> ""
> 
> 
>  Poczytaj w tyn artykule:
> http://www.mvps.org/word/FAQs/General/UsingWildcards.htm
> 
> A mi zarejstrowało się takie makro:
> 
> Sub Makro1()
>   Selection.Find.ClearFormatting
>   Selection.Find.Replacement.ClearFormatting
>   With Selection.Find
>     .Text = "$$*$$"
>     .Replacement.Text = ""
>     .Forward = True
>     .Wrap = wdFindAsk
>     .Format = False
>     .MatchCase = False
>     .MatchWholeWord = False
>     .MatchAllWordForms = False
>     .MatchSoundsLike = False
>     .MatchWildcards = True
>   End With
>   Selection.Find.Execute Replace:=wdReplaceAll
> End Sub
> 
> 
Dzięki ;)