View Single Post
  #60  
Old 06-25-2009, 10:58 AM
GatesIsAntichrist's Avatar
GatesIsAntichrist GatesIsAntichrist is offline
Member
SOA AAA
 
Join Date: Mar 2005
Location: Hell (on temporary assignment on Earth)
Favorite beer: New(fave)! Black'n'Tan
Posts: 206
Default

Quote:
Originally Posted by ADoubleDot View Post
It seems to never work for me.
Try
Code:
Sub macIncrDec()
  If Selection.NumberFormat = "General" Then
    Selection.NumberFormat = "0."
  Else
    If InStr(Selection.NumberFormat, ".") = 0 Then
      Selection.NumberFormat = Selection.NumberFormat & "."
    End If
  End If
  Selection.NumberFormat = Selection.NumberFormat & "0"
End Sub
and build from there if needed.

edit:All with Selection
Reply With Quote
 
Page generated in 0.16967 seconds with 9 queries