MS Excel - решение практических задач

В этой теме размещаем вопросы и ответы, а также советы и рекомендации по решению конкретных задач, которые требуют создания формулы, применения макроса, написания кода VBA, т.е. Практикум.

------------------------------

Вопросы и ответы, а также советы и рекомендации по настройке MS Excel, ошибки в работе программы, решение задач по импорту/экспорту документов, ссылки и обсуждение надстроек для Excel, обучающие материалы и т.п. размещаем в теме MS Excel - настройка, импорт/экспорт.
Если решение задачи не требует применения формул и макросов (VBA), то это обсуждение будет перенесено в тему по настройкам.

Все пожелания по принципам размещения сообщений по этим темам рассматриваются - пишите в личку Andrey_k.

[Chet]

Цитата: Сообщение от ДЫСЫпы Кстати, если не секрет, зачем Вам это?

а, кстати, да! Эксел использовать как "калькулятор"? Неужели нельзя таблицу сделать с данными; всё красивенько структурировать и по ячеечкам разложить? Ведь у Вас же всё ж таки не просто цифры, а значения чего-то? ...

[nnnata]

Цитата: Сообщение от ДЫСЫпы Кстати, если не секрет, зачем Вам это?

не секрет. как я поняла вопрос в том, какую задачу я пытаюсь решить таким макаром. каждый день я получаю некоторые данные, это может быть одна цифра, может быть несколько, эти данные я вношу в таблицу. в этих данных мне интересна только сумма. делаю я это уже почти год, как следствие столбик цифр своей длиной начинает раздражать. вот, решила узнать, что с этим можно сделать если есть другой способ кроме описанного мной ТЗ, буду рада

[Chet]

Цитата: Сообщение от nnnata каждый день я получаю некоторые данные, это может быть одна цифра, может быть несколько, эти данные я вношу в таблицу

Только приход? и только от одного контрагента?

Цитата: Сообщение от nnnata в этих данных мне интересна только сумма

беззаботная жизнь! )))))))))))

[nnnata]

Цитата: Сообщение от Chet-V Только приход? и только от одного контрагента? беззаботная жизнь! )))))))))))

жаль, что это только сотая часть моей жизни
и оказывается даже такая беззаботность может стать хлопотной, например, из-за длины столбца

[ДЫСЫпы]

Цитата: Сообщение от nnnata как следствие столбик цифр своей длиной начинает раздражать

Чем же он Вас раздражает? Набили, взяли сумму, стерли если уж на то пошло, зато все слагаемые на экране, если и это сложно, ну тогда калькулятор Вам в помощь как тут верно заметили)
Всегда удивляюсь бухгалтерам, которые на калькуляторе как на пианино долбят. Мне больших усилий в подшефном колхозе стоило расчетчицу на Ексель подсадить, а первое время она вообще его калькулятором проверяла)) Результат - сэкономленные рабочие дни, чесслово
Я десяток чисел на калькуляторе несколько раз сложу и разный результат умудряюсь получить))

[andrey_k]

Присоединяюсь к ДЫСЫпы: бывает, когда есть несколько исходных чисел, но для дальнейшего учета нужна их сумма - записываю их в нужной ячейке как в калькуляторе (В+П-Г и т.п.), и никаких проблем. При этом результат есть, но при необходимости можно и проверить, как он получен. Все остальные варианты для такой мелочи, имхо, только от наличия неограниченного свободного времени (или, наоборот, ради демонстрации своей очень сильной занятости).

[nnnata]

Цитата: Сообщение от ДЫСЫпы Чем же он Вас раздражает? Набили, взяли сумму, стерли если уж на то пошло, зато все слагаемые на экране, если и это сложно, ну тогда калькулятор Вам в помощь как тут верно заметили)

это я сама аналогию с калькулятором в первом сообщении упомянула, жаль, что ее подхватили тоб не упоминала.
значит по сути вопроса имеем только одну идею:
"VBA. Я Вам даже наводку дам, х=А1+х, осталось только обвес из условий добавить"
т.е. мне нужно понять что означает "обвес из условий" и я смору решить свою проблему, правильно поняла?

[ДЫСЫпы]

Цитата: Сообщение от nnnata правильно поняла?

Да...

[nnnata]

Цитата: Сообщение от andrey_k Присоединяюсь к ДЫСЫпы: бывает, когда есть несколько исходных чисел, но для дальнейшего учета нужна их сумма - записываю их в нужной ячейке как в калькуляторе (В+П-Г и т.п.), и никаких проблем. При этом результат есть, но при необходимости можно и проверить, как он получен. Все остальные варианты для такой мелочи, имхо, только от наличия неограниченного свободного времени (или, наоборот, ради демонстрации своей очень сильной занятости).

этот вариант не подходит у меня уже около 600 слагаемых и увеличиваться это число будет не ограничено.
насчет мотивов вы промахнулись

[ДЫСЫпы]

Цитата: Сообщение от nnnata у меня уже около 600 слагаемых и увеличиваться это число будет не ограничено.

Ну и какой смысл в "калькуляторе"? Вы все равно же эти данные вбиваете, в чем проблема хранить колонки из этих чисел?

[andrey_k]

Цитата: Сообщение от nnnata этот вариант не подходит у меня уже около 600 слагаемых и увеличиваться это число будет не ограничено. насчет мотивов вы промахнулись

тогда, видимо, лучше не идти "влобовую" изучать VBA, а продумать Вашу задачу: что за числа Вы получаете, какой нужен результат, нужно ли хранить исходные числа, результат вычислений и т.п.
Если у Вас задача - получать каждый день по одному числу и прибавлять его к уже имеющейся сумме ранее полученных чисел, тогда, возможно, лучшим будет решение: таблица в три столбца - в первом - дата, во втором - полученные в это день числа (если несколько, записываем их в одну ячейку через сложение (=25+852), третий - сумма накопительная (предыдущая строка этого же столбца + столбец 2 этой же строки). И пусть будет 600 чисел - у меня в похожих таблицах по 3-5 тысяч строк за год получается. Места на жестком диске Вы так не сэкономите - его по определению избыточно для описанных задач, но избавитесь от бумажных записей.

[nnnata]

Цитата: Сообщение от ДЫСЫпы Ну и какой смысл в "калькуляторе"? Вы все равно же эти данные вбиваете, в чем проблема хранить колонки из этих чисел?

раздражает
ну слава богу я ж не на форуме "Психологический форум", так что на этом можем не акцентироваться
главное, задачку с суммой разрешить.

[ДЫСЫпы]

Цитата: Сообщение от nnnata раздражает

А возвращать курсор после каждого ввода в A1, Вас раздражать не будет? И это 600 раз, убиться можно))

Добавлено через 3 минуты

Цитата: Сообщение от nnnata главное, задачку с суммой разрешить.

Держите

Dim x

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
x = 0
ActiveSheet.Range("A2") = x
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$A$2" Then
x = x + ActiveSheet.Range("A1")
ActiveSheet.Range("A2") = x
End If
End Sub

и удачи в нелегком труде))

[nnnata]

еще раз большое спасибо всем откликнувшимся. особенно г-ну ДЫСЫпы.
пошла разбираться, что означает та красота, которую он мне написал, не зря же еще 2 выходных впереди

[ДЫСЫпы]

Цитата: Сообщение от nnnata пошла разбираться,

Лучше бы Вы советам вняли))
Ну раз уж на то пошло, допишите еще ActiveSheet.Range("A1").Select в SelectionChange, что бы курсор возвращался