![]() ![]() OReplace. OReplace.SetSearchAttributes(searchVal()) The current Apache OpenOffice supports Microsoft Windows XP, Vista, Windows 7, Windows 8 and Windows 10. ![]() ReplaceVal(0).Name = "CharFontName" ' This is needed for the SetReplaceAttributes The Apache OpenOffice User Forum is an user to user help and discussion forum for exchanging information and tips with other users of Apache OpenOffice, the open source office suite. SearchVal(0).Name = "CharFontName" ' This is needed for the SetSearchAttributes Rem Set up Find/Replace for Greek NT font to new Unicode font To install fonts this way, open Control Panel, click Appearance and Personalization and choose Fonts, then left-click and drag font files from File Explorer. GntFont = "Greek NT Symbol" ' Old ANSI symbol font to change Rem This is needed for Find/Replace font:ĭim searchVal(0) As New .PropertyValueĭim replaceVal(0) As New .PropertyValue setReplaceString or if you set these strings to "" you will crash everything and have to reboot (I found out the hard way several times). NOTE: Be sure to have a character to convert with this code. The key to find/replace a font is to use the service (see the two Dim statements and the search setup section. The array below in the code is shortened for this example. (Greek NT alpha is &HF061 whereas in unicode it's &H03B1). I'm changing Greek NT characters to unicode "FreeSerif"-an excellent open source font for lots of languages. This is a symbol font, so the characters are coded in both Word and Openoffice when imported with an extra &HF000 value (i.e., "space" is &HF020, alpha ("a") is &HF061 etc.). This free fonts collection also offers useful content and a huge collection of TrueType. The font I'm converting is called "Greek NT" (a font I made around 1995). Collection of most popular free to download fonts for Windows and Mac. Just a short explanation of the code below. So there may be a much better way to do this. I did do a lot of (amateur) programming decades ago (assembly and basic), but that was before object-oriented langauges came into being. I am a beginner at OOoBasic and I am not a programmer. I found out all this through looking at examples primarily and borrowed code from various sources. ![]()
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |