ReSQL.ru
     
powered by simpleCommunicator - 2.0.54     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Экспорт на MS Excel
14 сообщений из 14, страница 1 из 1
Экспорт на MS Excel
    #38156834
Abisma2008
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Abisma2008
Гость
Всем доброе утро!
Я хочу создать запрос и экспортировать на MS Excel не получается посмотрите на мой код и скажите пожалуйста в чем моя ошибка!

s = "SELECT Таблица1.[Номер заказ] FROM Таблица1;"
DoCmd.OutputTo acOutputQuery, s, acFormatXLS, "C:\Table.xls"

За ранее спасибо!
...
Рейтинг: 0 / 0
19.02.2013, 09:48
| Ответить | Цитировать | Написать  
Экспорт на MS Excel
    #38156924
qwerty112
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
qwerty112
Гость
Abisma2008Всем доброе утро!
Я хочу создать запрос и экспортировать на MS Excel не получается посмотрите на мой код и скажите пожалуйста в чем моя ошибка!

Код: vbnet
1.
2.
s = "SELECT Таблица1.[Номер заказ] FROM Таблица1;"
DoCmd.OutputTo acOutputQuery, s, acFormatXLS, "C:\Table.xls"



За ранее спасибо!
это (выделил) - обозначает экспорт сохранённого запроса,
но никак не запроса - "строки текста"
...
Рейтинг: 0 / 0
19.02.2013, 10:43
| Ответить | Цитировать | Написать  
Экспорт на MS Excel
    #38157066
Анатолий ( Киев )
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Анатолий ( Киев )
Гость
Код: vbnet
1.
CurrentDB.Execute "SELECT Table1.[Номер заказ] INTO Экспорт IN 'C:\Table.xls'[Excel 8.0;] FROM Table1;"
...
Рейтинг: 0 / 0
19.02.2013, 11:47
| Ответить | Цитировать | Написать  
Экспорт на MS Excel
    #38157175
Abisma2008
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Abisma2008
Гость
Анатолий ( Киев )
Код: vbnet
1.
CurrentDB.Execute "SELECT Table1.[Номер заказ] INTO Экспорт IN 'C:\Table.xls'[Excel 8.0;] FROM Table1;"



Спасибо все получилось!
...
Рейтинг: 0 / 0
19.02.2013, 12:33
| Ответить | Цитировать | Написать  
Период между сообщениями больше года.
Экспорт на MS Excel
    #39256207
Abisma2008
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Abisma2008
Гость
Анатолий ( Киев )
Код: vbnet
1.
CurrentDB.Execute "SELECT Table1.[Номер заказ] INTO Экспорт IN 'C:\Table.xls'[Excel 8.0;] FROM Table1;"


Доброе утро!
Можно ли сделать название файла текущей даты?
Если да, тогда как?
Спасибо!
...
Рейтинг: 0 / 0
15.06.2016, 11:09
| Ответить | Цитировать | Написать  
Экспорт на MS Excel
    #39256294
Анатолий ( Киев )
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Анатолий ( Киев )
Гость
Abisma2008Можно ли сделать название файла текущей даты? Например:
Код: vbnet
1.
2.
3.
4.
sRangeName = "[Экспорт]"
sFileName = Format(Date(), "YYYYMMDD") & ".xls"
sSQL = "SELECT Table1.[Номер заказ] INTO " & sRangeName & " IN 'C:\" & sFileName & "'[Excel 8.0;] FROM Table1;"
CurrentDB.Execute sSQL
...
Рейтинг: 0 / 0
15.06.2016, 12:53
| Ответить | Цитировать | Написать  
Экспорт на MS Excel
    #39256354
Abisma2008
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Abisma2008
Гость
Анатолий ( Киев )Abisma2008Можно ли сделать название файла текущей даты? Например:
Код: vbnet
1.
2.
3.
4.
sRangeName = "[Экспорт]"
sFileName = Format(Date(), "YYYYMMDD") & ".xls"
sSQL = "SELECT Table1.[Номер заказ] INTO " & sRangeName & " IN 'C:\" & sFileName & "'[Excel 8.0;] FROM Table1;"
CurrentDB.Execute sSQL


Спасибо!
...
Рейтинг: 0 / 0
15.06.2016, 14:04
| Ответить | Цитировать | Написать  
Экспорт на MS Excel
    #39345359
