Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Auto-Insert & Delete Comments
Hi guys,
How could the sub below (which works for a single cell D8) be extended to work correspondingly across a range of data, say, to track E6:AE729 in Sheet1 and insert comment boxes accordingly in Sheet2 ? Also how could the inserted comment boxes be removed if corresponding cells in Sheet1 were cleared / made blank later ? Private Sub Workbook_SheetChange(ByVal Sh As Object, _ ByVal Target As Excel.Range) Set Alert = Sheets("Sheet1").Range("D8") If Application.WorksheetFunction.IsNumber(Alert) = False _ Then Exit Sub If Alert 0 Then Sheets("Sheet2").Select With Range("D8") .ClearComments .AddComment .Comment.Visible = False .Comment.Text Text:="Quantity: " & Alert End With End If End Sub -- Rgds Max xl 97 --- Please respond in thread xdemechanik <atyahoo<dotcom ---- |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Auto-Insert & Delete Comments
Apologies .. scratch this post ..
think Dave P. just dropped by in the other post in .misc -- Rgds Max xl 97 --- Please respond in thread xdemechanik <atyahoo<dotcom ---- |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Macro auto insert/delete | Excel Discussion (Misc queries) | |||
Delete added comments | Excel Discussion (Misc queries) | |||
Macro - Delete Comments - What if there's none? | Excel Worksheet Functions | |||
Comments will not delete from Worksheet | Excel Discussion (Misc queries) | |||
how to insert row or delete while the auto filter is turn on? | Excel Discussion (Misc queries) |