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...

Is the workbook that contains the code opened in the same instance of the
application on screen 2? If not, it will probably go to the default screen.


"AwesomeSean" wrote in message
...
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...

Yes.
I have the excel app. opened on screen 2. the alt+f11 usually opens vba on
screen 1 which is where I write the code. If I move excel to screen 1 then
close-re open, the box is where i want it. If i move to screen 2, close-re
open on screen 2, the pop up box stays on screen 1.

I am new to programming and just wanted to see if there was code to make the
input box always stay where the app is opened, even if I had 4 moniters.

Thank you for the quick response.

"JLGWhiz" wrote:

Is the workbook that contains the code opened in the same instance of the
application on screen 2? If not, it will probably go to the default screen.


"AwesomeSean" wrote in message
...
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...

I am not technically acquainted with the two screen setup or how each screen
is normally selected withing the system. It just seemed to follow that if
the code was in the workbook that is opened in a given instance of Excel that
the dialog boxes and controls that are called from the code in that workbook
would appear in the same screen. Apparently not/

"AwesomeSean" wrote:

Yes.
I have the excel app. opened on screen 2. the alt+f11 usually opens vba on
screen 1 which is where I write the code. If I move excel to screen 1 then
close-re open, the box is where i want it. If i move to screen 2, close-re
open on screen 2, the pop up box stays on screen 1.

I am new to programming and just wanted to see if there was code to make the
input box always stay where the app is opened, even if I had 4 moniters.

Thank you for the quick response.

"JLGWhiz" wrote:

Is the workbook that contains the code opened in the same instance of the
application on screen 2? If not, it will probably go to the default screen.


"AwesomeSean" wrote in message
...
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...

Try moving the code windows (VBEditor) to screen 2, close Excel and re-open
in screen 2. It may be the InputBox follows the location of the code window
that called the InputBox.

Mike F
"AwesomeSean" wrote in message
...
Yes.
I have the excel app. opened on screen 2. the alt+f11 usually opens vba on
screen 1 which is where I write the code. If I move excel to screen 1 then
close-re open, the box is where i want it. If i move to screen 2, close-re
open on screen 2, the pop up box stays on screen 1.

I am new to programming and just wanted to see if there was code to make
the
input box always stay where the app is opened, even if I had 4 moniters.

Thank you for the quick response.

"JLGWhiz" wrote:

Is the workbook that contains the code opened in the same instance of the
application on screen 2? If not, it will probably go to the default
screen.


"AwesomeSean" wrote in message
...
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...

Tried that. Still the same.

Is there some kind of code to tell it to stay within the active worksheet?

The InputBox is not part of the Sheet or the ActiveWorkbook. It is part of
the Application. However, it normally appears within the application
instance from which the code is run.


"AwesomeSean" wrote in message
...
Tried that. Still the same.

Is there some kind of code to tell it to stay within the active worksheet?