Как вынести сумму из состояния строки в ячейку для расчетов
decor
Дата: Четверг, 07.03.2019, 12:17 |
Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 18
Репутация:
0
±
Замечаний:
0% ±
Excel 2016
Добрый день! Подскажите "чайнику" с глупым вопросом. Не знаю где искать, в какую ветку можно обратиться. Или я не правильно формулирую вопросы для поисковика, или..., весь интернет перерыл, но, так и не нашел для себя ответа..., ни по формулам, ни просто... Задача такая, в зависимости от месторасположения рекламы на стенде, цена меняется, т.к. есть лакомые места, надо и продавать их лучше, а то... я разбил стенд на ячейки и в зависимости от базовой цены - 1, стал увеличивать коэффициент, осталось выделить зону из ячеек (из 2-х, 4, 6-ти в зависимости от формата и т.д.) и посчитать сумму коэффициентов для дальнейшего расчета цены модуля. Когда выделяешь, в строке состояния сумма прописывается, значит в уме у Excel где то она уже сидит, откуда ее можно выковырять? Как эту сумму вытащить в ячейку как промежуточный итог для дальнейших расчет?
Добрый день! Подскажите "чайнику" с глупым вопросом. Не знаю где искать, в какую ветку можно обратиться. Или я не правильно формулирую вопросы для поисковика, или..., весь интернет перерыл, но, так и не нашел для себя ответа..., ни по формулам, ни просто... Задача такая, в зависимости от месторасположения рекламы на стенде, цена меняется, т.к. есть лакомые места, надо и продавать их лучше, а то... я разбил стенд на ячейки и в зависимости от базовой цены - 1, стал увеличивать коэффициент, осталось выделить зону из ячеек (из 2-х, 4, 6-ти в зависимости от формата и т.д.) и посчитать сумму коэффициентов для дальнейшего расчета цены модуля. Когда выделяешь, в строке состояния сумма прописывается, значит в уме у Excel где то она уже сидит, откуда ее можно выковырять? Как эту сумму вытащить в ячейку как промежуточный итог для дальнейших расчет? decor
Сообщение отредактировал decor - Четверг, 07.03.2019, 12:19
Ответить
Сообщение Добрый день! Подскажите "чайнику" с глупым вопросом. Не знаю где искать, в какую ветку можно обратиться. Или я не правильно формулирую вопросы для поисковика, или..., весь интернет перерыл, но, так и не нашел для себя ответа..., ни по формулам, ни просто... Задача такая, в зависимости от месторасположения рекламы на стенде, цена меняется, т.к. есть лакомые места, надо и продавать их лучше, а то... я разбил стенд на ячейки и в зависимости от базовой цены - 1, стал увеличивать коэффициент, осталось выделить зону из ячеек (из 2-х, 4, 6-ти в зависимости от формата и т.д.) и посчитать сумму коэффициентов для дальнейшего расчета цены модуля. Когда выделяешь, в строке состояния сумма прописывается, значит в уме у Excel где то она уже сидит, откуда ее можно выковырять? Как эту сумму вытащить в ячейку как промежуточный итог для дальнейших расчет? Автор - decor Дата добавления - 07.03.2019 в 12:17
_Boroda_
Дата: Четверг, 07.03.2019, 12:18 |
Сообщение № 2
Группа: Модераторы
Ранг: Местный житель
Сообщений: 16675
Репутация:
6481
±
Замечаний:
0% ±
2003; 2007; 2010; 2013 RUS
Так нужно? В модуль листа (правой мышой на ярлык листа - Исходный текст) вставьте макрос [vba]Код
Private Sub Worksheet_SelectionChange(ByVal Target As Range) Set d_ = Intersect(Target, Range("A1:H9")) If Not d_ Is Nothing Then Range("M2") = WorksheetFunction.Sum(d_) End If End Sub
[/vba] Работает после того, как Вы выделите нужное и отпустите кнопку мыши При выделении других диапазонов значение суммы последнего выделения в нужном диапазоне остается
Так нужно? В модуль листа (правой мышой на ярлык листа - Исходный текст) вставьте макрос [vba]Код
Private Sub Worksheet_SelectionChange(ByVal Target As Range) Set d_ = Intersect(Target, Range("A1:H9")) If Not d_ Is Nothing Then Range("M2") = WorksheetFunction.Sum(d_) End If End Sub
[/vba] Работает после того, как Вы выделите нужное и отпустите кнопку мыши При выделении других диапазонов значение суммы последнего выделения в нужном диапазоне остается _Boroda_
Скажи мне, кудесник, любимец ба’гов... Платная помощь: Boroda_Excel@mail.ru Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
Ответить
Сообщение Так нужно? В модуль листа (правой мышой на ярлык листа - Исходный текст) вставьте макрос [vba]Код
Private Sub Worksheet_SelectionChange(ByVal Target As Range) Set d_ = Intersect(Target, Range("A1:H9")) If Not d_ Is Nothing Then Range("M2") = WorksheetFunction.Sum(d_) End If End Sub
[/vba] Работает после того, как Вы выделите нужное и отпустите кнопку мыши При выделении других диапазонов значение суммы последнего выделения в нужном диапазоне остается Автор - _Boroda_ Дата добавления - 07.03.2019 в 12:18
decor
Дата: Четверг, 07.03.2019, 12:26 |
Сообщение № 3
Группа: Пользователи
Ранг: Новичок
Сообщений: 18
Репутация:
0
±
Замечаний:
0% ±
Excel 2016
Здорово! То, что надо! Очень благодарен за оперативную помощь! Еще буду признателен, если дадите ссылку, где можно почитать подробнее про эти макросы, чтобы уже в будущем по этим вопросам не беспокоить. Еще раз, СПАСИБО!
Здорово! То, что надо! Очень благодарен за оперативную помощь! Еще буду признателен, если дадите ссылку, где можно почитать подробнее про эти макросы, чтобы уже в будущем по этим вопросам не беспокоить. Еще раз, СПАСИБО! decor
Ответить
Сообщение Здорово! То, что надо! Очень благодарен за оперативную помощь! Еще буду признателен, если дадите ссылку, где можно почитать подробнее про эти макросы, чтобы уже в будущем по этим вопросам не беспокоить. Еще раз, СПАСИБО! Автор - decor Дата добавления - 07.03.2019 в 12:26
decor
Дата: Четверг, 07.03.2019, 12:35 |
Сообщение № 4
Группа: Пользователи
Ранг: Новичок
Сообщений: 18
Репутация:
0
±
Замечаний:
0% ±
Excel 2016
Так нужно? В модуль листа (правой мышой на ярлык листа - Исходный текст) вставьте макрос
А количество ячеек как вытащить тоже в отдельную ячейку? Как надо прописать?
Так нужно? В модуль листа (правой мышой на ярлык листа - Исходный текст) вставьте макрос
А количество ячеек как вытащить тоже в отдельную ячейку? Как надо прописать?decor
Ответить
Сообщение Так нужно? В модуль листа (правой мышой на ярлык листа - Исходный текст) вставьте макрос
А количество ячеек как вытащить тоже в отдельную ячейку? Как надо прописать?Автор - decor Дата добавления - 07.03.2019 в 12:35
decor
Дата: Четверг, 07.03.2019, 12:39 |
Сообщение № 5
Группа: Пользователи
Ранг: Новичок
Сообщений: 18
Репутация:
0
±
Замечаний:
0% ±
Excel 2016
вот сейчас в какой форме (во вложении), т.е. мне надо за 1 ед посчитать, а это кол-во ячеек тоже надо вытащить из состояния строки
вот сейчас в какой форме (во вложении), т.е. мне надо за 1 ед посчитать, а это кол-во ячеек тоже надо вытащить из состояния строки decor
Ответить
Сообщение вот сейчас в какой форме (во вложении), т.е. мне надо за 1 ед посчитать, а это кол-во ячеек тоже надо вытащить из состояния строки Автор - decor Дата добавления - 07.03.2019 в 12:39
_Boroda_
Дата: Четверг, 07.03.2019, 12:45 |
Сообщение № 6
Группа: Модераторы
Ранг: Местный житель
Сообщений: 16675
Репутация:
6481
±
Замечаний:
0% ±
2003; 2007; 2010; 2013 RUS
Скажи мне, кудесник, любимец ба’гов... Платная помощь: Boroda_Excel@mail.ru Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
Ответить
decor
Дата: Четверг, 07.03.2019, 12:51 |
Сообщение № 7
Группа: Пользователи
Ранг: Новичок
Сообщений: 18
Репутация:
0
±
Замечаний:
0% ±
Excel 2016
Благодарю! Восхищен профессионализмом!
Благодарю! Восхищен профессионализмом! decor
Ответить
Сообщение Благодарю! Восхищен профессионализмом! Автор - decor Дата добавления - 07.03.2019 в 12:51
bmv98rus
Дата: Четверг, 07.03.2019, 12:52 |
Сообщение № 8
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4108
Репутация:
768
±
Замечаний:
0% ±
Excel 2013/2016
тут есть известный подвох Его устранение возможно, но требует дополнительных действий и они не просты . Это просто предупреждение, чтоб если что , знали, что нужно осторожно выделять диапазоны.
тут есть известный подвох Его устранение возможно, но требует дополнительных действий и они не просты . Это просто предупреждение, чтоб если что , знали, что нужно осторожно выделять диапазоны. bmv98rus
Замечательный Временно просто медведь , процентов на 20 .
Сообщение отредактировал bmv98rus - Четверг, 07.03.2019, 12:58
Ответить
Сообщение тут есть известный подвох Его устранение возможно, но требует дополнительных действий и они не просты . Это просто предупреждение, чтоб если что , знали, что нужно осторожно выделять диапазоны. Автор - bmv98rus Дата добавления - 07.03.2019 в 12:52
decor
Дата: Четверг, 07.03.2019, 14:51 |
Сообщение № 9
Группа: Пользователи
Ранг: Новичок
Сообщений: 18
Репутация:
0
±
Замечаний:
0% ±
Excel 2016
Его устранение возможно, но требует дополнительных действий и они не просты
Его устранение возможно, но требует дополнительных действий и они не просты
К сообщению приложен файл: -5419678_1-v2_1.xlsm(18.6 Kb)
да-а-а, чувствую действительно заморочек много. Пришел домой, а дома то ли старый "офис", таблица не считает, а я хотел универсальный прайс для клиента сделать, а какой у него "офис"? будет ли таблица считать? надо разбираться....
Его устранение возможно, но требует дополнительных действий и они не просты
Его устранение возможно, но требует дополнительных действий и они не просты
К сообщению приложен файл: -5419678_1-v2_1.xlsm(18.6 Kb)
да-а-а, чувствую действительно заморочек много. Пришел домой, а дома то ли старый "офис", таблица не считает, а я хотел универсальный прайс для клиента сделать, а какой у него "офис"? будет ли таблица считать? надо разбираться....decor
Ответить
Сообщение Его устранение возможно, но требует дополнительных действий и они не просты
Его устранение возможно, но требует дополнительных действий и они не просты
К сообщению приложен файл: -5419678_1-v2_1.xlsm(18.6 Kb)
да-а-а, чувствую действительно заморочек много. Пришел домой, а дома то ли старый "офис", таблица не считает, а я хотел универсальный прайс для клиента сделать, а какой у него "офис"? будет ли таблица считать? надо разбираться....Автор - decor Дата добавления - 07.03.2019 в 14:51
_Boroda_
Дата: Четверг, 07.03.2019, 14:59 |
Сообщение № 10
Группа: Модераторы
Ранг: Местный житель
Сообщений: 16675
Репутация:
6481
±
Замечаний:
0% ±
2003; 2007; 2010; 2013 RUS
От версии Офиса этот макрос не зависмит. Вы при открытии файла макросы разрешили?
От версии Офиса этот макрос не зависмит. Вы при открытии файла макросы разрешили? _Boroda_
Скажи мне, кудесник, любимец ба’гов... Платная помощь: Boroda_Excel@mail.ru Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
Ответить
Сообщение От версии Офиса этот макрос не зависмит. Вы при открытии файла макросы разрешили? Автор - _Boroda_ Дата добавления - 07.03.2019 в 14:59
decor
Дата: Четверг, 07.03.2019, 15:05 |
Сообщение № 11
Группа: Пользователи
Ранг: Новичок
Сообщений: 18
Репутация:
0
±
Замечаний:
0% ±
Excel 2016
Вы при открытии файла макросы разрешили?
а он меня не спрашивал тут ведь ка, вот я "чайник", но, пытаюсь разобраться, а вот моих клеинтов, я не могу этому обязать. либо четкую инструкция написать, что само уже плохо, либо более удобный формат придумать
Вы при открытии файла макросы разрешили?
а он меня не спрашивал тут ведь ка, вот я "чайник", но, пытаюсь разобраться, а вот моих клеинтов, я не могу этому обязать. либо четкую инструкция написать, что само уже плохо, либо более удобный формат придуматьdecor
Ответить
Сообщение Вы при открытии файла макросы разрешили?
а он меня не спрашивал тут ведь ка, вот я "чайник", но, пытаюсь разобраться, а вот моих клеинтов, я не могу этому обязать. либо четкую инструкция написать, что само уже плохо, либо более удобный формат придуматьАвтор - decor Дата добавления - 07.03.2019 в 15:05
decor
Дата: Четверг, 07.03.2019, 15:32 |
Сообщение № 12
Группа: Пользователи
Ранг: Новичок
Сообщений: 18
Репутация:
0
±
Замечаний:
0% ±
Excel 2016
Вы при открытии файла макросы разрешили?
Открыл, через "Параметры макросов" разрешил включение всех, не работает
Вы при открытии файла макросы разрешили?
Открыл, через "Параметры макросов" разрешил включение всех, не работаетdecor
Ответить
Сообщение Вы при открытии файла макросы разрешили?
Открыл, через "Параметры макросов" разрешил включение всех, не работаетАвтор - decor Дата добавления - 07.03.2019 в 15:32
bmv98rus
Дата: Четверг, 07.03.2019, 16:04 |
Сообщение № 13
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4108
Репутация:
768
±
Замечаний:
0% ±
Excel 2013/2016
а вот моих клеинтов, я не могу этому обязать.
автоматически делает результат нулевым. Как ни крути, все равно ничего без VBA подобного не сделать.
а вот моих клеинтов, я не могу этому обязать.
автоматически делает результат нулевым. Как ни крути, все равно ничего без VBA подобного не сделать.bmv98rus
Замечательный Временно просто медведь , процентов на 20 .
Ответить
Сообщение а вот моих клеинтов, я не могу этому обязать.
автоматически делает результат нулевым. Как ни крути, все равно ничего без VBA подобного не сделать.Автор - bmv98rus Дата добавления - 07.03.2019 в 16:04
decor
Дата: Четверг, 07.03.2019, 16:10 |
Сообщение № 14
Группа: Пользователи
Ранг: Новичок
Сообщений: 18
Репутация:
0
±
Замечаний:
0% ±
Excel 2016
Как ни крути, все равно ничего без VBA подобного не сделать.
А как это сделать?
Как ни крути, все равно ничего без VBA подобного не сделать.
А как это сделать?decor
Ответить
Сообщение Как ни крути, все равно ничего без VBA подобного не сделать.
А как это сделать?Автор - decor Дата добавления - 07.03.2019 в 16:10
decor
Дата: Четверг, 07.03.2019, 16:21 |
Сообщение № 15
Группа: Пользователи
Ранг: Новичок
Сообщений: 18
Репутация:
0
±
Замечаний:
0% ±
Excel 2016
От версии Офиса этот макрос не зависмит. Вы при открытии файла макросы разрешили?
при открытии удаляет код VBA: <?xml version="1.0" encoding="UTF-8" standalone="true"?> -<recoveryLog xmlns="http://schemas.openxmlformats.org/spreadsheetml/2006/main"> <logFileName>error026200_01.xml</logFileName> <summary>Обнаружены ошибки в файле "C:\Users\Слава\Downloads\-5419678_1-v2_2.xlsm"</summary> -<removedParts summary="Ниже приведен список удаленных компонентов:"> <removedPart>Удаленный компонент: Компонент /xl/vbaProject.bin. (Visual Basic для приложений (VBA))</removedPart> </removedParts> </recoveryLog>
От версии Офиса этот макрос не зависмит. Вы при открытии файла макросы разрешили?
при открытии удаляет код VBA: <?xml version="1.0" encoding="UTF-8" standalone="true"?> -<recoveryLog xmlns="http://schemas.openxmlformats.org/spreadsheetml/2006/main"> <logFileName>error026200_01.xml</logFileName> <summary>Обнаружены ошибки в файле "C:\Users\Слава\Downloads\-5419678_1-v2_2.xlsm"</summary> -<removedParts summary="Ниже приведен список удаленных компонентов:"> <removedPart>Удаленный компонент: Компонент /xl/vbaProject.bin. (Visual Basic для приложений (VBA))</removedPart> </removedParts> </recoveryLog>decor
Ответить
Сообщение От версии Офиса этот макрос не зависмит. Вы при открытии файла макросы разрешили?
при открытии удаляет код VBA: <?xml version="1.0" encoding="UTF-8" standalone="true"?> -<recoveryLog xmlns="http://schemas.openxmlformats.org/spreadsheetml/2006/main"> <logFileName>error026200_01.xml</logFileName> <summary>Обнаружены ошибки в файле "C:\Users\Слава\Downloads\-5419678_1-v2_2.xlsm"</summary> -<removedParts summary="Ниже приведен список удаленных компонентов:"> <removedPart>Удаленный компонент: Компонент /xl/vbaProject.bin. (Visual Basic для приложений (VBA))</removedPart> </removedParts> </recoveryLog>Автор - decor Дата добавления - 07.03.2019 в 16:21
StoTisteg
Дата: Четверг, 07.03.2019, 16:26 |
Сообщение № 16
Группа: Авторы
Ранг: Старожил
Сообщений: 1161
Репутация:
103
±
Замечаний:
0% ±
Excel 2010
Что-то мне подсказывает, что Вы его где-то без макросов сохранили...
Что-то мне подсказывает, что Вы его где-то без макросов сохранили... StoTisteg
Интуитивно понятный код - это когда интуитивно понятно, что это код.
Ответить
Сообщение Что-то мне подсказывает, что Вы его где-то без макросов сохранили... Автор - StoTisteg Дата добавления - 07.03.2019 в 16:26
_Boroda_
Дата: Четверг, 07.03.2019, 16:35 |
Сообщение № 17
Группа: Модераторы
Ранг: Местный житель
Сообщений: 16675
Репутация:
6481
±
Замечаний:
0% ±
2003; 2007; 2010; 2013 RUS
StoTisteg , Не верьте своему чему-то - C:\Users\Слава\Downloads\-5419678_1-v2_2.xlsm
decor , попробуйте еще раз с этим файлом
StoTisteg , Не верьте своему чему-то - C:\Users\Слава\Downloads\-5419678_1-v2_2.xlsm
decor , попробуйте еще раз с этим файлом_Boroda_
Скажи мне, кудесник, любимец ба’гов... Платная помощь: Boroda_Excel@mail.ru Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
Ответить
Сообщение StoTisteg , Не верьте своему чему-то - C:\Users\Слава\Downloads\-5419678_1-v2_2.xlsm
decor , попробуйте еще раз с этим файломАвтор - _Boroda_ Дата добавления - 07.03.2019 в 16:35
StoTisteg
Дата: Четверг, 07.03.2019, 16:38 |
Сообщение № 18
Группа: Авторы
Ранг: Старожил
Сообщений: 1161
Репутация:
103
±
Замечаний:
0% ±
Excel 2010
Да, действительно. Мартышка к старости слаба глазами стала :-)
Да, действительно. Мартышка к старости слаба глазами стала :-)StoTisteg
Интуитивно понятный код - это когда интуитивно понятно, что это код.
Ответить
Сообщение Да, действительно. Мартышка к старости слаба глазами стала :-)Автор - StoTisteg Дата добавления - 07.03.2019 в 16:38
decor
Дата: Четверг, 07.03.2019, 17:01 |
Сообщение № 19
Группа: Пользователи
Ранг: Новичок
Сообщений: 18
Репутация:
0
±
Замечаний:
0% ±
Excel 2016
Ответить
bmv98rus
Дата: Четверг, 07.03.2019, 17:03 |
Сообщение № 20
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4108
Репутация:
768
±
Замечаний:
0% ±
Excel 2013/2016
decor , У вас скорее всего антивирус шаловливый.
decor , У вас скорее всего антивирус шаловливый.bmv98rus
Замечательный Временно просто медведь , процентов на 20 .
Ответить
Сообщение decor , У вас скорее всего антивирус шаловливый.Автор - bmv98rus Дата добавления - 07.03.2019 в 17:03