Rambler's Top100
Форум: MS ACCESSVBVBA MS OfficeMS SQL server
Новые сообщения: 0000

Форум: MS ACCESS

Вопросы связанные с MS ACCESS

Обновить визитку
Участники «Online»
Все участники

 
 

Доброго времени суток, Посетитель!

вид форума:
Линейный форум Структурный форум

тема: вертикальный разворот в заголовках сводной формы
 
 автор: ludmil   (07.08.2009 в 23:36)   личное сообщение
 
 

не зная как это сделать в access 2003 делаю экспорn в excel и там макросом все разворачивается. Можно ли напрямую это сделать

  Ответить  
 
 автор: snipe   (08.08.2009 в 06:58)   личное сообщение
 
 

а можно спросить .....
как организована выгрузка в Excel......
дело в том что это можно сделать несколькими способами (я пользуюсь двумя по ситуации это через создание отчета или же через VBA)....
если все таки через VBA то тут все просто .....пишете макрос в Excel копируете его в Акс не много модифицируете (добавляете в переди команд переменную ну например если создавали в Аксе переменную dfg а в макросе Excel написано select.cells(1,1) то должно в аксе получиться dfg.select.cells(1,1)) и еще посмотрите подключена ли в Аксе библиотека Excel (редактор VBA Tools->References)

  Ответить  
 
 автор: ShadowOfSun   (08.08.2009 в 20:31)   личное сообщение
 
 

Через перекрестный запрос
у меня это сделано так

TRANSFORM Sum(qwrInterimKPISecond_1.Pallet) AS [Sum-Pallet]
SELECT qwrInterimKPISecond.Date
FROM qwrInterimKPISecond INNER JOIN qwrInterimKPISecond AS qwrInterimKPISecond_1 ON qwrInterimKPISecond.Group = qwrInterimKPISecond_1.Group
WHERE (((qwrInterimKPISecond.Date)>Date()-260) AND ((IIf([qwrInterimKPISecond_1]![Date]<=[qwrInterimKPISecond]![Date],True,False))=True))
GROUP BY qwrInterimKPISecond.Date
ORDER BY qwrInterimKPISecond.Date
PIVOT qwrInterimKPISecond.Group;

?? а зачем Exel нужен?

  Ответить  
HiProg.com - Технологии программирования
Rambler's Top100 TopList