Hi
I have this code
Sub Macro1()
'
'
'
Range("a1:az20000").Select
ActiveCell.Selection
With ActiveCell.Characters(Start:=1, Length:=18).Font
.Name = "Arial"
.FontStyle = "¸íôïíá"
.Size = 10
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ColorIndex = 1
End With
End Sub
and would like to erase the first spaces from wherever they are found but there is something wrong with the code can you help me?
I have this code
Sub Macro1()
'
'
'
Range("a1:az20000").Select
ActiveCell.Selection
With ActiveCell.Characters(Start:=1, Length:=18).Font
.Name = "Arial"
.FontStyle = "¸íôïíá"
.Size = 10
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ColorIndex = 1
End With
End Sub
and would like to erase the first spaces from wherever they are found but there is something wrong with the code can you help me?