Гость
Войти | Профиль | Очистить
Действия ...
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Еще раз об экспорте документа в Exel / 25 сообщений из 32, страница 1 из 2
  1  все
17.08.2018, 13:01
    #39689448
wladimirrr
wladimirrr
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Еще раз об экспорте документа в Exel
Уважаемые профессионалы, помогите! Просмотрел все по поиску, везде отдельные фрагменты процессы экспорта. Цельной картины не нашел. Я не профессиональный прогер, поэтому, пожалуйста, не закидывайте меня "умными" советами, просто напишите код для этого процесса. Бд и файл Ексель прилагаю. В форме, из которой надо делать вывод, сначала задаем фильтр, заполняем поля для ручного ввода (белый фон), потом нужно выводить в готовый файл Ексель. Готов оказать материальную поддержку).
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.08.2018, 13:02
    #39689450
wladimirrr
wladimirrr
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Еще раз об экспорте документа в Exel
Вторая часть архива
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.08.2018, 13:11
    #39689456
Akina
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Еще раз об экспорте документа в Exel
 
оффтопwladimirrrпожалуйста, не закидывайте меня "умными" советами, просто напишите код для этого процесса.
А прийти помочь зарплату получить не надо?wladimirrrЯ не профессиональный прогерЗначит, становись им.
Или найми. А он уже придёт и нормально спросит, если чего не поймёт.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.08.2018, 13:35
    #39689465
wladimirrr
wladimirrr
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Еще раз об экспорте документа в Exel
Akina
 
оффтопwladimirrrпожалуйста, не закидывайте меня "умными" советами, просто напишите код для этого процесса.
А прийти помочь зарплату получить не надо?wladimirrrЯ не профессиональный прогерЗначит, становись им.
Или найми. А он уже придёт и нормально спросит, если чего не поймёт.

Я же написал русским языком, что готов заплатить. Совсем не понятно?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.08.2018, 13:40
    #39689466
Akina
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Еще раз об экспорте документа в Exel
Так это ... тут технический форум, а не биржа фриланса.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.08.2018, 13:45
    #39689470
wladimirrr
wladimirrr
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Еще раз об экспорте документа в Exel
AkinaТак это ... тут технический форум, а не биржа фриланса.
А почему бы нет?)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.08.2018, 13:46
    #39689472
wladimirrr
wladimirrr
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Еще раз об экспорте документа в Exel
Akina, пример опубликуем, думаю будет интересно многим.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.08.2018, 13:59
    #39689482
sdku
sdku
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Еще раз об экспорте документа в Exel
wladimirrr,
А почитать про TransferSpreadsheet(или вообще экспорт) в сети или на форуме,где имеется море материала по этой теме, религия не позволяет
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.08.2018, 14:09
    #39689490
wladimirrr
wladimirrr
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Еще раз об экспорте документа в Exel
sdku, я потратил 2 дня на поиск, изучение этой темы. В голове каша. Нужна конкретная помощь за вознаграждение. Как то так.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.08.2018, 14:12
    #39689491
Joss
Joss
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Еще раз об экспорте документа в Exel
Посмотрел пример. Всё можно сделать. Просто лень сидеть, расписывать ... " эти данные поместить в эту ячейку, эти данные поместить в эту ячейку...." Простая, но нудная работа.

Не понятно следующее. Раз документ предназначен для печати, то почему его сразу не формируют в отчёт? Зачем экспорт в Excel?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.08.2018, 14:17
    #39689499
wladimirrr
wladimirrr
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Еще раз об экспорте документа в Exel
JossПосмотрел пример. Всё можно сделать. Просто лень сидеть, расписывать ... " эти данные поместить в эту ячейку, эти данные поместить в эту ячейку...." Простая, но нудная работа.

Не понятно следующее. Раз документ предназначен для печати, то почему его сразу не формируют в отчёт? Зачем экспорт в Excel?

Зачем экспорт в Excel, знает только заказчик). Я ему этот вопрос задавал, получил ответ:"надо!")).
Вы можете все ячейки не расписывать, я по аналогии сам сделаю нудную работу. Распишите в одну-две и саму таблицу.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.08.2018, 14:32
    #39689502
982183
982183
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Еще раз об экспорте документа в Exel
JossЗачем экспорт в Excel?
У заказчика много денег, и он ищет способы их потратить.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.08.2018, 14:44
    #39689510
