View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.worksheet.functions
Olly Olly is offline
external usenet poster
 
Posts: 8
Default Date Change Macro

This works, but you have to press Enter after + or -

Private Sub Worksheet_Change(ByVal Target As Range)
Select Case Target.Value
Case "+":
Application.Undo
Target.Value = Target.Value + 1
Case "-":
Application.Undo
Target.Value = Target.Value - 1
End Select
End Sub

--
Olly


"Eschroeter" wrote in message
...
In Microsoft Money and Quicken, you have the ability to change the date up
or
down by using the "+" and "-" keys. Does anyone know of a way to do that
in
Excel? For instance, suppose you had a column of dates. I'm looking for
a
way to arrow down this column and adjust each date accordingly by hitting
the
plus or minus keys instead of manually retyping each date.