Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Прогрессивное суммирование ячеек по событию WorkshitChange! - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Прогрессивное суммирование ячеек по событию WorkshitChange! (Макросы/Sub)
Прогрессивное суммирование ячеек по событию WorkshitChange!
Tina90 Дата: Воскресенье, 29.05.2016, 14:51 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 45
Репутация: -16 ±
Замечаний: 60% ±

Excel 2013
Людиии привееет! помогите разобраться с ячейками!! мне нужно в одной ячейке накапливать значения из соседней ячейки 2 разными способами , но у каждого способа баги (от них нужно избавиться!!!)
[vba]
Код

Sub жжж()
    For Each cell In Range("C11:C14")
        i = i + 1
        Sheets(1).Cells(i, 4) = Value + cell
        Next
'здесь макрос реагирует на изменения в ячейке, произошедшие в результате работы формулы , НО не хочет приплюсовывать новые значения к уже имеющимся!! почему????
End Sub

Private Sub Worksheet_Change(ByVal Target As Range)
'почему макрос не реагирует на изменения в ячейке, произошедшие в результате работы формулы??? а реакция только на копипаст или ручное внесение значений????
If Target.Column = 2 And Target.Row < 2 Then
LastRow = Cells(1, 3).End(xlUp).Row
For Each cel In [b1]
Cells(LastRow, 3) = cel.Value + Cells(LastRow, 3)
Next
End If
End Sub
[/vba]
 
Ответить
СообщениеЛюдиии привееет! помогите разобраться с ячейками!! мне нужно в одной ячейке накапливать значения из соседней ячейки 2 разными способами , но у каждого способа баги (от них нужно избавиться!!!)
[vba]
Код

Sub жжж()
    For Each cell In Range("C11:C14")
        i = i + 1
        Sheets(1).Cells(i, 4) = Value + cell
        Next
'здесь макрос реагирует на изменения в ячейке, произошедшие в результате работы формулы , НО не хочет приплюсовывать новые значения к уже имеющимся!! почему????
End Sub

Private Sub Worksheet_Change(ByVal Target As Range)
'почему макрос не реагирует на изменения в ячейке, произошедшие в результате работы формулы??? а реакция только на копипаст или ручное внесение значений????
If Target.Column = 2 And Target.Row < 2 Then
LastRow = Cells(1, 3).End(xlUp).Row
For Each cel In [b1]
Cells(LastRow, 3) = cel.Value + Cells(LastRow, 3)
Next
End If
End Sub
[/vba]

Автор - Tina90
Дата добавления - 29.05.2016 в 14:51
gling Дата: Воскресенье, 29.05.2016, 15:32 | Сообщение № 2
Группа: Друзья
Ранг: Участник клуба
Сообщений: 2523
Репутация: 678 ±
Замечаний: 0% ±

2010
На работу формул реагирует Private Sub Worksheet_Calculate() а не Worksheet_Change(ByVal Target As Range)


ЯД-41001506838083

Сообщение отредактировал gling - Воскресенье, 29.05.2016, 15:43
 
Ответить
СообщениеНа работу формул реагирует Private Sub Worksheet_Calculate() а не Worksheet_Change(ByVal Target As Range)

Автор - gling
Дата добавления - 29.05.2016 в 15:32
Tina90 Дата: Воскресенье, 29.05.2016, 16:06 | Сообщение № 3
Группа: Пользователи
Ранг: Новичок
Сообщений: 45
Репутация: -16 ±
Замечаний: 60% ±

Excel 2013
На работу формул реагирует


ясно!! а разве могут находиться в событиях листа одновременно и Private Sub Worksheet_Calculate() и Worksheet_Change(ByVal Target As Range)??
 
Ответить
Сообщение
На работу формул реагирует


ясно!! а разве могут находиться в событиях листа одновременно и Private Sub Worksheet_Calculate() и Worksheet_Change(ByVal Target As Range)??

Автор - Tina90
Дата добавления - 29.05.2016 в 16:06
RAN Дата: Воскресенье, 29.05.2016, 16:33 | Сообщение № 4
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Репутация: 1163 ±
Замечаний: 0% ±

2010
Ваш вопрос очень похож на
"Неужели стул и диван могут находиться в одной комнате?"
Таки да, могут. Но вот сидеть, одновременно и там, и там, у вас вряд ли получится. :D


Быть или не быть, вот в чем загвоздка!
 
