It must be simple but I can't find how to display the
current filename in a message box, preceded by a piece of
text. eg. MsgBox

Cleared workbook has been saved as current filename.

The file has already been saved so the current filename is
available.

MsgBox Application.ActiveWorkbook.name gives the current
filename but I cannot find how to precede the name with a
meaningful message.

Many Thanks
Paul

never replied to a post before, so i hope i get this right: -

to include preceeding text, use concatenation, ie,

MsgBox "Some Text " & Application.ActiveWorkbook.name

"Paul Moles" wrote in message
...
It must be simple but I can't find how to display the
current filename in a message box, preceded by a piece of
text. eg. MsgBox

Cleared workbook has been saved as current filename.

The file has already been saved so the current filename is
available.

MsgBox Application.ActiveWorkbook.name gives the current
filename but I cannot find how to precede the name with a
meaningful message.

Many Thanks
Paul

dim title as string
dim msg as string

title = "File Loaded"
msg = "The following workbook is saved" & vbcr & vbcr
msg = msg & ActiveWorkbook.name

msgbox msg,,title

Patrick Molloy
Microsoft Excel MVP

-----Original Message-----
It must be simple but I can't find how to display the
current filename in a message box, preceded by a piece
of
text. eg. MsgBox

Cleared workbook has been saved as current filename.

The file has already been saved so the current filename
is
available.

MsgBox Application.ActiveWorkbook.name gives the current
filename but I cannot find how to precede the name with
a
meaningful message.

Many Thanks
Paul
.

Thanks Tim,
-----Original Message-----
never replied to a post before, so i hope i get this
right: -

to include preceeding text, use concatenation, ie,

MsgBox "Some Text " & Application.ActiveWorkbook.name

"Paul Moles" wrote
in message
...
It must be simple but I can't find how to display the
current filename in a message box, preceded by a piece
of
text. eg. MsgBox

Cleared workbook has been saved as current filename.

The file has already been saved so the current filename
is
available.

MsgBox Application.ActiveWorkbook.name gives the current
filename but I cannot find how to precede the name with
a
meaningful message.

Many Thanks
Paul


.

sCurrentFileName = Application.ActiveWorkbook.name
sMeaningFullText="The Current Filename
is "&sCurrentFileName
Msgbox sMeaningFullText

Lars Kofod

-----Original Message-----
It must be simple but I can't find how to display the
current filename in a message box, preceded by a piece
of
text. eg. MsgBox

Cleared workbook has been saved as current filename.

The file has already been saved so the current filename
is
available.

MsgBox Application.ActiveWorkbook.name gives the current
filename but I cannot find how to precede the name with
a
meaningful message.

Many Thanks
Paul
.