|
5 Кб. |
|
| Имеется таблица с полями Название, Год, Количество
Название Год Количество
Название1 2010 235
Название2 2010 659
Название3 2010 369
Название4 2010 326
Название5 2010 995
Название1 2011 658
Название2 2011 956
Название3 2011 586
Название4 2011 2146
Название5 2011 223
|
нужно сделать чтобы Поле название отображалось по вертикали год по горизонтали а область даных заполняло поле количество. Сделать в форме или отчете.
2010 2011
Название1 235 658
Название2 659 956
Название3 369 586
Название4 326 2146
Название5 995 223
|
Помогите сделать или скажите за какую цену вы ето сделаете. | |
|
| |
|
9 Кб. |
|
| Вот в форме: =>
С вас <Помощь сайту>. | |
|
| |
|
|
|
| Спасибо а можно чтобы при добавлении следующего года от тоже добавлялся в форму. Очень выручите | |
|
| |
|
|
|
| А вы добавлять пробовали? | |
|
| |
|
|
|
|
| Скачайте еще раз пример и попробуйте добавить. | |
|
| |
|
|
|
| Большое спасибо, помощь сайту обязательно | |
|
| |
|
|
|
| А как можно сделать в запросе
2010 2011
Название1 235 658
Название2 659 956
Название3 369 586
Название4 326 214
Название5 995 223
Итог (Сума) (Сума)
|
| |
|
| |
|
|
|
| Кому интересно вот нашел
http://sql.ru/forum/actualthread.aspx?tid=349591&hl=union
Dim rcs As DAO.Recordset
Dim i As Integer
Dim sqlstr As String
sqlstr = "Select * from [перекрестныйзапрос] union all select 'Итого' "
Set rcs = CurrentDb.QueryDefs("перекрестныйзапрос").OpenRecordset
For i = 1 To rcs.Fields.Count - 1
sqlstr = sqlstr & ", SUM(" & rcs.Fields(i).Name & ")"
Next i
sqlstr = sqlstr & " FROM [перекрестныйзапрос]"
Set rcs = Nothing
On Error Resume Next
CurrentDb.CreateQueryDef "temp"
CurrentDb.QueryDefs("temp").SQL = sqlstr
DoCmd.OpenQuery "temp"
CurrentDb.QueryDefs.Delete "temp"
|
| |
|
| |
|
|
|
| некоторые советуют хранить архивные данные в уже обработанном, агрегированном виде.
т.е. не выполнять перекрестный запрос, а сбрасывать предварительно просуммированные данные за предыдущие периоды (т.н. "закрытые" периоды) в архивные таблицы | |
|
| |