Форум программистов, компьютерный форум, киберфорум
Microsoft Access
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.57/7: Рейтинг темы: голосов - 7, средняя оценка - 4.57
0 / 0 / 0
Регистрация: 03.10.2014
Сообщений: 139
1

Выгрузка всех данных строки таблицы Access в файл Excel

03.09.2016, 10:49. Просмотров 1470. Ответов 2
Метки нет (Все метки)


Приветствую!
Подскажите пожалуйста как сделать:
Есть форма для заведения информации.
Нужна кнопка, нажав которую все данные строки таблицы соответствующие текущему ключевому полю экспортировались в файл Excell с пути сохранения и именем файла = "поле1+поле2", н-р "Фамилия Имя".
Спасибо!!!
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
03.09.2016, 10:49
Ответы с готовыми решениями:

Выгрузка данных из таблицы MS Access в MS excel
Добрый день , форумчане. Столкнулся с такой проблемой - имеется база данных, в ней несколько...

Выгрузка данных из таблицы Access в тестовой файл
Добрый вечер. Работаю с делфи недавно есть такая задача надо выгрузить данные по sql запросу из...

Выгрузка данных из Access в Excel
Здравствуйте форумчане! Подскажите в Access есть возможность выгрузить данные в Excel, как у меня в...

Выгрузка в Excel данных, хранящихся в таблицах Access
День добрый, есть задача организовать выгрузку данных хранящихся в таблицах Access в Excel. Я решил...

2
Эксперт MS Access
26609 / 14308 / 3166
Регистрация: 28.04.2012
Сообщений: 15,690
03.09.2016, 12:44 2
Лучший ответ Сообщение было отмечено farmat как решение

Решение

Не все ясно в ТЗ. Например какой источник формы - таблица, сохраненный запрос? Или что-то иное? Форма простая, ленточная? Есть ли подформа? Неизвестна версия екселя.
Но предположим форма ленточная или простая, источник таблица или сохраненный запрос. Без подформы с данными. И ексель 12 (*.xlsx). Попробуйте функцию
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
'В Excel вывести текущую запись из активной формы
Sub ToExcelActiveRecord(nameKeyField, nameTable, path, ParamArray fld())
'nameKeyField - имя ключевого поля
'nameTable - имя таблицы/запроса источника формы
'path - путь сохранения файла
'в массиве fld() имена полей служащих названием выходного файла
    Dim nf, keyValue, s, f, i
    nf = Screen.ActiveForm.Name   'Имя активной формы
    keyValue = Forms(nf).Controls(nameKeyField) 'значение ключевого поля
    s = "select * from [" & nameTable & "] " _
    & " where [" & nameKeyField & "]='" & keyValue & "'"
    CurrentDb.QueryDefs("Temp").SQL = s 'формирование запроса Temp для вывода
    
    For i = 0 To UBound(fld)  'цикл генерации имени файла
        f = f & Forms(nf).Controls(fld(i))
    Next
    
    'Вывод в Excel
    DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel12Xml, "Temp", _
    path & Chr(92) & f & ".xlsx", True
End Sub
Пример обращения
Visual Basic
1
ToExcelActiveRecord "ИмяКлючевогоПоля", "ИмяТаблицыЗапросаИсточника", "c:\МояПапка", "ПолеФамилии", "ПолеИмени"
1
0 / 0 / 0
Регистрация: 03.10.2014
Сообщений: 139
03.09.2016, 19:17  [ТС] 3
СПАСИБО!
В вс попробую.
Вы правы: источник данных - таблица, форма простая, подформы нет. Excell 2010.
По вашему способу должно все работать ) отпишусь.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
03.09.2016, 19:17

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь или здесь.

Выгрузка данных из таблицы Paradox в Excel
Здравствуйте, помогите пожалуйста, есть таблица Paradox - Посещаемость. В неё по кнопке добавляются...

Выгрузка данных из таблицы в текстовой файл
Данный макрос работает, но как всегда есть НО 1. как сделать так, чтобы при значении в поле "E"...

Выгрузка данных из таблицы SQL в log файл
Ребят, подскажите пожалуйста: как данные из таблицы sql записывать в Log файл при каждом их...

Выгрузка данных из таблицы в XML файл по схеме
Доброго времени суток.  Друзья, помогите с решением... имеется таблица в БД Access с данными и...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.