VPF::Вопрос по VBA для Access сумма с накоплением

inter57

Дата 27.3.2008, 11:34 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 3
Регистрация: 27.3.2008

Репутация: нет
Всего: нет

Здравствуйте! В отчетах Access есть функция сумма с накоплением . Можно ли тоже самое сделать в таблице?

Akina

Дата 27.3.2008, 13:47 (ссылка)

(нет голосов)

Загрузка ...

Советчик

Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 30
Всего: 454

Без хранения переопределенных данных и сопутствующей угрозы разрушения целостности данных - нет.

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

О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

inter57

Дата 1.4.2008, 15:32 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 3
Регистрация: 27.3.2008

Репутация: нет
Всего: нет

Извините, я слабо разбираюсь в програмировании, но такая функция у меня была. Еще раз поподробнее: было значение в строках поля 1 2 3 4 5 6 надо получить в этом же поле 1 3 6 10 15 21 и т.д. Спасибо.

Это сообщение отредактировал(а) inter57 - 1.4.2008, 15:33

Akina

Дата 1.4.2008, 17:56 (ссылка)

(нет голосов)

Загрузка ...

Советчик

Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 30
Всего: 454

Цитата(inter57 @ 1.4.2008, 16:32

)

было значение в строках поля 1 2 3 4 5 6

Чем задается именно такой порядок записей? на "так отображается" или "в таком порядке заносили" не кивать - в Аксессе такие утверждения не имеют смысла

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

inter57

Дата 1.4.2008, 18:40 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 3
Регистрация: 27.3.2008

Репутация: нет
Всего: нет

В моем случае таблица создается запросом на создание таблицы. Первое поле Дата по возрастанию, а во втором сумма, которую и надо посчитать с накоплением.

Это сообщение отредактировал(а) inter57 - 1.4.2008, 18:44

Akina

Дата 1.4.2008, 22:57 (ссылка)

(нет голосов)

Загрузка ...

Советчик

Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 30
Всего: 454

То есть сортировка по дате.

Итак. Умножаем таблицу на себя. Делаем отбор по Дата в копии 1 > Дата в копии 2. Группируем по Дата2 и считаем сумму.

Однако это будет подсчет в запросе, а не занесение в таблицу.

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

kapbepucm

Дата 5.4.2008, 18:49 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 993
Регистрация: 14.6.2007
Где: Латвия

Репутация: нет
Всего: 12

Цитата(inter57 @ 1.4.2008, 15:32

)

было значение в строках поля 1 2 3 4 5 6 надо получить в этом же поле 1 3 6 10 15 21

Если есть Table1:

Код

===========
  Field1
-----------
     1
     2
     3
     4
     5
     6
===========

а надо сделать Table2:

Код

===================
  Field1   Field2
-------------------
    1        1
    2        3
    3        6
    4       10
    5       15
    6       21
===================

то, имея функцию

Код

Public Function GetX(X As Long) As Long
  Dim A As Long, I As Long
  A = 0
  For I = 1 To X
    A = A + I
  Next I
  GetX = A
End Function

и написав запрос

Код

SELECT Table1.Field1, GetX([Table1].[Field1]) AS Field2 FROM Table1;

виден результат. Если я правильно понял задание.

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

(С) kapbepucm

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| MS Access \| Следующая тема »