Msgbox when a cell with a specific text entry is selected.
On 23 Jul., 16:41, "Rick Rothstein"
wrote:
Right click the tab at the bottom of the worksheet you want this functionality on, select View Code from the popup menu that appears, then copy/paste the following into the code window that appeared...
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
* If Not Target.Find("Report", LookIn:=xlValues, _
* * * * * * * MatchCase:=False) Is Nothing Then
* * MsgBox "Deleting the text entry ""REPORT"" results in ...."
* End If
End Sub
Now fix the message in the MsgBox statement to say what you want. That's it... go back to your worksheet and try to select a cell with only the word "Report" in it (in any letter casing) and the MessageBox should appear.
--
Rick (MVP - Excel)
"andreas" wrote in ...
Dear Experts:
I would like to have a macro code which will bring up a message box
when the cell containing the word "REPORT" is either ...
- activated/selected
- or about to be deleted (the user selects the entire column/row for
deletion or the cell in question *(and possible adjacent cells) to
clear them).
The msgbox is to say: "Deleting the text entry "REPORT" results
in ...."
Help is much appreciated. Thank you very much in advance.
Regards, Andreas- Zitierten Text ausblenden -
- Zitierten Text anzeigen -
Hi Rick,
exactly what I wanted. Thank you very much for your terrific help.
Regards, Andreas
|