This was a great tip from datapigtechnologies.com
Improving the Default Percent Formatting
Improving the Default Percent Formatting » Bacon Bits:
Which works great, but becomes a pain when you use it often.
I have searched and attempted to create a simple section format macro.
But it keeps replacing the symbols with ?
It should have been
I have searched and attempted to create a simple section format macro.
Is it not possible to use symbols in vba
I also tried
IN THE VBA CODE
UNICODE HEX
▲=CHAR(25B2)
▼= CHAR(25BC)
This is what the macro recorder does
Is this possible ?? What are alternative ways?? Thanks
Improving the Default Percent Formatting
Improving the Default Percent Formatting » Bacon Bits:
Which works great, but becomes a pain when you use it often.
I have searched and attempted to create a simple section format macro.
Code:
Sub FormatTest()
Selection.NumberFormat = " [BLUE]?+0%;[RED]?(0%)"
End Sub
It should have been
I have searched and attempted to create a simple section format macro.
Code:
Sub FormatTest()
Selection.NumberFormat = " [BLUE]▲+0%;[RED]▼(0%)"
End Sub
I also tried
IN THE VBA CODE
UNICODE HEX
▲=CHAR(25B2)
▼= CHAR(25BC)
This is what the macro recorder does
Code:
Sub Macro1()
' Macro1 Macro
Range("J2").Select
ActiveCell.FormulaR1C1 = " [BLUE]?+0%;[RED]?(0%)"
Range("M4:M8").Select
Selection.NumberFormat = "[Blue] ?+0%;[Red]?(0%)"
With Selection
.HorizontalAlignment = xlLeft
.VerticalAlignment = xlBottom
.WrapText = False
.Orientation = 0
.AddIndent = False
.IndentLevel = 0
.ShrinkToFit = False
.ReadingOrder = xlContext
.MergeCells = False
End With
Range("M4").Select
End Sub
Is this possible ?? What are alternative ways?? Thanks