I have a button on my ss that I want to use to create a new worksheet. The
catch is that I want the name to be a date cell plus 14 days. Here is what I
have so far.

Sub Save_New_Tab_Click()
Worksheets.Add After:=Worksheets(Worksheets.Count)
Worksheets(Worksheets.Count).Name = Format((Range("A2").Value + 14), Date,
"mm_dd_yyyy")

End Sub

A2 has my date in this format mm/dd/yyyy. add 14 days to get worksheet name
in format mm_dd_yyyy. This has been driving me crazy all afternoon. What am I
doing wrong?

TIA
Gerald

--
Message posted via http://www.officekb.com