Vba импорт данных из access в access: Метод DoCmd.TransferSpreadsheet (Access) | Microsoft Learn

Метод DoCmd.TransferSpreadsheet (Access) | Microsoft Learn

Twitter




LinkedIn




Facebook




Адрес электронной почты

• 
  Статья
• 
  02/18/2023
• Чтение занимает 2 мин
• 
  

Метод TransferSpreadsheet выполняет действие TransferSpreadsheet в Visual Basic.

Синтаксис

выражение.TransferSpreadsheet (TransferType, SpreadsheetType, TableName, FileName, HasFieldNames, Range, UseOA)

выражение: переменная, представляющая объект DoCmd.

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
TransferType	Необязательный	AcDataTransferType	Нужный тип переноса. Значение по умолчанию — acImport.
SpreadsheetType	Необязательный	AcSpreadSheetType	Тип электронной таблицы для импорта, экспорта или связи.
TableName	Необязательный	Variant	Строковое выражение, являющееся именем таблицы Office Access, предназначенной для импорта данных электронной таблицы, экспорта данных электронной таблицы или связывания данных электронной таблицы, или запрос на выборку Access, результаты которого нужно экспортировать в электронную таблицу.
FileName	Необязательный	Variant	Строковое выражение, являющееся именем и путем электронной таблицы для импорта, экспорта или связывания.
HasFieldNames	Необязательный	Variant	Используйте значение True (1), чтобы использовать первую строку электронной таблицы в качестве имен полей при импорте или связывании. Используйте значение False (0), чтобы считать первую строку электронной таблицы обычными данными. Если оставить этот аргумент пустым, предполагается, что используется значение по умолчанию (False). При экспорте таблицы или данных запроса на выборку Access в электронную таблицу имена полей записываются в первую строку электронной таблицы независимо от введенного значения этого аргумента.
Range	Необязательный	Variant	Строковое выражение, являющееся допустимым диапазоном ячеек или именем диапазона в электронной таблице. Этот аргумент применяется только для импорта. Чтобы импортировать электронную таблицу целиком, оставьте этот аргумент пустым. При экспорте в электронную таблицу необходимо оставить этот аргумент пустым. Если ввести диапазон, экспорт завершится сбоем.
UseOA	Необязательный	Variant	Этот аргумент не поддерживается.

Используйте метод TransferSpreadsheet для импорта или экспорта данных между текущей базой данных Access или проектом Access (ADP) и файлом электронной таблицы. Вы также можете связать данные в электронной таблице Excel с текущей базой данных Access. Это позволит просматривать и изменять данные электронной таблицы с помощью Access, при этом не теряя возможность полного доступа к ним в Excel. Кроме того, вы можете связать данные в файле электронной таблицы Lotus 1-2-3, но они будут доступны в Access только для чтения.

Примечание.

Также можно использовать объекты данных ActiveX (ADO) для создания связи с помощью свойства ActiveConnection для объекта Recordset.

Пример

В следующем примере импортируются данные из указанного диапазона электронной таблицы Lotus Newemps.wk3 в таблицу Employees (Сотрудники) Access. В качестве имен полей используется первая строка электронной таблицы.

DoCmd.TransferSpreadsheet acImport, 3, _ 
 "Employees","C:\Lotus\Newemps.wk3", True, "A1:G12"

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

Макрокоманда ИмпортЭкспортЭлектроннойТаблицы | Microsoft Learn

Twitter




LinkedIn




Facebook




Адрес электронной почты

• 
  Статья
• 
  12/06/2022
• Чтение занимает 4 мин
• 
  

Область применения: Access 2013, Office 2013

Макрокоманду ИмпортЭкспортЭлектроннойТаблицы можно использовать для импорта или экспорта данных между текущей базой данных Access (MDB или ACCDB) или проектом Access (ADP) и файлом электронной таблицы. Вы также можете связать данные в электронной таблице Microsoft Excel с текущей базой данных Microsoft Access. Это позволит просматривать и изменять данные электронной таблицы с помощью Access, при этом не теряя возможность полного доступа к ним в Excel. Кроме того, вы можете связать данные в файле электронной таблицы Lotus 1-2-3, но они будут доступны в Access только для чтения.

