Micanje zareza ispred brojeva

poruka: 2
|
čitano: 1.084
|
moderatori: pirat, XXX-Man
1
+/- sve poruke
ravni prikaz
starije poruke gore
16 godina
neaktivan
offline
Micanje razmaka iza zareza ispred brojeva- problem

Dakle, koristim sljedeće:

 

Selection.Find.ClearFormatting
    Selection.Find.Replacement.ClearFormatting
    With Selection.Find
        .Text = ", ([!^t,A-Ž])"
        .Replacement.Text = ",\1"
        .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

 

Ono što bi trebao raditi, to je da se u slučaju "0, 05%" dogodi "0,05%", ali ova formula smanjuje razmak i ako je iza zareza slovo, znači: "0, FF" postaje "0,FF" što ne bi trebao raditi.

 
0 0 hvala 0
16 godina
neaktivan
offline
Re: Micanje razmaka iza zareza ispred brojeva- pro
Čupko345 kaže...

Ono što bi trebao raditi, to je da se u slučaju "0, 05%" dogodi "0,05%", ali ova formula smanjuje razmak i ako je iza zareza slovo, znači: "0, FF" postaje "0,FF" što ne bi trebao raditi.

Pogledaj VBA primjere na linku Find/Replace i VBA 

Web tutoriali za početnike, Visual Basic, Autocad, Windows, Excel, Word, FrontPage, PowerPoint, Home Network
1
Nova poruka
E-mail:
Lozinka:
 
vrh stranice