Microsoft KB Archive/171732

= WD97: Control Code for Finding/Replacing with Unicode Value =

Article ID: 171732

Article Last Modified on 1/20/2007

-

APPLIES TO


 * Microsoft Word 97 Standard Edition

-



This article was previously published under Q171732



SUMMARY
In Microsoft Word 97, you can use a search control code to search for a character by its Unicode value. The syntax of the control code is as follows

^uNNNNN

where NNNNN is a decimal number corresponding to the Unicode character value.



MORE INFORMATION
Microsoft provides examples of Visual Basic for Applications procedures for illustration only, without warranty either expressed or implied, including, but not limited to the implied warranties of merchantability and/or fitness for a particular purpose. The Visual Basic procedures in this article are provided 'as is' and Microsoft does not guarantee that they can be used in all situations. While Microsoft support professionals can help explain the functionality of a particular macro, they will not modify these examples to provide added functionality, nor will they help you construct macros to meet your specific needs. If you have limited programming experience, you may want to consult one of the Microsoft Solution Providers. Solution Providers offer a wide range of fee-based services, including creating custom macros. For more information about Microsoft Solution Providers, call Microsoft Customer Information Service at (800) 426-9400.

The following Visual Basic for Applications macro will generate a list of the decimal equivalents for the unicode character values. You can use these Unicode decimal values with the ^uNNNNN switch. Sub UnicodeGenerator Dim I as Integer Documents.Add ' Set tab stops for clarity. Selection.ParagraphFormat.TabStops.ClearAll ActiveDocument.DefaultTabStop = InchesToPoints(0.5) Selection.ParagraphFormat.TabStops.Add Position:= _ InchesToPoints(1.5), Alignment:=wdAlignTabCenter, _ Leader:=wdTabLeaderDots ' Insert column headings. Selection.InsertAfter "Characters" & Chr(9) & "UniCode Values" Selection.InsertParagraphAfter ' Character values below 30 generate undesirable results ' when inserted into a document. For example, page breaks ' and column breaks. For i = 30 To 255 ' Insert the character, a tab and the Unicode equivalent. Selection.InsertAfter Chr(i) & Chr(9) & AscW(Chr(i)) Selection.InsertParagraphAfter Next End Sub NOTE: To find a character using the Unicode value, click to select the Match Case check box. Word will search for either uppercase or lowercase characters depending on the value used in the search. If you clear the Match Case check box, Word will search all instances of uppercase and lowercase characters specified by the value.

For example, if the Match Case check box is cleared, ^u65 will find all uppercase "A" (Unicode value 65) and lowercase "a" (Unicode value 97) characters in a document.

