Создание отчета Эксель

Apple2155 · Регистрация: 03.10.2013

Студворк — интернет-сервис помощи студентам

Здравствуйте...

Нужно создать отчет про колличество записей по определенным записям...

есть таблица, например

Q29.1	Q30.6	aaa
Q29.1	Q30.6	sss
Q29.1	Q33.3	ddd
Q30.6	Q29.1	fff

И есть справочник с этими "Q"

нужно что бы вывод в эксель был такой:

Q00.0	0
Q00.1	0
...
Q29.1	2
...
Q30.6	3
...
Q33.3	1

пользуюсь ADOConnection, ADODadaset, Datasource и DBGrid, и SQL Server 2008

Помогите пожалуйста

@Waddonator · 20.11.2013, 11:27

Apple2155, 1.Сначала создаете ДатаСет в таком виде, который вы показали:

SQL
1
2
3
4
5
SELECT Field1, SUM(c) AS s FROM (
  SELECT Field1, COUNT(Field1) AS c FROM Table1 GROUP BY Field1
  UNION ALL SELECT Field2, COUNT(Field2) FROM Table1 GROUP BY Field2
  UNION ALL SELECT [Название Q], 0 FROM [Справочник])
GROUP BY Field1

Этим запросом Вы объединяете 3 подзапроса:
а) все Q c количеством из первого поля
б) все Q с количеством из второго поля
в) все Q с нулем из справочника
2. Экспортируете в Эксель Экспорт таблиц Access в Excel через Delphi

Apple2155 · 20.11.2013, 14:35 **[ТС]**

Спасибо, буду с этим работать )

Добавлено через 2 часа 47 минут
а S и C , Это что ?

@Waddonator · 20.11.2013, 14:38

Сообщение от Apple2155

а S и C , Это что ?

Просто Alias - названия для столбцов, полученных в ходе вычислений.

Apple2155 · 20.11.2013, 14:48 **[ТС]**

ну я написал так, но он жалуется на группировку, а если ее убираю, то на основные скобки

SQL
1
2
3
4
  SELECT kod, SUM(c) AS s FROM (
  SELECT VPR_DS_1, COUNT(VPR_DS_1) AS c FROM vpr_main GROUP BY VPR_DS_1
  UNION ALL SELECT VPR_DS_2, COUNT(VPR_DS_2) FROM vpr_main GROUP BY VPR_DS_2
  UNION ALL SELECT kod, 0 FROM vpr_mkb ) GROUP BY kod

1) Сообщение 156, уровень 15, состояние 1, строка 4
Неправильный синтаксис около ключевого слова "GROUP".

2) Сообщение 102, уровень 15, состояние 1, строка 4
Неправильный синтаксис около конструкции ")".

Добавлено через 1 минуту
если что в справочнике нужный столбец называется KOD, в основной VPR_DS_1, VPR_DS_2, VPR_DS_3 и VPR_DS_4

@Waddonator · 20.11.2013, 14:52

Так попробуйте:

SQL
1
2
3
4
SELECT VPR_DS_1, SUM(c) AS s FROM (
SELECT VPR_DS_1, COUNT(VPR_DS_1) AS c FROM vpr_main GROUP BY VPR_DS_1
UNION ALL SELECT VPR_DS_2, COUNT(VPR_DS_2) FROM vpr_main GROUP BY VPR_DS_2
UNION ALL SELECT kod, 0 FROM vpr_mkb ) GROUP BY VPR_DS_1

Apple2155 · 20.11.2013, 14:59 **[ТС]**

Тоже самое.

@FIL · 20.11.2013, 15:34

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

Apple2155 · 20.11.2013, 16:56 **[ТС]**

Спасибо большое, я уже разобрался, все работает.. написал так:

SQL
1
2
3
4
5
6
7
SELECT DISTINCT s.kod, 
      (SELECT COUNT(*) FROM vpr_main m WHERE (m.pol='1' AND (isnull(m.vpr_ds_1,''))=s.kod OR (isnull(m.vpr_ds_2,''))=s.kod OR (isnull(m.vpr_ds_3,''))=s.kod) OR (isnull(m.vpr_ds_4,''))=s.kod) AS boy,
      (SELECT COUNT(*) FROM vpr_main m WHERE (m.pol='2' AND (isnull(m.vpr_ds_1,''))=s.kod OR (isnull(m.vpr_ds_2,''))=s.kod OR (isnull(m.vpr_ds_3,''))=s.kod) OR (isnull(m.vpr_ds_4,''))=s.kod) AS girl,
      (SELECT COUNT(*) FROM vpr_main m WHERE (m.pol='4' AND (isnull(m.vpr_ds_1,''))=s.kod OR (isnull(m.vpr_ds_2,''))=s.kod OR (isnull(m.vpr_ds_3,''))=s.kod) OR (isnull(m.vpr_ds_4,''))=s.kod) AS NoName,
      (SELECT COUNT(*) FROM vpr_main m WHERE (m.pol='3' AND (isnull(m.vpr_ds_1,''))=s.kod OR (isnull(m.vpr_ds_2,''))=s.kod OR (isnull(m.vpr_ds_3,''))=s.kod) OR (isnull(m.vpr_ds_4,''))=s.kod) AS Intersex
FROM vpr_mkb s
ORDER BY s.kod

все работает

Добавлено через 8 минут
С разделением по полу

Новые блоги и статьи Все статьи Все блоги /
делаю науч статью по влиянию грибов на сукцессию anaschu 13.03.2026 прикрепляю статью	SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++ 8Observer8 10.03.2026 Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:	Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .	Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .	Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .	Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование 8Observer8 05.03.2026 Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .	SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .

Apple2155 0 / 0 / 0 Регистрация: 03.10.2013 Сообщений: 26
	20.11.2013, 14:35 [ТС]
	Спасибо, буду с этим работать ) Добавлено через 2 часа 47 минут а S и C , Это что ? 0

Apple2155 0 / 0 / 0 Регистрация: 03.10.2013 Сообщений: 26
	20.11.2013, 14:59 [ТС]
	Тоже самое. 0

@FIL Модератор 3492 / 2614 / 742 Регистрация: 19.09.2012 Сообщений: 7,977
	20.11.2013, 15:34
	Если выложишь базу, будет проще разобраться, а так можно долго гадать. 0