Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 05.12.2009, 19:49   #1
zubovds
 
Регистрация: 01.12.2009
Сообщений: 1
Вопрос подобрать формулу ?

нужна формула каждый день менять значения в 1 листе, но что бы во 2 листе все значения за каждый день суммировались
Вложения
Тип файла: rar пример!.rar (6.8 Кб, 19 просмотров)
zubovds вне форума Ответить с цитированием
Старый 05.12.2009, 20:08   #2
EducatedFool
Программист VBA
СуперМодератор
 
Аватар для EducatedFool
 
Регистрация: 13.07.2008
Сообщений: 6,858
По умолчанию

Поскольку исходные данные будут меняться, а на втором листе из надо суммировать, формулы не подойдут.

Нужен макрос:

Код:
Sub ПереносДанных()
    Dim cell As Range, ra As Range: Application.ScreenUpdating = False
    For Each cell In [данные].Cells
        Worksheets(2).Range(cell.Address) = Val(Worksheets(2).Range(cell.Address)) + Val(cell)
    Next cell
End Sub

Sub Очистка()
    [данные].SpecialCells(xlCellTypeConstants).ClearContents
End Sub
Пример файла:

EducatedFool вне форума Ответить с цитированием
Старый 05.12.2009, 20:22   #3
IFRSoff
Заблокирован
 
Регистрация: 23.02.2009
Сообщений: 306
По умолчанию

Мне нравятся наименования первого столбца))
IFRSoff вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Помогите подобрать ноут rim1233218 Компьютерное железо 20 12.11.2008 15:12
Не могу придумать или подобрать формулу! Помогите! Gnom70 Microsoft Office Excel 4 30.01.2008 11:01
помогите подобрать формулу или логическое выражение... Dr.Eric Microsoft Office Excel 7 22.11.2006 06:56