Hey i think that is going to work. Thanks for the quick fix.

"TomPl" wrote:

Maybe, if you change "YEARS2" to "PrintReports2" in the Workbooks.Open
statement it will work.

"playerbigdog" wrote:

Title3 = "What year would you like to print"
PrintReports2 = InputBox(Message3, Title3, "EnterYear")
EnterYear = "YEARS2"
If PrintCharts = "" Then
cancel = "1"
EnterYear = "YEARS2"
Else
cancel = "0"
EnterYear = "YEARS2"
End If

Workbooks.Open Filename:="C:\PF Test\" + "PF Assessment " + YEARS2 +
"\All Members\" + myVar1 + ".xlsx"
Sheets(myVar1).Select

I want this code to allow me to have what year enterd into the "EnterYear"
spot saved under YEARS2. Any suggestions?