Deselect value in inputbox

danbates

Board Regular
Joined
Oct 8, 2017
Messages
238
Hi,

Is there a way of deselecting the value that is in my input box when it opens?

If so I'd like the prompt to be after the value.

Any help would be appreciated.

Thanks

Dan
 

Fluff

MrExcel MVP, Moderator
Joined
Jun 12, 2014
Messages
30,425
Office Version
365
Platform
Windows
Can you post the code that you are using to show the input box?
 

danbates

Board Regular
Joined
Oct 8, 2017
Messages
238
Hi Fluff,

Here is my code:

Code:
Private Sub Workbook_SheetBeforeDoubleClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)

Dim C As Range
Dim Response As String
If Target.Row <= 6 Then Exit Sub
If Target.Column = 1 Then
Application.EnableEvents = False
Response = UCase(InputBox("Please enter the line and batch.", "QA", "9" & Format(Date - DateSerial(Year(Date), 1, 0), "000") & "1092 - "))
ActiveCell.Offset(0, 1).Select
End If
Application.EnableEvents = True
End Sub
Thanks

Dan
 

Fluff

MrExcel MVP, Moderator
Joined
Jun 12, 2014
Messages
30,425
Office Version
365
Platform
Windows
With that code, to deselect the value, simply start typing
 

danbates

Board Regular
Joined
Oct 8, 2017
Messages
238
Hi Fluff,


If I start typing without using the right arrow key, what I type, types over the "92881092 - " that is in the InputBox when loaded.

I missed this line of code from my previous message:
Code:
ActiveCell.Value = Response
Thanks

Dan
 

Fluff

MrExcel MVP, Moderator
Joined
Jun 12, 2014
Messages
30,425
Office Version
365
Platform
Windows
Ok, I understand what you are saying & I know of no way to do what you are after.
 

Fluff

MrExcel MVP, Moderator
Joined
Jun 12, 2014
Messages
30,425
Office Version
365
Platform
Windows
My pleasure.
 

Forum statistics

Threads
1,078,241
Messages
5,339,041
Members
399,275
Latest member
amrita17170909

Some videos you may like

This Week's Hot Topics

Top