On 07/17/2012 01:37 PM, Johnny Rosenberg wrote:
2012/7/17 Doug<[email protected]>:
On 07/17/2012 07:06 AM, Rory O'Farrell wrote:
On Tue, 17 Jul 2012 12:47:01 +0200
Johnny Rosenberg<[email protected]> wrote:
2012/7/17 Srinivasulu Bhattaram<[email protected]>:
I am new to Open Office.
InWORD 2003 (and also in WORD 2007),
I have craeted macros to remove double spaces with single spaces and
used
them extensively..
How to have an equivalent of it in Open Office writer?
I do not want to go through Find Replace.... kind of thing.
seena
What about letting a macro do the search and replace for you?
I just wrote this one, with inspiration from ”Useful Macro Information
For OpenOffice.org By Andrew Pitonyak”, which is a PDF that you can
download somewhere:
REM ***** BASIC *****
Sub RemoveRedundantSpaces
Dim oReplace as object
oReplace = ThisComponent.createReplaceDescriptor()
With oReplace
.SearchString = " "
.ReplaceString = " "
End With
While ThisComponent.ReplaceAll(oReplace)>0
Wend
End Sub
This macro also takes care of tripple spaces and… well, it just
removes all spaces until there are only single spaces left. And it is
fast. Really fast.
I tested it myself, and it worked in all my test cases. Well, I didn't
test it THAT thoroughly, but still…
Much better than using the crappy macro recorder anyway. And shorter…
If you write the documents yourself, there is a simple way to prevent
double spaces in the first place, something like:
Tools → Options for auto correction… → Click the Options tab → ☒
Ignore double spaces
You can still make double spaces if you really want to, but it's less
likely to happen accidently.
Kind regards
Johnny Rosenberg
ジョニー・ローゼンバーグ
Or why not use the Language Tool extension, which will flag double spaces
as you type with a blue wiggly underline?
That wouldn't help with text that is already written, that you're editing.
--doug
That's why I wrote ”If you write the documents yourself”. Maybe my
English failed there, I don't know, it's not my native language,
sorry.
Kind regards
Johnny Rosenberg
ジョニー・ローゼンバーグ
I apologize. I didn't notice that line. You are absolutely right. --doug
---------------------------------------------------------------------
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]
