Message Box Code

Trevor2002

Board Regular
Joined
Oct 23, 2002
Messages
52
Hi
I need some help with some code for a message box. The code I am using is
If Range("Sheet1!A1") = 1 Then
Dim Msg, Style, Title
Msg = "You have entered a wrong value in cell A1"
Style = vbOkOnly
Title = "AC Mistake"
Response = MsgBox(Msg, Style, Title)
End If
This works ok but I need some code to insert that when the user clicks ok, the message box goes away and stays away even if the user does'nt change the value in cell A1
Thanks Trevor2002
This message was edited by Trevor2002 on 2002-10-24 17:41
 

Excel Facts

How to fill five years of quarters?
Type 1Q-2023 in a cell. Grab the fill handle and drag down or right. After 4Q-2023, Excel will jump to 1Q-2024. Dash can be any character.

zacemmel

Well-known Member
Joined
Apr 29, 2002
Messages
636
Im not exactly sure what you are asking, but maybe set a variable equal to something if the message box has popped up and then test to see the value of that variable before doing your "messagebox" code.

Questions?

http://www.excelquestions.com
 

lenze

Legend
Joined
Feb 18, 2002
Messages
13,690
Just curious, but why not just use Data Validation with the Error alert set to warning?
 

Gates Is Antichrist

Well-known Member
Joined
Aug 15, 2002
Messages
1,961
lenze's answer is worth looking into ... but the down and dirty answer might be
Range("Sheet1!A1") = 0
following the msgbox
 

Forum statistics

Threads
1,143,640
Messages
5,719,986
Members
422,256
Latest member
downeybm

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Top