Is there a way to add a suffix (current date(:MM-DD-YY)) to whatever name is added in this InputBox? Of course if the sub is Canceled.. it would be blank..
Please advise and thanks.
Dim BRT_NameWithSuffix As String
'Position the cursor into the cell that want the result.
ActiveCell.Offset(RowOffset:=1, ColumnOffset:=1).Activate '1 row down, one over (R)
BRT_NameWithSuffix = InputBox("Enter a name that best describes the animal requirements. Note: The name entered will get a :05-21-09 suffix added to the name to capture when it was created", "Save Animals Requirements", "YrlFinishRationWBeetPulpWestLot", 100, 1) ' Get user input
ActiveCell.Value = BRT_NameWithSuffix 'place it in cell