Ответить
СообщениеВаш вопрос очень похож на
"Неужели стул и диван могут находиться в одной комнате?"
Таки да, могут. Но вот сидеть, одновременно и там, и там, у вас вряд ли получится. :D

Автор - RAN
Дата добавления - 29.05.2016 в 16:33
Tina90 Дата: Воскресенье, 29.05.2016, 16:46 | Сообщение № 5
Группа: Пользователи
Ранг: Новичок
Сообщений: 45
Репутация: -16 ±
Замечаний: 60% ±

Excel 2013
если у вас недостаточно знаний для решения изложенной в vba коде проблемы , ТО не нужно ЗАХЛАМЛЯТЬ тему пустой болтовней!! для этого идите в чат или курилку! >(
 
Ответить
Сообщениеесли у вас недостаточно знаний для решения изложенной в vba коде проблемы , ТО не нужно ЗАХЛАМЛЯТЬ тему пустой болтовней!! для этого идите в чат или курилку! >(

Автор - Tina90
Дата добавления - 29.05.2016 в 16:46
Pelena Дата: Воскресенье, 29.05.2016, 17:18 | Сообщение № 6
Группа: Админы
Ранг: Местный житель
Сообщений: 19182
Репутация: 4420 ±
Замечаний: ±

Excel 365 & Mac Excel
[offtop]Н-да... Протягивая руку помощи, не забудь увернуться от пинка благодарности (с)[/offtop]


"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
Сообщение[offtop]Н-да... Протягивая руку помощи, не забудь увернуться от пинка благодарности (с)[/offtop]

Автор - Pelena
Дата добавления - 29.05.2016 в 17:18
RAN Дата: Воскресенье, 29.05.2016, 17:41 | Сообщение № 7
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Репутация: 1163 ±
Замечаний: 0% ±

2010
[offtop]Все, Зин, обидеть норовишь! (с) В.Высоцкий
Пиннуть котенка каждый рад!
Ухожу, ухожу...[/offtop]


Быть или не быть, вот в чем загвоздка!
 
Ответить
Сообщение[offtop]Все, Зин, обидеть норовишь! (с) В.Высоцкий
Пиннуть котенка каждый рад!
Ухожу, ухожу...[/offtop]

Автор - RAN
Дата добавления - 29.05.2016 в 17:41
gling Дата: Воскресенье, 29.05.2016, 20:19 | Сообщение № 8
Группа: Друзья
Ранг: Участник клуба
Сообщений: 2523
Репутация: 678 ±
Замечаний: 0% ±

2010
Tina90 Для общего развития прочтите правила форума в которых сказано
Цитата
3. Кратко, но ёмко опишите задачу в теле поста. ВСЕГДА прикладывайте файл-пример, кроме тех случаев, когда вопрос носит общий характер и не касается конкретно Вашего файла.
Учитесь задавать вопросы, а не так
Цитата
но у каждого способа баги (от них нужно избавиться!!!)
На что отвечать, на комментарии к макросам, или выяснить в чем заключаются "баги" и исправить их?
Цитата
'здесь макрос реагирует на изменения в ячейке, произошедшие в результате работы формулы , НО не хочет приплюсовывать новые значения к уже имеющимся!! почему????
Ваш первый макрос не на что не реагирует, если его не запустить индивидуально. Так что запускаться при пересчете формул он не может, это "баг" или так и задумано? Суммировать он не может, так как только Вам известно какое значение вы подразумеваете под "Value" но не указываете его.
Код
Value + cell
что и с чем суммируете. Про вторую процедуру ответил в Сообщении №2 за что и получил минус в репутации. В том что Вы не можете воспользоваться моим советом не мне минус, а Вам. Если у Вас не достаточно знаний для понятия оказанной Вам помощи, то не надо за это злиться на всех, и кричать не надо как в одной из ваших тем. Помогающим не известен уровень Вашей подготовки. Здесь помогают, а не делают за вас, причем помогают бескорыстно, к чему крики и оскорбления?


ЯД-41001506838083

Сообщение отредактировал gling - Воскресенье, 29.05.2016, 20:33
 
Ответить
СообщениеTina90 Для общего развития прочтите правила форума в которых сказано
Цитата
3. Кратко, но ёмко опишите задачу в теле поста. ВСЕГДА прикладывайте файл-пример, кроме тех случаев, когда вопрос носит общий характер и не касается конкретно Вашего файла.
Учитесь задавать вопросы, а не так
Цитата
но у каждого способа баги (от них нужно избавиться!!!)
На что отвечать, на комментарии к макросам, или выяснить в чем заключаются "баги" и исправить их?
Цитата
'здесь макрос реагирует на изменения в ячейке, произошедшие в результате работы формулы , НО не хочет приплюсовывать новые значения к уже имеющимся!! почему????
Ваш первый макрос не на что не реагирует, если его не запустить индивидуально. Так что запускаться при пересчете формул он не может, это "баг" или так и задумано? Суммировать он не может, так как только Вам известно какое значение вы подразумеваете под "Value" но не указываете его.
Код
Value + cell
что и с чем суммируете. Про вторую процедуру ответил в Сообщении №2 за что и получил минус в репутации. В том что Вы не можете воспользоваться моим советом не мне минус, а Вам. Если у Вас не достаточно знаний для понятия оказанной Вам помощи, то не надо за это злиться на всех, и кричать не надо как в одной из ваших тем. Помогающим не известен уровень Вашей подготовки. Здесь помогают, а не делают за вас, причем помогают бескорыстно, к чему крики и оскорбления?

Автор - gling
Дата добавления - 29.05.2016 в 20:19
Tina90 Дата: Воскресенье, 29.05.2016, 21:18 | Сообщение № 9
Группа: Пользователи
Ранг: Новичок
Сообщений: 45
Репутация: -16 ±
Замечаний: 60% ±

Excel 2013
я уже сама во всём разобралась, о достойнейшие из счастливейших хранителей священного грааля!! честно сказать не думала, что на таком серьезном форуме по выходным собирается группа "здоровье" по совместному переживанию ПМСа!! больше не буду сюда приходить. по выходным.
[moder]Вы бы для начала на репутацию помогающих посмотрели. Вам ответили на Ваши вопросы - а Вы оскорбляете.
Замечание Вам за нарушение Правил форума[/moder]


Сообщение отредактировал SLAVICK - Воскресенье, 29.05.2016, 21:50
 
Ответить
Сообщениея уже сама во всём разобралась, о достойнейшие из счастливейших хранителей священного грааля!! честно сказать не думала, что на таком серьезном форуме по выходным собирается группа "здоровье" по совместному переживанию ПМСа!! больше не буду сюда приходить. по выходным.
[moder]Вы бы для начала на репутацию помогающих посмотрели. Вам ответили на Ваши вопросы - а Вы оскорбляете.
Замечание Вам за нарушение Правил форума[/moder]

Автор - Tina90
Дата добавления - 29.05.2016 в 21:18
Manyasha Дата: Воскресенье, 29.05.2016, 22:19 | Сообщение № 10
Группа: Модераторы
Ранг: Старожил
Сообщений: 2198
Репутация: 898 ±
Замечаний: 0% ±

Excel 2010, 2016
по выходным собирается группа

ну да, а по будням видимо их клоны Вам помогают.
Замечание Вам за нарушение п5а Правил и за хамское отношение к помогающим!


ЯД: 410013299366744 WM: R193491431804
 
Ответить
Сообщение
по выходным собирается группа

ну да, а по будням видимо их клоны Вам помогают.
Замечание Вам за нарушение п5а Правил и за хамское отношение к помогающим!

Автор - Manyasha
Дата добавления - 29.05.2016 в 22:19
Pelena Дата: Воскресенье, 29.05.2016, 22:51 | Сообщение № 11
Группа: Админы
Ранг: Местный житель
Сообщений: 19182
Репутация: 4420 ±
Замечаний: ±

Excel 365 & Mac Excel
больше не буду сюда приходить. по выходным.

По будням тоже не будете. Бан Вам


"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
Сообщение
больше не буду сюда приходить. по выходным.

По будням тоже не будете. Бан Вам

Автор - Pelena
Дата добавления - 29.05.2016 в 22:51
Kuzmich Дата: Воскресенье, 29.05.2016, 23:08 | Сообщение № 12
Группа: Проверенные
Ранг: Ветеран
Сообщений: 711
Репутация: 156 ±
Замечаний: 0% ±

Excel 2003
Pelena Дайте еще сообщение на PlanetaExcel, чтобы там тоже были в курсе.
 
Ответить
СообщениеPelena Дайте еще сообщение на PlanetaExcel, чтобы там тоже были в курсе.

Автор - Kuzmich
Дата добавления - 29.05.2016 в 23:08
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Прогрессивное суммирование ячеек по событию WorkshitChange! (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!