Thanks
1. On the Insert tab, click on "Symbol" on the far right.
2. Click on More Symbols
3. In the Font dropdown box in the upper left, choose "Symbol."
4. The Therefore symbol is on the second row near the middle.
Hope that helps!
--
Kara
http://www.karathecomputertutor.com
http://karathecomputertutor.wordpress.com/
Sub InsertThereforeSymbol()
Selection.InsertSymbol Font:="Symbol", CharacterNumber:=92
End Sub
For help running macros see: http://www.gmayor.com/installing_macro.htm
--
Greg Maxey
See my web site http://gregmaxey.mvps.org
for an eclectic collection of Word Tips.
On Oct 28, 5:53 pm, Wombling63 <Womblin...@discussions.microsoft.com>
wrote:
Excellent post and very helpful. Perfect delivery. BZ
When I simply type 2234 and press ALT+x (without first selecting a font) the
symbol appears in MS Mincho. My default font is Times New Roman. Is MS
Mincho something new and still suitable with this symbol?
You can insert Unicode symbols programmatically as well. In this case you
can could use:
Sub InsertThereforeSymbol()
Selection.InsertSymbol Font:="Arial Unicode", CharacterNumber:=8756,
Unicode:=True
End Sub
Note the different number (8756). The InsertSymbol method requires a Long
value. Accordingly the unicode hex number 2234 must be converted:
Sub GetLong()
MsgBox ConvertHexToLong(2234)
End Sub
Function ConvertHexToLong(ByVal hex) As Long
ConvertHexToLong = Val("&H" & hex & "&")
End Function
Thanks.
--
Greg Maxey
See my web site http://gregmaxey.mvps.org
for an eclectic collection of Word Tips.
"Peter T. Daniels" <gram...@verizon.net> wrote in message
news:61ebfaa5-b3be-4ae5...@33g2000vbe.googlegroups.com...
If you're never going to type in Chinese etc., you can Uninstall the
Chinese etc. fonts from your Fonts folder.
I don't know what a "Long" value is. Is it the decimal equivalent of
the Unicode hex number?
On Oct 29, 7:15 am, "Greg Maxey"
<gma...@mIKEvICTORpAPAsIERRA.oSCARrOMEOgOLF> wrote:
> Mr. Daniels,
>
> Excellent post and very helpful. Perfect delivery. BZ
>
> When I simply type 2234 and press ALT+x (without first selecting a font) the
> symbol appears in MS Mincho. My default font is Times New Roman. Is MS
> Mincho something new and still suitable with this symbol?
>
> You can insert Unicode symbols programmatically as well. In this case you
> can could use:
>
> Sub InsertThereforeSymbol()
> Selection.InsertSymbol Font:="Arial Unicode", CharacterNumber:=8756,
> Unicode:=True
> End Sub
>
> Note the different number (8756). The InsertSymbol method requires a Long
> value. Accordingly the unicode hex number 2234 must be converted:
>
> Sub GetLong()
> MsgBox ConvertHexToLong(2234)
> End Sub
>
> Function ConvertHexToLong(ByVal hex) As Long
> ConvertHexToLong = Val("&H" & hex & "&")
> End Function
>
> Thanks.
>
> --
> Greg Maxey
>
> See my web sitehttp://gregmaxey.mvps.org
> for an eclectic collection of Word Tips.
>
> "Peter T. Daniels" <gramma...@verizon.net> wrote in messagenews:61ebfaa5-b3be-4ae5...@33g2000vbe.googlegroups.com...
> Using the Symbol font can lead to problems down the line (its encoding
> doesn't match Unicode encoding), so you might do better to use the
> character from the "Mathematical Operators" range accessed via Insert
> Symbol. The "Therefore" character is at 2234; type that code on the
> regular keyboard and then Alt-X. You'll find it in Cambria Math, Arial
> Unicode, Lucida Sans, and Lucida Sans Unicode.
>
> On Oct 28, 5:53 pm, Wombling63 <Womblin...@discussions.microsoft.com>
> wrote:
>
>
>
> > There is a symbol made up of three dots in the shape of a triangle meaning
> > "therefore". Where can I find it?
>
> > Thanks-
Long value was probably a poor choice of words. As I have said before, I
have no formal training in VBA.
Perhaps more correct, the .InsertSymbol method requires a long data type
for the character number argument.
Data type: The characteristic of a variable that determines what kind of
data it can hold. Data types include Byte, Boolean, Integer, Long, Currency,
Decimal, Single, Double, Date, String, Object, Variant (default), and
user-defined types, as well as specific types of objects.
<Long: Long (long integer) variables are stored as signed 32-bit (4-byte)
numbers ranging in value from -2,147,483,648 to 2,147,483,647.
Is it the decimal equivalent of the Unicode hex number?
I think basically yes. If you pass "A" as an argument to the function
returns 10. If you pass "1A" is returns 26, ect.
Sub GetLong()
MsgBox ConvertHexToLong("A")
End Sub
Function ConvertHexToLong(ByVal hex) As Long
ConvertHexToLong = Val("&H" & hex & "&")
End Function
The only reason I mention this VBA method is there has been a two people
that have asked me to add their frequently used symbols to a customized
ribbon gallery.
--
Greg Maxey
See my web site http://gregmaxey.mvps.org
for an eclectic collection of Word Tips.
"Peter T. Daniels" <gram...@verizon.net> wrote in message
news:c3dddc05-44d0-44d7...@j19g2000yqk.googlegroups.com...