Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 28.04.2008, 21:41   #1
softrix
 
Регистрация: 02.03.2008
Сообщений: 8
По умолчанию Определить наличие коммента

Подскажите, как определить есть объект комментарий в ячейке или нет.

Мне надо если коммент в ячейке есть, то удаляем его, если коммента нет то добавляем новый.

Надо что то типа:
if(ActiveCell.Comment) then
Только это не работает, а как правильно сделать ?
softrix вне форума
Старый 28.04.2008, 22:45   #2
дмидми
Форумчанин
 
Аватар для дмидми
 
Регистрация: 06.03.2008
Сообщений: 352
Лампочка Конечно, не работает

CommentF1

Немножко оттуда:
Comment Property
Returns a Comment object...

То есть: это свойство коллекции Range возвращает вовсе не Boolean-значение, а ссылку на объект -- или, если объект не существует, возвращает спецзначение ссылки, Nothing.

А потому правильно будет, например,
If ActiveCell.Comment is Nothing Then
etc.
дмидми вне форума
Старый 28.04.2008, 23:01   #3
softrix
 
Регистрация: 02.03.2008
Сообщений: 8
По умолчанию

Спасибо, выручили
softrix вне форума
Закрытая тема


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Help! Как проверить наличие "рисунков" в листах книги? Bezdar Microsoft Office Excel 4 15.08.2008 15:09
Проверить наличие листа с данным названием Sega Microsoft Office Excel 2 05.08.2008 17:18
Среди 20 введёных чисел определить чётные, распечатать их, определить min Spade Помощь студентам 4 15.06.2008 18:39
Си - Написать функцию, проверяющую наличие в строке заданного слова Cvetok Помощь студентам 1 14.05.2008 05:44
наличие определенного свойства у контрола Toxa Общие вопросы Delphi 5 03.09.2007 16:54