Joss
Joss
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Еще раз об экспорте документа в Exel
Пример выгрузки массива записей начиная с определённой ячейки
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
Dim XL As Object
Dim rs As DAO.Recordset
Dim sql As String


Set XL = CreateObject("excel.application")
XL.Visible = True 'можно потом False
'XL.Workbooks.Open FileName:="C:\БДОНС\ОтраслПрогр2009\ОтраслПрогр.xls"
XL.Workbooks.Open FileName:=strPathFileXLS ' открытие файла шаблона

            sql = "SELECT Wrk_309_04.Идентиф, Wrk_309_04.НаимОКПО, ...  "  ' запрос на выборку

            Set rs = CurrentDb.OpenRecordset(sql) ' открываем рекордсет

            XL.Worksheets(1).Cells(13, 1).CopyFromRecordset rs ' помещаем выборку начиная с 13 строки с 1 столбца

            XL.ActiveWorkbook.SaveAs FileName:=strOutputPath ' путь и имя выходного файла
            XL.ActiveWindow.Close

  rs.Close
  Set rs = Nothing
  
  XL.Quit
  Set XL = Nothing


Вроде вот так. Попробуйте. После выгрузки придётся закрыть программу, а потом открывать заново. В памяти остаётся экземпляр Excel. Как избавиться, не знаю .
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.08.2018, 15:00
    #39689518
Joss
Joss
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Еще раз об экспорте документа в Exel
Заполнение отдельных ячеек листа. Открываешь книгу как в предыдущем случае
Код: vbnet
1.
2.
3.
4.
5.
....
    XL.Worksheets(1).Name = "Расход ..." ' задаёшь имя листа, если надо
    XL.Worksheets(1).Cells(1, 2) = ... ' заносишь значение в ячейку
    XL.Worksheets(1).Cells(8, 2) = ...
....

закрываешь книгу аналогично.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.08.2018, 15:25
    #39689534
wladimirrr
wladimirrr
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Еще раз об экспорте документа в Exel
Joss, спасибо, буду встраивать, потом отпишусь.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.08.2018, 15:52
    #39689552
Joss
Joss
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Еще раз об экспорте документа в Exel
Вдогонку. Есть такой сайт "Лидер Access" - leadersoft.ru Я на нём в своё время очень пасся. Там есть куча примеров, в том числе и заполнение книги Excel - посмотри здесь тут всё что тебе надо.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.08.2018, 16:22
    #39689575
wladimirrr
wladimirrr
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Еще раз об экспорте документа в Exel
Joss, вывод таблицы из запроса в целом получается, но есть ньюансы.
1. Время выходит в формате даты, хотя в шаблоне поставил нужный формат.
2. Поле "Модуль" не корректно выводится
Вот что в запросе
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.08.2018, 16:23
    #39689576
wladimirrr
wladimirrr
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Еще раз об экспорте документа в Exel
wladimirrrJoss, вывод таблицы из запроса в целом получается, но есть ньюансы.
1. Время выходит в формате даты, хотя в шаблоне поставил нужный формат.
2. Поле "Модуль" не корректно выводится
Вот что в запросе

А вот, что в ексель
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.08.2018, 11:22
    #39689742
Joss
Joss
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Еще раз об экспорте документа в Exel
Неправда Ваша. Открыл шаблон, а там во всех ячейках столбца "Время" стоит Общий формат. Исправьте формат в шаблоне Excel, а потом снова выгрузите данные.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.08.2018, 13:28
    #39689763
wladimirrr
wladimirrr
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Еще раз об экспорте документа в Exel
JossНеправда Ваша. Открыл шаблон, а там во всех ячейках столбца "Время" стоит Общий формат. Исправьте формат в шаблоне Excel, а потом снова выгрузите данные.
Да, это было в шаблоне и я естественно исправил. Не помогло, поэтому и написал. Вот новый файл шаблона.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.08.2018, 13:35
    #39689774
wladimirrr
wladimirrr
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Еще раз об экспорте документа в Exel
Joss, и еще, если выводтиь в запрос ЗапросСутВедРасход, выводятся все записи,но если выводить другой запрос с выборкой значений