Abisma2008
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Abisma2008
Гость
Доброе утро! Анатолий!
Посмотрите пожалуйста мой код. Что ни так?
Ошибка:
"Слишком мало параметром. Требуется 1"
Вот код:
Код: vbnet
1.
CurrentDb.Execute "SELECT Таблица2.[Номер заказ], Таблица2.Количество  INTO Экспорт IN 'D:\" & Format(Date, "dd-mm-yyyy") & " " & Format(Time, "hh-nn-ss") & "'[Excel 8.0;] FROM Таблица2 WHERE (((Таблица2.[Номер заказ])=[Формы]![Форма]![Номер заказ]));"


Базу тоже выложу.
За ранее спасибо!
...
Рейтинг: 0 / 0
11.11.2016, 09:17
| Ответить | Цитировать | Написать  
Экспорт на MS Excel
    #39345384
\\\\
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
\\\\
Гость
Abisma2008...Анатолий!...О как! Тут походу чатик...
Я конечно не Анатолий, но тоже имею что сказать.
Замени в запросе
Код: vbnet
1.
[Формы]![Форма]![Номер заказ]

на готовое значение. Или обрабатывай параметры - FAQ/MS Access/Как запускать запросы из VBA
...
Рейтинг: 0 / 0
11.11.2016, 10:00
| Ответить | Цитировать | Написать  
Экспорт на MS Excel
    #39345391
Abisma2008
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Abisma2008
Гость
\\\\Abisma2008...Анатолий!...О как! Тут походу чатик...
Я конечно не Анатолий, но тоже имею что сказать.
Замени в запросе
Код: vbnet
1.
[Формы]![Форма]![Номер заказ]

на готовое значение. Или обрабатывай параметры - FAQ/MS Access/Как запускать запросы из VBA

Здравствуйте! Конечно Вы можете ответит)
Но то что Вы ответили всё равно не понял(
В моём случи:
Код: vbnet
1.
[Формы]![Форма]![Номер заказ]


То что Вы написали:
Код: vbnet
1.
[Формы]![Форма]![Номер заказ]


Они одинаковые.
На что поменять я таки не понял(((
...
Рейтинг: 0 / 0
11.11.2016, 10:14
| Ответить | Цитировать | Написать  
Экспорт на MS Excel
    #39345410
Анатолий ( Киев )
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Анатолий ( Киев )
Гость
Коллега \\\\ "имел сказать", что ссылка на форму в тексте запроса для метода Execute является параметром. Надо подставлять конкретное значение.
Если "Номер заказ" числовой, то:
"...WHERE (((Таблица2.[Номер заказ])=" & Forms![Форма]![Номер заказ] & "));"
Если текстовый, то:
"...WHERE (((Таблица2.[Номер заказ])= ' " & Forms![Форма]![Номер заказ] & " ' ));"
...
Рейтинг: 0 / 0
11.11.2016, 10:34
| Ответить | Цитировать | Написать  
Экспорт на MS Excel
    #39345425
Abisma2008
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Abisma2008
Гость
Анатолий ( Киев ), \\\\
Спасибо Вам!
Теперь понял. Проблема оказывается в числовой или текстовый...
...
Рейтинг: 0 / 0
11.11.2016, 10:52
| Ответить | Цитировать | Написать  
Экспорт на MS Excel
    #39345434
\\\\
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
\\\\
Гость
Abisma2008, ты же уже 4 года тут. Я даже не подумал, что надо так подробно...
...
Рейтинг: 0 / 0
11.11.2016, 11:06
| Ответить | Цитировать | Написать  
Экспорт на MS Excel
    #39346061
Abisma2008
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Abisma2008
Гость
\\\\,
Да. к сожалению я любитель(
Не постоянно я работаю с Access- ом...
...
Рейтинг: 0 / 0
12.11.2016, 11:41
| Ответить | Цитировать | Написать  
14 сообщений из 14, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Экспорт на MS Excel
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&msg=38157175&tid=1612990]:
 0ms
get settings:
 9ms
get forum list:
 13ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 74ms
get topic data:
 12ms
get forum data:
 2ms
get page messages:
 39ms
get tp. blocked users:
 1ms
others: 13ms
total:  171ms
созд. / загр.: 171ms
x
x
Закрыть


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