Как посчитать в таблице / Microsoft Access

ReSQL.ru

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Новые сообщения | Избранное

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как посчитать в таблице

2 сообщений из 2, страница 1 из 1

Как посчитать в таблице

#39386745

kos20

Участник

Сообщения: 531

Рейтинг: 0 / 0

Всем привет.
Что хотелось бы сделать (автоматизировать).
Есть табличка Продажи с полями Код, Дата, Сумма, Разница.
Нужно, чтобы в поле Код = 1, Разница = 0
Код = 2, Разница = Сумма(2 строка) - Сумма(1 строка)
Код = 3, Разница = Сумма(3 строка) - Сумма(2 строка)
... и так далее.

Можно ли сделать так, чтобы разница рассчитывалась при открытии таблицы?

У меня получилось только с перебросом данных:

Код: vbnet

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.

Dim Расчет As Recordset, Склад  As Recordset
    Set Склад = CurrentDb().OpenRecordset("ТСклад")
 i = 0
  Do
  i = i + 1
    Склад.Edit
    If Склад![Код] = 1 Then
       ПредЗн = Склад![Сумм]
       Склад![Разница] = 0
    End If
    
    If Склад![Код] = i + 1 Then
       ТекЗн = Склад![Сумм]
       Склад![Разница] = 0
    End If

    Склад.Update
    Склад.MoveNext

  Loop Until Склад.EOF
  
  Склад.Close

...

Рейтинг:

0 / 0

18.01.2017, 12:21

| Ответить | Цитировать | Написать

Как посчитать в таблице

#39386758

sdku

Участник

Откуда: Краснодар

Сообщения: 7 762

Рейтинг: 0 / 0

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

...

Рейтинг:

0 / 0

18.01.2017, 12:28

| Ответить | Цитировать | Написать

2 сообщений из 2, страница 1 из 1

Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как посчитать в таблице

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=45&gotonew=1&tid=1612798]:	0ms
get settings:	8ms
get forum list:	11ms
check forum access:	3ms
check topic access:	3ms
track hit:	160ms
get topic data:	10ms
get first new msg:	8ms
get forum data:	3ms
get page messages:	40ms
get tp. blocked users:	1ms
others:	9ms

total:	256ms