SELECT Склады.Наименование, СкладРасход.Дата, СкладРасход.Время_прибытия, СкладРасход.Модуль, СкладРасход.Вид_работы, СкладРасход.Вид_расхода, СкладРасход.[Тип _основания], СкладРасход.Основание, Шифры_маневровой_работы.[Станции маневровой работы], Тип_локомотива.Тип_локомотива, Локомотивы.Номер_локомотива, СкладРасход.[№маршрута], СкладПродукты.Наименование, ЗапросОписаниеРасход.Количество, ЗапросОписаниеРасход.Итого, СкладРасход.Топливо_до_набора, СкладРасход.Топливо_после_набора, ЗапросОписаниеРасход.Плотность, СкладРасход.Температура, СкладРасход.Экипировщик, Работники.Фамилия_Имя_Отчество
FROM ((((((ЗапросОписаниеРасход RIGHT JOIN СкладРасход ON ЗапросОписаниеРасход.Код_расхода = СкладРасход.Код_расхода) LEFT JOIN СкладПродукты ON ЗапросОписаниеРасход.Код_продукта = СкладПродукты.Код_продукта) LEFT JOIN Локомотивы ON СкладРасход.Код_локомотива = Локомотивы.Код_локомотива) LEFT JOIN Тип_локомотива ON Локомотивы.Тип_локомотива = Тип_локомотива.Код_типа) LEFT JOIN Склады ON СкладРасход.Код_склада = Склады.Код_склада) LEFT JOIN Работники ON СкладРасход.Получатель = Работники.Код_работника) LEFT JOIN Шифры_маневровой_работы ON СкладРасход.Станция_назначения = Шифры_маневровой_работы.Код_шифра
WHERE (((СкладРасход.Дата)>=[Формы]![СутВедРасход]![ДатаС] And (СкладРасход.Дата)<=[Формы]![СутВедРасход]![ДатаДо]) AND ((СкладРасход.Время_прибытия)>=[Формы]![СутВедРасход]![ВремяС] And (СкладРасход.Время_прибытия)<=[Формы]![СутВедРасход]![ВремяДо]) AND ((СкладПродукты.Наименование)=[Формы]![СутВедРасход]![Наименование]) AND ((Склады.Код_склада)=[Формы]![СутВедРасход]![Склад]));

то не открывает рекордсет.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.08.2018, 15:35
    #39689801
Joss
Joss
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Еще раз об экспорте документа в Exel
Киньте свою базу - посмотрю. Можно на почту в профиле. Можно здесь - больше людей посмотрят.

У Вас неправильно сформирован запрос. Даты принято заключать в #24.07.2018#
Постройте запрос в построителе, а потом посмотрите текст.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.08.2018, 16:30
    #39689809
wladimirrr
wladimirrr
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Еще раз об экспорте документа в Exel
Joss, запрос я переделал (нашел здесь на форуме подсказку), вместо ссылок на поля формы создал публичные функции.

WHERE (((СкладРасход.Дата)>=DataS() And (СкладРасход.Дата)<=DataDo()) AND ((СкладРасход.Время_прибытия)>=VremaS() And (СкладРасход.Время_прибытия)<=VremaDo()) AND ((СкладПродукты.Наименование)=Naimenov()) AND ((Склады.Код_склада)=Sklad()));

Запрос стал выводиться в Ексель.
Проблема с форматом времени при выводе в Ексель пока остается.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.08.2018, 18:19
    #39689816
Joss
Joss
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Еще раз об экспорте документа в Exel
Попробуйте через символьные значения. Преобразуйте время в строку и так попробуйте выгрузить.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.08.2018, 18:24
    #39689817
wladimirrr
wladimirrr
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Еще раз об экспорте документа в Exel
JossПопробуйте через символьные значения. Преобразуйте время в строку и так попробуйте выгрузить.
Если можно, более подробно расскажите, как это делается. Не приходилось делать это(.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
  1  все
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Еще раз об экспорте документа в Exel / 25 сообщений из 32, страница 1 из 2
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 435ms
Закрыть
start [/forum/topic.php?fid=45&mobile=1&tid=1611234]:
 0ms
get settings:
 9ms
get forum list:
 13ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 59ms
get topic data:
 10ms
get forum data:
 2ms
get page messages:
 52ms
get tp. blocked users:
 2ms
others: 282ms
total:  435ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]