Pause a Macro

[skygirl65]

I have a simple macro in excel that I would like to change the date in the header before moving on... how do I tell the macro to pause and wait for me to type in the Month? I am VERY much a beginner in VBA.. so be gentle!

 

[fumei]

First of all - why are you wanting to have it pause so YOU type in the month? Would it not be better to simply have your macro put the month in?

Gerry

 

[AnotherHiggins]

skygirl65,
Did you try the suggestions in thread68-1171330?

[tt]_____
[blue]-John[/blue][/tt]

Help us help you. Please read FAQ181-2886 before posting.

 

[skygirl65]

I need to be able to enter the month myself....
Thanks

 

[niceguymattx]

Why dont you use a prompt, like an InputBox?

Matt

 

[Bong]

or a message box saying "please input the date"?

_________________
Bob Rashkin

 

[mrmovie]

Dim strMonth As String 'perhaps should be date later???
strMonth = InputBox("Please enter the month")
ActiveWorkbook.Worksheets("Sheet1").Cells(1, 1).Value = strMonth

'Msgbox Month(Now())..or perhaps MonthName might be handy

 

[niceguymattx]

Only problem with the message box is that it is modal, and will not allow you to do anything to the worksheet whilst it is open.

Matt

 

[mrmovie]

to be more precise i tend to use
msgbox "text here"
when i want to pause and check what is going on

 

[AnotherHiggins]

I need to be able to enter the month myself....

I ask again, have you tried the suggestions in thread68-1171330?

[tab]From that thread:

You can input prompt using the InputBox Function.

You can interupt a macro by pressing [Esc], but why not have the macro prompt you for the month?

...
MyDate = inputbox "Please enter the Date you would like to appear in the header"
...

Alternatively, if you simply want to enter the data into a cell, you can use

.....code runs

stop

.....code restarts

Please state what you have tried and why the results aren't satisfactory instead of just rephrasing the question over and over.

[tt]_____
[blue]-John[/blue][/tt]

Help us help you. Please read FAQ181-2886 before posting.