#excel #vba #ms-access
#excel #vba #ms-access
Вопрос:
Приведенный ниже код экспортирует запросы на 3 разные вкладки, а также изменяет название вкладки, которое o не нужно. Однако я хочу, чтобы все 3 запроса были вставлены на листе 1, и только столбцы из всех запросов отображали вставку на первом листе, пожалуйста, помогите. Я не могу указать имя столбца, которое я хочу экспортировать из каждого запроса… AGP, CBC и qdAGC — это имена запросов.. Помощь Pease Я хочу, чтобы только 2 столбца из каждого запроса были экспортированы на 1 листе, т. Е. лист1
Option Compare Database
Option Explicit
Private Sub Command0_Click()
ExportToExcel
End Sub
Public Sub ExportToExcel()
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "AGP", "C:path.xlsx", True
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "CBC", "C:path.xlsx", True
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "qdAGC", "C:path .xlsx", True
End Sub
Ответ №1:
Создайте запрос ОБЪЕДИНЕНИЯ из ваших базовых запросов, который содержит именно те столбцы и строки, которые вы хотите экспортировать.
Затем DoCmd.TransferSpreadsheet этот запрос ОБЪЕДИНЕНИЯ.
например
SELECT foo AS col1, bar AS col2
FROM AGP
UNION ALL
SELECT floo AS col1, stuff AS col2
FROM CBC
и т.д.
Комментарии:
1. Отлично, я понял!!! Спасибо. Я новичок в Macros / VBA / Access… Однако, не могли бы вы также помочь мне в написании кода, чтобы экспортировать нужные столбцы в коде, который я вставил. Код, который я вставил, экспортирует все данные в Excel, но я хочу только первые 2 столбца из запроса! не могли бы вы, пожалуйста, помочь мне с кодированием, чтобы это действительно помогло мне….
2. Я сделал и также получил результат. Но на выходе также видны другие столбцы, которые я не хочу … другие таблицы также отображаются, которые я не хочу .. только 2 столбца, которые упомянуты в SQL, ВЫБИРАЮТ AGC. Округ, округ Колумбия. [За голоса], * ИЗ ОБЪЕДИНЕНИЯ AGC ALL ВЫБЕРИТЕ CBC. Округ, CBC. [За голоса], * Из CBC