It the below msg box i want the value that is entered INTO the msg box to
NAME the file to Save. (eg. File 10)
Sub Macro20()
Range("A4").Select
Selection.ClearContents
res = InputBox("The MAXIMUM number of Sheets have been reached,
This is a NEW COPY of the WorkBook.", "Company Name ....")
If res = "" Then Exit Sub
ActiveWindow.DisplayWorkbookTabs = False
With ActiveWindow
.DisplayHorizontalScrollBar = False
.DisplayVerticalScrollBar = False
End With
End Sub
What step needs to added to madify this so it will name it this?
Corey....
Bookmarks