Не поломайте опять ))
Макрос: сумма/разница значений ячеек по условию
23.09.2019 18:48:17
|
|
|
|
23.09.2019 19:16:41
Теперь ни как не " вывезу" , как это все расписать на каждую неделю для одного сотрудника . С таким же подсчетом .
Изменено: |
|
|
|
23.09.2019 22:48:47
Все работает Юрий. Спасибо БОЛЬШОЕ !!!
Упс. Но работает только для одного сотрудника. Поменял строки в коде, и не хочет работать If Not Intersect(Target, Range("F12:BE12")) Is Nothing Then Понимаю что сделал что то не так, но не знаю что
Изменено: |
|
|
|
23.09.2019 23:01:28
|
|
|
|
23.09.2019 23:02:43
|
|||
|
|
23.09.2019 23:07:00
Ну посмотрите внимательно на код (адрес диапазона): контролируется одна строка. Что нужно сделать, чтобы контролировать несколько строк? Правильно - указать нужный адрес..
|
|||
|
|
23.09.2019 23:10:58
Волшебник !!!!
Спасибо !!! Работает !!! да..., чайник я .. ) Спасибо большое !!! |
|
|
|
29.09.2019 10:56:39
Все хорошо, но , есть 3 момента .
1. При случайной ошибке , ставя в ячейку не Х , результат в столбце В уходит в минус . 2. Тоже самое и происходит , если по любой пустой ячейке , в пределах обозначенного диапазона , щелкнуть DEL. 3. Если применить к диапазону ОЧИСТИТЬ СОДЕРЖИМОЕ , то результаты из столбце В , не обнуляются . Как это победить , ни как не " вывозу". Пожалуйста. |
|
|
|
29.09.2019 11:22:35
Опять Вы про минус... Ну а если вычислением получается минус - что делать?
По пункту 3: в макросе есть строка If Target.Cells.Count > 1 Then Exit Sub Суть её в следующем: если изменения произошли сразу в нескольких ячейках, то выходим из процедуры (ничего не делаем). |
|
|
|
29.09.2019 18:08:48
Ничего не получается
|
|
|
|
29.09.2019 18:20:42
Вы же на вопрос не отвечаете - как Вам помочь?
|
|
|
|
29.09.2019 19:15:43
Результат в столбце В , уходит в отрицательное число , если внести в диапазон заданных ячеек любой другой символ , кроме Х .
Щелкнув Del на пустой ячейке в этом же диапазоне , тоже уходит в отрицательное значение . И содержимое диапазона , не очищается если кликнуть ОЧИСТИТЬ СОДЕРЖИМОЕ . Вот такие проблемы . ) |
|
|
|
29.09.2019 19:41:08
Вернее будет сказать , чтобы диапазон указанных ячеек , реагировал только на Х маленькие и большие русские и английские .
И не производил вычисление при нажатии Del на пустой ячейке
Изменено: |
|
|
|
29.09.2019 21:00:17
|
|||
|
|
29.09.2019 22:12:55
Диапазон рабочих ячеек , которые обозначены в коде ,должен работать только с X . На любые другие символы, не может быть ни каких вычислений. Если X ставим в F11 то F23 суммируется к В11. Если X удаляем из F11 , то F23 минус от B11. И ни на какой другой символ , букву, цифру вычисления не должны совершаться.
И так же не должно быть ни каких вычислений , если DEL щелкнуть на пустую ячейку. А с ОТЧИСТИТЬ СОДЕРЖИМОЕ , я понял. |
|
|
|
29.09.2019 22:36:45
Проверьте вариант. Проверку при удалении (Delete) на наличие в ячейке других символов, кроме Хх (Ru и En), не делал.
|
|
|
|
29.09.2019 22:51:40
Ставлю любой другой символ кроме Х , вычисление не производиться, но если его удалить Del или стрелкой, то вычисление производиться.
|
|
|
|
29.09.2019 22:54:44
Вот для кого это было написано? |
|||
|
|
29.09.2019 22:57:42
|
|||
|
|
29.09.2019 23:08:24
Я знаю, как работает ))
Добавьте проверку в процедуру Worksheet_SelectionChange. Справитесь? |
|
|
|
29.09.2019 23:14:54
|
|||
|
|
29.09.2019 23:20:47
Поменяйте вторую процедуру:
|
|||
|
|
29.09.2019 23:28:22
Отлично. Все работает как нужно. Но ругается на эту строку Case Is = "Х", "X", "х", "x": Flag = True , если пытаюсь выделить несколько ячеек
|
|
|
|
29.09.2019 23:31:36
|
|||
|
|
29.09.2019 23:38:22
Пусть нельзя будет их отчистить , но чтобы ошибка не вылетала. Чтобы не отправляла в код. |
|||
|
|
29.09.2019 23:42:28
Невозможно вычислить значение конкретной ячейки и номера её сроки и столбца, если выделено НЕСКОЛЬКО ячеек.
Объясните напарнику, что нельзя выделять несколько ячеек - неужели он не запомнит это? И на всякий случай сделайте так:
|
|||
|
|
29.09.2019 23:46:42
Хорошо. выделение теперь не выдает ошибку. Но DEL и стрелка теперь снова дают минусы в пустые ячейки.
Может все назад вернуть ? |
|
|
|
30.09.2019 00:01:20
Я ничего не менял, чтобы возвращать: только добавил проверку на количество выделенных ячеек. А про стрелку вообще не понял.
Проверил DEL на пустой ячейке - данные не минусуются. На ячейке с любым другим символом (кроме х) - аналогично. Скоро пойдёт третья страница... |
|
|
|
30.09.2019 00:07:04
|
||||
|
|
|||