I have created a input box that works like it should, but always goes to
screen 1 on my 2 screen setup. If i launch excel into screen 2 the input box
always pops up on screen 1. How can I make the input box follow the
application? here is the code I used:


Sub Enter_Week_Number()


Dim Response As Variant

Show_Box = True


While Show_Box = True


Response = InputBox("Please Enter Current Week Number.", _
"Number Entry", , 7000, 7000)



If Response = "" Then

Show_Box = True
Else
If IsNumeric(Response) = True Then
Worksheets("INSTRUCTIONS").Range("H5").Value = Response
Show_Box = False
Else
MsgBox "Please Enter Numbers Only"
End If
End If
Wend

End Sub

Thank you in advance...