ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Annoying Pop up box in function (https://www.excelbanter.com/excel-programming/312842-annoying-pop-up-box-function.html)

silvest[_8_]

Annoying Pop up box in function
 

Hi, how do i set the 'error trappings' to be at the end, rather than as
I key into the function box.?

Eg.

Function DateConverter(XX)
Select Case XX
Case Is < 1000
MsgBox "blah blah", ,vbExclamation, "Too small"
End Select



Before i can even enter 5 digits, the message box will pop up once for
each digit i enter. say : 12345.. When i enter "1", box pops up once,
then again at 2, then 3...

Is it possible to get the msgbox to pop up ONLY at the end when i press
'ENTER' ??


--
silvest
------------------------------------------------------------------------
silvest's Profile: http://www.excelforum.com/member.php...o&userid=14662
View this thread: http://www.excelforum.com/showthread...hreadid=267318


Dick Kusleika[_3_]

Annoying Pop up box in function
 
silvest

Enter the digits where?

--
Dick Kusleika
MVP - Excel
Excel Blog - Daily Dose of Excel
www.dicks-blog.com

"silvest" wrote in message
...

Hi, how do i set the 'error trappings' to be at the end, rather than as
I key into the function box.?

Eg.

Function DateConverter(XX)
Select Case XX
Case Is < 1000
MsgBox "blah blah", ,vbExclamation, "Too small"
End Select



Before i can even enter 5 digits, the message box will pop up once for
each digit i enter. say : 12345.. When i enter "1", box pops up once,
then again at 2, then 3...

Is it possible to get the msgbox to pop up ONLY at the end when i press
'ENTER' ??


--
silvest
------------------------------------------------------------------------
silvest's Profile:

http://www.excelforum.com/member.php...o&userid=14662
View this thread: http://www.excelforum.com/showthread...hreadid=267318




Dave Peterson[_3_]

Annoying Pop up box in function
 
Charles Williams posted a suggestion from Alex Koenig that seems to work ok:

Option Explicit
Function DateConverter(XX)

If (Not Application.CommandBars("Standard").Controls(1).En abled) Then
Exit Function
End If

Select Case XX
Case Is < 1000
MsgBox "blah blah", vbExclamation, "too small"
End Select
End Function

It looks at the toolbar to see if you're in the wizard. (Try it and you'll see
lots of icons are disabled.)

But I don't know if I'd put a message box in a worksheet function. If I used
1000 of these functions and recalculated the worksheet and had errors, man,
would I be tired of dismissing those message boxes.

silvest wrote:

Hi, how do i set the 'error trappings' to be at the end, rather than as
I key into the function box.?

Eg.

Function DateConverter(XX)
Select Case XX
Case Is < 1000
MsgBox "blah blah", ,vbExclamation, "Too small"
End Select


Before i can even enter 5 digits, the message box will pop up once for
each digit i enter. say : 12345.. When i enter "1", box pops up once,
then again at 2, then 3...

Is it possible to get the msgbox to pop up ONLY at the end when i press
'ENTER' ??

--
silvest
------------------------------------------------------------------------
silvest's Profile: http://www.excelforum.com/member.php...o&userid=14662
View this thread: http://www.excelforum.com/showthread...hreadid=267318


--

Dave Peterson



All times are GMT +1. The time now is 09:52 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com