nick7inc
Advanced Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
DennisKo
Цитата:| Что нужно добавить, что бы копировался только результат вычисления формулы, а не ошибка |
Надо перед копированием проверять:
If IsError(Cells(1, "A")) Then msgbox "Ошибка!"
Добавлено:
ABSERG
Цитата:| Как сделать, чтоб редактируя содержание в строке к примеру под номером 3 (наименование товара) искало такие же строки по всем листам, и исправляла их. |
Основа - событие листа Worksheet_Change(). Но тут проблема: это событие вызывается только после редактирования, поэтому VBA доступно только новое значение. Чтобы получить старое я советую сделать глобальную переменную, куда закидываем значение при событии Worksheet_SelectionChange(). Вот есть небольшой примерчик (у вас в VBA редакторе должно быть включено Immediate Window, чтобы видет результат):код Этот пример можно доработать. Имея значение до, значение после, координаты ячейки, в которой сделаны изменения (лист, строка, столбец, новое значение - всё это доступно из свойств объекта Target в Worksheet_Change()) несложно сделать и остальное. Проверяете, тот ли столбец был отредактирован, если тот, что вам нужен, то ищите во всех ваших листах похожие данные и правьте их. |
Всего записей: 1138 | Зарегистр. 04-05-2007 | Отправлено: 20:58 09-04-2008 | Исправлено: nick7inc, 21:19 09-04-2008 |
|
