Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss
Comments count
10 views
Skip to first unread message
Andrew Kirienko
Sep 7, 1997, 3:00:00 AM9/7/97
to
Добpого вpемени суток, уважаемый Yuri!
Понедельник 21 Июля 1997, Yuri Veltischev ─── All о SpecialCells:
YV> Hе подскажет ли All как узнать есть ли хоть один Notes в рабочем листе
YV> (кроме как перебором по всем ячейкам). Без этого не работает:
YV> Cells.SpecialCells(xlNotes).Select
В Excel'97 твоя проблема может быть решена вот как:
'
' Возвращает TRUE, если на активном рабочем листе имеется хотя бы
' одна ячейка с коментарием, иначе возвращает FALSE
'
Public Function IsCommentsPresent() As Boolean
IsCommentsPresent = ( ActiveSheet.Comments.Count <> 0 )
End Function
С уважением,
Andrew Kirienko.
--- <en...@ptt.ru>
0 new messages