close

Is there a way to create a screen that pops up and displays a message when
you open a spreadsheet?

Marcus, if macros are enabled,

Private Sub Workbook_Open()
MsgBox quot;Your message herequot;, , quot;Title herequot;
End Sub

To put in this macro, from your workbook right-click the workbook's icon and
pick View Code. This icon is to the left of the quot;Filequot; menu this will open
the VBA editor, in Project Explorer double click on thisworkbook, under your
workbook name, if you don't see it press CTRL r to open the Project
Explorer, then, paste the code in the window that opens on the right hand
side, press Alt and Q to close this window and go back to your workbook, now
this will run every time you open the workbook. If you are using excel 2000
or newer you may have to change the macro security settings to get the macro
to run. To change the security settings go to tools, macro, security,
security level and set it to medium

--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 amp; 2003

quot;Marcusquot; gt; wrote in message
...
gt; Is there a way to create a screen that pops up and displays a message when
gt; you open a spreadsheet?
That worked, Now is there a way to make it refer to a cell for the message?

quot;Paul Bquot; wrote:

gt; Marcus, if macros are enabled,
gt;
gt; Private Sub Workbook_Open()
gt; MsgBox quot;Your message herequot;, , quot;Title herequot;
gt; End Sub
gt;
gt; To put in this macro, from your workbook right-click the workbook's icon and
gt; pick View Code. This icon is to the left of the quot;Filequot; menu this will open
gt; the VBA editor, in Project Explorer double click on thisworkbook, under your
gt; workbook name, if you don't see it press CTRL r to open the Project
gt; Explorer, then, paste the code in the window that opens on the right hand
gt; side, press Alt and Q to close this window and go back to your workbook, now
gt; this will run every time you open the workbook. If you are using excel 2000
gt; or newer you may have to change the macro security settings to get the macro
gt; to run. To change the security settings go to tools, macro, security,
gt; security level and set it to medium
gt;
gt; --
gt; Paul B
gt; Always backup your data before trying something new
gt; Please post any response to the newsgroups so others can benefit from it
gt; Feedback on answers is always appreciated!
gt; Using Excel 2002 amp; 2003
gt;
gt; quot;Marcusquot; gt; wrote in message
gt; ...
gt; gt; Is there a way to create a screen that pops up and displays a message when
gt; gt; you open a spreadsheet?
gt;
gt;
gt;

Private Sub Workbook_Open()
MsgBox quot;Your message herequot; amp; worksheets(quot;sheet99quot;).range(quot;a1quot;).value, _
, quot;Title herequot;
End Sub

Marcus wrote:
gt;
gt; That worked, Now is there a way to make it refer to a cell for the message?
gt;
gt; quot;Paul Bquot; wrote:
gt;
gt; gt; Marcus, if macros are enabled,
gt; gt;
gt; gt; Private Sub Workbook_Open()
gt; gt; MsgBox quot;Your message herequot;, , quot;Title herequot;
gt; gt; End Sub
gt; gt;
gt; gt; To put in this macro, from your workbook right-click the workbook's icon and
gt; gt; pick View Code. This icon is to the left of the quot;Filequot; menu this will open
gt; gt; the VBA editor, in Project Explorer double click on thisworkbook, under your
gt; gt; workbook name, if you don't see it press CTRL r to open the Project
gt; gt; Explorer, then, paste the code in the window that opens on the right hand
gt; gt; side, press Alt and Q to close this window and go back to your workbook, now
gt; gt; this will run every time you open the workbook. If you are using excel 2000
gt; gt; or newer you may have to change the macro security settings to get the macro
gt; gt; to run. To change the security settings go to tools, macro, security,
gt; gt; security level and set it to medium
gt; gt;
gt; gt; --
gt; gt; Paul B
gt; gt; Always backup your data before trying something new
gt; gt; Please post any response to the newsgroups so others can benefit from it
gt; gt; Feedback on answers is always appreciated!
gt; gt; Using Excel 2002 amp; 2003
gt; gt;
gt; gt; quot;Marcusquot; gt; wrote in message
gt; gt; ...
gt; gt; gt; Is there a way to create a screen that pops up and displays a message when
gt; gt; gt; you open a spreadsheet?
gt; gt;
gt; gt;
gt; gt;

--

Dave Peterson

Ok, not to be a pain but can you set it up to select more than one cell for
the message?

quot;Dave Petersonquot; wrote:

gt; Private Sub Workbook_Open()
gt; MsgBox quot;Your message herequot; amp; worksheets(quot;sheet99quot;).range(quot;a1quot;).value, _
gt; , quot;Title herequot;
gt; End Sub
gt;
gt; Marcus wrote:
gt; gt;
gt; gt; That worked, Now is there a way to make it refer to a cell for the message?
gt; gt;
gt; gt; quot;Paul Bquot; wrote:
gt; gt;
gt; gt; gt; Marcus, if macros are enabled,
gt; gt; gt;
gt; gt; gt; Private Sub Workbook_Open()
gt; gt; gt; MsgBox quot;Your message herequot;, , quot;Title herequot;
gt; gt; gt; End Sub
gt; gt; gt;
gt; gt; gt; To put in this macro, from your workbook right-click the workbook's icon and
gt; gt; gt; pick View Code. This icon is to the left of the quot;Filequot; menu this will open
gt; gt; gt; the VBA editor, in Project Explorer double click on thisworkbook, under your
gt; gt; gt; workbook name, if you don't see it press CTRL r to open the Project
gt; gt; gt; Explorer, then, paste the code in the window that opens on the right hand
gt; gt; gt; side, press Alt and Q to close this window and go back to your workbook, now
gt; gt; gt; this will run every time you open the workbook. If you are using excel 2000
gt; gt; gt; or newer you may have to change the macro security settings to get the macro
gt; gt; gt; to run. To change the security settings go to tools, macro, security,
gt; gt; gt; security level and set it to medium
gt; gt; gt;
gt; gt; gt; --
gt; gt; gt; Paul B
gt; gt; gt; Always backup your data before trying something new
gt; gt; gt; Please post any response to the newsgroups so others can benefit from it
gt; gt; gt; Feedback on answers is always appreciated!
gt; gt; gt; Using Excel 2002 amp; 2003
gt; gt; gt;
gt; gt; gt; quot;Marcusquot; gt; wrote in message
gt; gt; gt; ...
gt; gt; gt; gt; Is there a way to create a screen that pops up and displays a message when
gt; gt; gt; gt; you open a spreadsheet?
gt; gt; gt;
gt; gt; gt;
gt; gt; gt;
gt;
gt; --
gt;
gt; Dave Peterson
gt;

You can even get the stuff from different sheets:

Private Sub Workbook_Open()
MsgBox quot;Your message herequot; amp; worksheets(quot;sheet99quot;).range(quot;a1quot;).value amp; _
quot;more text here quot; amp; worksheets(quot;sheet101quot;).range(quot;b99quot;).value, _
, quot;Title herequot;
End Sub

Marcus wrote:
gt;
gt; Ok, not to be a pain but can you set it up to select more than one cell for
gt; the message?
gt;
gt; quot;Dave Petersonquot; wrote:
gt;
gt; gt; Private Sub Workbook_Open()
gt; gt; MsgBox quot;Your message herequot; amp; worksheets(quot;sheet99quot;).range(quot;a1quot;).value, _
gt; gt; , quot;Title herequot;
gt; gt; End Sub
gt; gt;
gt; gt; Marcus wrote:
gt; gt; gt;
gt; gt; gt; That worked, Now is there a way to make it refer to a cell for the message?
gt; gt; gt;
gt; gt; gt; quot;Paul Bquot; wrote:
gt; gt; gt;
gt; gt; gt; gt; Marcus, if macros are enabled,
gt; gt; gt; gt;
gt; gt; gt; gt; Private Sub Workbook_Open()
gt; gt; gt; gt; MsgBox quot;Your message herequot;, , quot;Title herequot;
gt; gt; gt; gt; End Sub
gt; gt; gt; gt;
gt; gt; gt; gt; To put in this macro, from your workbook right-click the workbook's icon and
gt; gt; gt; gt; pick View Code. This icon is to the left of the quot;Filequot; menu this will open
gt; gt; gt; gt; the VBA editor, in Project Explorer double click on thisworkbook, under your
gt; gt; gt; gt; workbook name, if you don't see it press CTRL r to open the Project
gt; gt; gt; gt; Explorer, then, paste the code in the window that opens on the right hand
gt; gt; gt; gt; side, press Alt and Q to close this window and go back to your workbook, now
gt; gt; gt; gt; this will run every time you open the workbook. If you are using excel 2000
gt; gt; gt; gt; or newer you may have to change the macro security settings to get the macro
gt; gt; gt; gt; to run. To change the security settings go to tools, macro, security,
gt; gt; gt; gt; security level and set it to medium
gt; gt; gt; gt;
gt; gt; gt; gt; --
gt; gt; gt; gt; Paul B
gt; gt; gt; gt; Always backup your data before trying something new
gt; gt; gt; gt; Please post any response to the newsgroups so others can benefit from it
gt; gt; gt; gt; Feedback on answers is always appreciated!
gt; gt; gt; gt; Using Excel 2002 amp; 2003
gt; gt; gt; gt;
gt; gt; gt; gt; quot;Marcusquot; gt; wrote in message
gt; gt; gt; gt; ...
gt; gt; gt; gt; gt; Is there a way to create a screen that pops up and displays a message when
gt; gt; gt; gt; gt; you open a spreadsheet?
gt; gt; gt; gt;
gt; gt; gt; gt;
gt; gt; gt; gt;
gt; gt;
gt; gt; --
gt; gt;
gt; gt; Dave Peterson
gt; gt;

--

Dave Peterson

arrow
arrow
    全站熱搜
    創作者介紹
    創作者 software 的頭像
    software

    software

    software 發表在 痞客邦 留言(0) 人氣()