Примечание.

Эта макрокоманда доступна только для доверенных баз данных.

Макрокоманда ПреобразоватьЭлектроннуюТаблицу имеет указанные ниже аргументы.

Вы можете экспортировать данные запросов на выборку Access в электронные таблицы. Access экспортирует результирующий набор запроса так же, как таблицу.

Данные электронной таблицы, которые добавляются в существующую таблицу Access, должны соответствовать ее структуре.

• Каждое поле в электронной таблице должно иметь тот же тип данных, что и соответствующее поле в таблице Access.

• Поля должны следовать в том же порядке (за исключением случая, когда для аргумента С именами полей установлено значение Да: в этом случае названия полей в электронной таблице должны совпадать с именами полей в таблице Access).

Вызов данной макрокоманды аналогичен выбору Excel в группе Импорт или Экспорт на вкладке Внешние данные, а также выбору Дополнительно в группе Импорт или Экспорт с последующим щелчком варианта Файл Lotus 1-2-3. Вы можете использовать эти команды, чтобы выбрать источник данных, например базу данных Access или другого типа, электронную таблицу или текстовый файл. Если выбрана электронная таблица, на экране последовательно появляются диалоговые окна или запускается мастер Access, в котором можно указать имя электронной таблицы и другие параметры. Аргументы макрокоманды ИмпортЭкспортЭлектроннойТаблицы отражают параметры, заданные в этих диалоговых окнах или мастерах.

Примечание.

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

При связывании с электронной таблицей Excel, открытой в режиме редактирования, Access будет ждать окончания работы электронной таблицы Excel в этом режиме, чтобы завершить связывание; при этом нет ограничений по времени.

Чтобы выполнить макрокоманду ИмпортЭкспортЭлектроннойТаблицы в модуле Visual Basic для приложений (VBA), используйте метод TransferSpreadsheet объекта DoCmd.

Метод DoCmd.TransferSpreadsheet (Доступ) | Microsoft Узнайте

Редактировать

Твиттер

LinkedIn

Фейсбук

Электронная почта

• Статья
• 22. 01.2022
• 2 минуты на чтение

Метод TransferSpreadsheet выполняет действие TransferSpreadsheet в Visual Basic.

Синтаксис

