once only msgbox

brettvba

MrExcel MVP
Joined
Feb 18, 2002
Messages
1,030
Im wanting to have a msgbox popup only once kinda like a welcome to the new prog msgbox then thats it , does anyone have any code for that I would think it would include some vbediting from within the startup macro


any ideas??
 

Excel Facts

Copy a format multiple times
Select a formatted range. Double-click the Format Painter (left side of Home tab). You can paste formatting multiple times. Esc to stop
If i understand you requset it sounds like a
"splash screen" Try this:

'Create a UserForm, with your "welcome" then

Private Sub Workbook UserForm_Activate()
Application.OnTime + TimeValue("00.00.02"), _
"KillTheForm"

'This will show for 2 seconds, modify as needed.

James
 
Upvote 0
no I want it to appear once and once only then after that when the workbook is opened the msgbox doesn't open again
 
Upvote 0
You could place a switch in some unused cell.
For ex.

Private Sub Workbook_Open()
If Sheet1.Range("IV10000").Value = 0 Then
MsgBox "Hi! I hope you like my workbook"
Sheet1.Range("IV10000").Value = 1
End If
End Sub

Since the cell value now equals 1, assuming the workbook is saved, the messagbox will never show again...
Tom
 
Upvote 0
James is right you need a splash screen

First you create a userform and you place this in the back

Private Sub UserForm_Activate()
Application.OnTime Now + TimeValue("00:00:05"), "KillTheForm"

End Sub


Then you place this in this workbook

Private Sub Workbook_Open()
UserForm1.Show
End Sub

Finally add a module and place

Private Sub KillTheForm()
Unload UserForm1
End Sub

Should work find

cheers
luc
 
Upvote 0
luc

Wayne doesn't want a form appearing every time the workbook is opened.

He wants it to only appear the 1st time it is opened and never again.

The code posted by Tom should work. It should go in the workbook module.
 
Upvote 0
Hi guys

I was looking for

Splash and one with a tick box to kill once ticked but this option could be reborn with a short command

Mastermaind it, full of ideas me,... LOL

don't know what you think, sorry I was not thinkin along the same lines may be because I'm a newbie ;-(

Can't you plug me in so I can download it... ;)

That the futurre

TO BE MIND FULL He he

To much matrix hey guys

Many thanks Wayne
 
Upvote 0

Forum statistics

Threads
1,213,532
Messages
6,114,177
Members
448,554
Latest member
Gleisner2

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
Back
Top