You may have a need to display a message box whenever specific information is placed in a specific cell by the user. Fortunately, using the Change event for a worksheet can help you to figure out when something has been placed in a cell.
For instance, let's say that you wanted to displays a message whenever the information in cell C3 is changed. The following, added to the code window for a specific worksheet, will do the trick:
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$C$3" Then MsgBox "Changed It!" End If End Sub
The Change event is called, and passes the cell range to the routine. In this case, the range is assigned to the Target variable. The address of this range is then checked, and if it is equal to C3 (it has to be noted in absolute terms, such as $C$3), then the message box is displayed.
Note:
ExcelTips is your source for cost-effective Microsoft Excel training. This tip (2553) applies to Microsoft Excel 97, 2000, 2002, and 2003. You can find a version of this tip for the ribbon interface of Excel (Excel 2007 and later) here: Conditionally Displaying a Message Box.
Create Custom Apps with VBA! Discover how to extend the capabilities of Office 2013 (Word, Excel, PowerPoint, Outlook, and Access) with VBA programming, using it for writing macros, automating Office applications, and creating custom applications. Check out Mastering VBA for Office 2013 today!
Got a large group of people listed in a worksheet and you want to make sure that each person has met with every other ...
Discover MoreIf you need to consolidate a single column of data into multiple columns of data, you'll love this macro. It provides a ...
Discover MoreUnprotecting a single worksheet is relatively easy. Unprotecting a whole lot of worksheets is harder. Here's how you can ...
Discover MoreFREE SERVICE: Get tips like this every week in ExcelTips, a free productivity newsletter. Enter your address and click "Subscribe."
2014-05-10 18:04:30
Michael (Micky) Avidan
The following command is a bit more Professional:
If Not Intersect(Target, [C3]) Is Nothing Then MsgBox "Changed It !"
(Check the Tip proposed command and try to copy/paste more than one cell over some range that includes cell C3.
Michael (Micky) Avidan
“Microsoft® Answers" - Wiki author & Forums Moderator
“Microsoft®” MVP – Excel (2009-2014)
ISRAEL
Got a version of Excel that uses the menu interface (Excel 97, Excel 2000, Excel 2002, or Excel 2003)? This site is for you! If you use a later version of Excel, visit our ExcelTips site focusing on the ribbon interface.
FREE SERVICE: Get tips like this every week in ExcelTips, a free productivity newsletter. Enter your address and click "Subscribe."
Copyright © 2021 Sharon Parq Associates, Inc.
Comments