выражение . Transferspreadsheet ( TransferType , Электронная таблица , TableName , Filename , HasfieldNames , Диапазон , , , , .

Параметры

Имя	Требуется/дополнительно	Тип данных	Описание
TransferType	Дополнительно	AcDataTransferType	Тип перевода, который вы хотите сделать. Значение по умолчанию — acImport .
Электронная таблица	Дополнительно	AcSpreadSheetType	Тип электронной таблицы для импорта, экспорта или ссылки.
Имя таблицы	Дополнительно	Вариант	Строковое выражение, представляющее собой имя таблицы Office Access, в которую вы хотите импортировать данные электронной таблицы, экспортировать данные электронной таблицы или связать данные электронной таблицы, или запрос выбора Access, результаты которого вы хотите экспортировать в электронную таблицу.
Имя файла	Дополнительно	Вариант	Строковое выражение, представляющее собой имя файла и путь к электронной таблице, которую вы хотите импортировать, экспортировать или создать ссылку.
Хасфилднамес	Дополнительно	Вариант	Используйте True (1), чтобы использовать первую строку электронной таблицы в качестве имен полей при импорте или связывании. Используйте False (0), чтобы рассматривать первую строку электронной таблицы как обычные данные. Если оставить этот аргумент пустым, предполагается значение по умолчанию ( False ). Когда вы экспортируете таблицу Access или выбираете данные запроса в электронную таблицу, имена полей вставляются в первую строку электронной таблицы независимо от того, что вы вводите для этого аргумента.
Диапазон	Дополнительно	Вариант	Строковое выражение, представляющее собой допустимый диапазон ячеек или имя диапазона в электронной таблице. Этот аргумент применим только к импорту. Оставьте этот аргумент пустым, чтобы импортировать всю электронную таблицу. При экспорте в электронную таблицу этот аргумент необходимо оставить пустым. Если вы введете диапазон, экспорт завершится ошибкой.
Использование ОА	Дополнительно	Вариант	Этот аргумент не поддерживается.

Используйте метод TransferSpreadsheet для импорта или экспорта данных между текущей базой данных Access или проектом Access (. adp) и файлом электронной таблицы. Вы также можете связать данные в электронной таблице Excel с текущей базой данных Access. С помощью связанной электронной таблицы вы можете просматривать и редактировать данные электронной таблицы с помощью Access, сохраняя при этом полный доступ к данным из вашей программы работы с электронными таблицами Excel. Вы также можете ссылаться на данные в файле электронной таблицы Lotus 1-2-3, но эти данные доступны только для чтения в Access.

Примечание

Вы также можете использовать объекты данных ActiveX (ADO) для создания ссылки, используя свойство ActiveConnection для объекта Recordset .

Пример

В следующем примере данные из указанного диапазона электронной таблицы Lotus Newemps.wk3 импортируются в таблицу Access Employees . Он использует первую строку электронной таблицы в качестве имен полей.

 DoCmd.TransferSpreadsheet acImport, 3, _
 "Сотрудники", "C:\Lotus\Newemps. wk3", True, "A1:G12"
 

Поддержка и отзывы

У вас есть вопросы или отзывы об Office VBA или этой документации? См. раздел Поддержка и отзывы Office VBA, чтобы узнать, как вы можете получить поддержку и оставить отзыв.

Запрос на доступ к Excel — Панели мониторинга Excel VBA

В следующей статье объясняется, как импортировать запрос на доступ в Excel с помощью VBA. Сначала я настрою запрос в базе данных Access и вызову запрос в Excel. Если вы хотите импортировать часть запроса, возможно, стоит изучить импорт запроса с параметрами в Excel, который рассматривается в соответствующей теме. Процедура имеет ряд практических последствий: данные, которые не требуются, такие как объемные исходные данные, могут храниться в базе данных и вызываться при необходимости. Файл Excel работает с небольшими сводными данными и остается компактным. У вас есть возможность периодически обращаться к обновленным данным для обновления наборов данных Excel.
 
Приступая к работе Самое главное, что нужно сделать, это настроить подключение к MS Access.
 
В Excel нажмите Alt F11.
 
Теперь выберите Инструменты — Ссылки

Прокрутите обширный список, пока не найдете Microsoft Office xx.0 Database Engine Object (где xx выше 14.0)

Если вы используете версию ниже 2007, вам нужно обратить внимание сейчас. Для более ранних версий выберите Microsoft DAO XX Object Library. Не выбирайте, так как будет конфликт, и ваш процесс, вероятно, не будет запущен.

Теперь, когда вы подключены к Access, ниже приведено кодирование, которое заставит вашу процедуру работать.

Option Explicit
Sub ImpAccess() ‘Excel VBA для импорта запроса Access.

Dim MyDatabase As DAO.Database
Dim qryDef As DAO.QueryDef
Dim MyRecordset As DAO.Recordset

Set MyDatabase=OpenDatabase(«C:\Test\TestDb.accdb») ‘Имя БД
Set qryDef=MyDatabase.QueryDefs(» qryVanilla») ‘Имя запроса
Set MyRecordset=qryDef. OpenRecordset Sheet1.Range(«A11»).CopyFromRecordset MyRecordset

For i=1 To MyRecordset.Fields.Count ‘Заголовки для возврата

Sheet1.Cells(10, i).Value=MyRecordset.Fields(i — 1).Name

Далее я

Конец сабвуфера

Строки с фиолетовым — это строки, которые необходимо изменить при подключении к собственной базе данных. Приведенный выше пример вернет данные и заголовки. Если бы я выполнял эту процедуру, я бы поместил заголовки в файл, поскольку это было бы то, что вы знаете заранее, что означало бы, что вам не нужно было бы возвращать заголовки обратно.

Я включу файлы Excel и Access. Чтобы увидеть, как они работают вместе, просто сохраните базу данных в каталоге с именем «C:\Test\» и убедитесь, что вы вызываете файл TestDb.accdb. Это более новая версия Access. При необходимости измените расширение файла, чтобы оно соответствовало более старым версиям.

Я также включил файлы, которые работают в формате Access 2000 mdb.