Форум программистов, компьютерный форум, киберфорум
Наши страницы
VBA
Войти
Регистрация
Восстановить пароль
 
pooli
2 / 2 / 0
Регистрация: 31.01.2010
Сообщений: 71
#1

Формула для вычисления суммы чисел в строке

26.03.2011, 03:10. Просмотров 1494. Ответов 0
Метки нет (Все метки)

Сломал всю башку
в ячейки из flexgrid собираются значения
причем неизвестно какое количество их будет(столбцов,колонок)

так вот по окончанию заполнения в следующей ячейке должна вывестись сумма предыдущих.
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
 For c = 0 To ocxGrid.Cols - 1 'брать количество колонок начиная с нулевой
   
   For r = 2 To ocxGrid.Rows - 1 'брать количество строк начиная со второй
           
           xx = ocxGrid.TextMatrix(r, c) 'часы и выходы
     
     nSheet.Cells(r + 6, c + 3).Value = xx 'заполняем в excel
      
              
                  If CLng(Format(ocxStartDate.Value + c - 1, "w", vbMonday)) > 5 Then 'красим выходные
                  nSheet.Cells(r + 6, c + 3).Interior.Color = RGB(153, 255, 153)
                  End If
              
          
      
      If xx = "X" Then 'заменяем на цифру
     nSheet.Cells(r + 6, c + 3).Value = "1"
     nSheet.Cells(r + 6, c + 3).ColumnWidth = 2.45
      End If
     
     'сумма выходов
    '??????????????????????
    
 nSheet.Cells(r + 6, c + 4).Formula = "=SUM(" & nSheet.Cells(r + 6, c + 3) & ")" 'НЕ РАБОТАЕТ!
   
 'НУЖНА СУММА ячеек в r+6 строке ************** nSheet.Cells(r + 6, c + 3)
        
    Next r
 Next c
Добавлено через 28 минут
сработала такая формула
Visual Basic
1
nSheet.Cells(r + 6, c + 4).Formula = "=SUM(" & nSheet.Cells(r + 6, c + 3).Address & ":" & nSheet.Cells(r + 6, c - 2).Address & ")"
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
26.03.2011, 03:10
Ответы с готовыми решениями:

Формула для подсчета суммы по трем критериям
Помогите создать формулу для подсчета ссуммы по трем критериям! Пробовал...

Функция вычисления суммы положительных чисел
Помогите плз составить функцию VBA с именем Fun9_1, которая в заданном...

Функция вычисления суммы четных чисел диапазона
Помогите составить функцию VBA с именем Fun9_1, которая в заданном диапазоне...

программа вычисления суммы первых N целых положительных чисел
Разработайте алгоритм и программу вычисления суммы первых N целых положительных...

Процедуры и функции: Составить программу вычисления суммы факториалов всех четных чисел от m до n.
Составить программу вычисления суммы факториалов всех четных чисел от m до n....

0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
26.03.2011, 03:10

Программа для вычисления суммы
Программа для вычисления суммы S=1+(1*3)/(1+3)+(1*3*5)/(1+3+5)+... Количество...

Функция пользователя для вычисления суммы ряда
Создать функцию пользователя для вычисления суммы ряда F(N). При следующей...

Написать макрос-функцию для вычисления суммы косинусов
Есть идеи как написать такую функцию для вычисления косинуса ? cos (x) + cos...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru