ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Show Activecell Date in MsgBox (https://www.excelbanter.com/excel-programming/440632-show-activecell-date-msgbox.html)

Aussie Bob C

Show Activecell Date in MsgBox
 
Can the date in the ActiveCell be shown in a MsgBox, allowing the user to
check whether to continue or Cancel the macro running. All data on and below
the ActiveCell is cut and pasted into second sheet.

--
Thank you

Aussie Bob C
Little cost to carry knowledge with you.
Win XP P3 Office 2007 on Mini Mac using VMware.

Dave Peterson

Show Activecell Date in MsgBox
 
dim resp as long

resp = msgbox(Prompt:="Value is: " & format(activecell.value, "mmm dd, yyyy") _
& vblf & "Continue?", buttons:=vbyesno)

if resp = vbno then
exit sub '???
end if

'do the rest.

=====
This doesn't do any checking that the activecell actually contains a date.

Aussie Bob C wrote:

Can the date in the ActiveCell be shown in a MsgBox, allowing the user to
check whether to continue or Cancel the macro running. All data on and below
the ActiveCell is cut and pasted into second sheet.

--
Thank you

Aussie Bob C
Little cost to carry knowledge with you.
Win XP P3 Office 2007 on Mini Mac using VMware.


--

Dave Peterson

Mike H

Show Activecell Date in MsgBox
 
Hi,

try this

' Lots of code
ttl = "Todays Date"
response = MsgBox(Format(ActiveCell.Value, "DD/mm/yyyy") _
& " Continue Yes/No", vbYesNo, ttl)
If response = vbNo Then Exit Sub

'More code
--
Mike

When competing hypotheses are otherwise equal, adopt the hypothesis that
introduces the fewest assumptions while still sufficiently answering the
question.


"Aussie Bob C" wrote:

Can the date in the ActiveCell be shown in a MsgBox, allowing the user to
check whether to continue or Cancel the macro running. All data on and below
the ActiveCell is cut and pasted into second sheet.

--
Thank you

Aussie Bob C
Little cost to carry knowledge with you.
Win XP P3 Office 2007 on Mini Mac using VMware.


Chip Pearson

Show Activecell Date in MsgBox
 
Try something like

MsgBox "The date in the active cell is " & _
Format(ActiveCell.Value, "dd-mmm-yyyy"), vbOKOnly

Cordially,
Chip Pearson
Microsoft Most Valuable Professional,
Excel, 1998 - 2010
Pearson Software Consulting, LLC
www.cpearson.com



On Mon, 15 Mar 2010 05:38:01 -0700, Aussie Bob C
wrote:

Can the date in the ActiveCell be shown in a MsgBox, allowing the user to
check whether to continue or Cancel the macro running. All data on and below
the ActiveCell is cut and pasted into second sheet.



All times are GMT +1. The time now is 03:45 PM.

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