Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.worksheet.functions
external usenet poster
 
Posts: 1
Default getting comment pop-up

I use MS Excel 2007.
I have data validation list for a range of cells. There are 4 values to
choose from.

My requirement: There are 2 values which, when, selected should prompt the
use to enter a text/comment that is saved. This comment/text can bee seen by
moving the mouse over the cell.
However, if the value is changed to either of the other 2 - the comment/text
is automatically deleted.
  #2   Report Post  
Posted to microsoft.public.excel.worksheet.functions
external usenet poster
 
Posts: 11,058
Default getting comment pop-up

Here is an example:

Private Sub Worksheet_Change(ByVal Target As Range)
Set t = Target
Set b9 = Range("B9")
If Intersect(t, b9) Is Nothing Then Exit Sub
Application.EnableEvents = False
With t
If .Value = "first" Or .Value = "second" Then
.ClearComments
Else
MsgBox ("Please enter a comment.")
End If
End With
Application.EnableEvents = True
End Sub
--
Gary''s Student - gsnu200775


"A M I T" wrote:

I use MS Excel 2007.
I have data validation list for a range of cells. There are 4 values to
choose from.

My requirement: There are 2 values which, when, selected should prompt the
use to enter a text/comment that is saved. This comment/text can bee seen by
moving the mouse over the cell.
However, if the value is changed to either of the other 2 - the comment/text
is automatically deleted.

  #3   Report Post  
Posted to microsoft.public.excel.worksheet.functions
external usenet poster
 
Posts: 1
Default getting comment pop-up

Thanks for the help.
However, it did not execute with the range specified.
The cell range in use is K7:AR73 and the values for which the popup are
reqd. are "hc" , "sc", "w".


"Gary''s Student" wrote:

Here is an example:

Private Sub Worksheet_Change(ByVal Target As Range)
Set t = Target
Set b9 = Range("B9")
If Intersect(t, b9) Is Nothing Then Exit Sub
Application.EnableEvents = False
With t
If .Value = "first" Or .Value = "second" Then
.ClearComments
Else
MsgBox ("Please enter a comment.")
End If
End With
Application.EnableEvents = True
End Sub
--
Gary''s Student - gsnu200775


"A M I T" wrote:

I use MS Excel 2007.
I have data validation list for a range of cells. There are 4 values to
choose from.

My requirement: There are 2 values which, when, selected should prompt the
use to enter a text/comment that is saved. This comment/text can bee seen by
moving the mouse over the cell.
However, if the value is changed to either of the other 2 - the comment/text
is automatically deleted.

Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
copy comment content to cell content as data not as comment Lilach Excel Discussion (Misc queries) 2 June 21st 07 12:28 PM
How can I edit a comment w/o first having to select Show Comment Mary Ann Excel Discussion (Misc queries) 1 August 26th 05 12:34 AM
How do I insert a comment when the Insert:Comment menu is greyed? none Excel Discussion (Misc queries) 0 May 19th 05 12:36 AM
comment box pop ups Nathan Excel Discussion (Misc queries) 4 April 8th 05 08:01 AM
a comment plugin & copy paste directly from excel to comment ? fr. RFM Excel Worksheet Functions 0 December 1st 04 11:29 PM


All times are GMT +1. The time now is 04:39 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"