the Statistical symbol "Xbar"

M

Mike D

Does anyone know have to get or make an "Xbar" symbol for Excel? I can't seem
to find one in the symbols available

thanks,
mike duclos
 
J

Jack Sons

Jim,

Equation Editor? Isn't that something from Word? To overbar characters in
Word I use the macro below. I have no idea where to find an overbar
possibility in Excel. Please let me know where I can find it, if there is
any.

Jack Sons
The Netherlands

Sub Overline()
Dim sChar As String
Dim i As Integer
sChar = InputBox("Enter characters to overline", "Overline")
With Selection
For i = 1 To Len(sChar)
..Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty, _
PreserveFormatting:=False
..Delete Unit:=wdCharacter, Count:=1
..TypeText Text:="EQ \s\up6(\f(;" + Mid(sChar, i, 1) + "))"
..Fields.Update
..MoveRight Unit:=wdCharacter, Count:=1
Next
End With
End Sub
 
J

Jim Cone

Jack Sons,

I believe Equation Editor is part of the Office Suite.
The file name is: EQNEDT32.EXE

Jim Cone
San Francisco, USA


Jim,
Equation Editor? Isn't that something from Word? To overbar characters in
Word I use the macro below. I have no idea where to find an overbar
possibility in Excel. Please let me know where I can find it, if there is
any.
Jack Sons
The Netherlands

Sub Overline()
Dim sChar As String
Dim i As Integer
sChar = InputBox("Enter characters to overline", "Overline")
With Selection
For i = 1 To Len(sChar)
..Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty, _
PreserveFormatting:=False
..Delete Unit:=wdCharacter, Count:=1
..TypeText Text:="EQ \s\up6(\f(;" + Mid(sChar, i, 1) + "))"
..Fields.Update
..MoveRight Unit:=wdCharacter, Count:=1
Next
End With
End Sub
 
Top