Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.56/9: Рейтинг темы: голосов - 9, средняя оценка - 4.56
0 / 0 / 0
Регистрация: 12.04.2012
Сообщений: 5

Возможно ли управлять файлом Access только через файл excel

12.04.2012, 10:55. Показов 1888. Ответов 7
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Добрый день, уважаемые!

Я совсем недавно начал изучать VBA и у меня возникли вопросы на которые ответ я найти не могу, прошу вас мне помочь.

1 Вопрос:

Возможно ли управлять файлом Access только через файл excel.(Например: добавление, удаление, изменение данных; создание, удаление таблицы; добавление столбцов(полей) в таблицу)

2 Вопрос:

Возможно ли из excel'я удалить все записи нахадяиеся в таблице Access.

Если, что то из этого возможно, напишите пожалуйста простой пример.
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
12.04.2012, 10:55
Ответы с готовыми решениями:

Работа с Excel файлом через Access 97
Есть база данных primer.mdb с прилинкованной таблицей test.xls Как программно можно добавить/удалить столбцы в таблице test.xls

Возможно ли из Access закрыть файл Excel, который был изменен
Работает программа, которая была обсуждена https://www.cyberforum.ru/ms-access/thread1763968.html (использовался вариант Волшебника). Но...

Редактировать файл Excel через Access
Добрый день. Есть скрипт, который выгружает данные из Access в excel-файл на основе шаблона. После экспорта в конечном файле нужно удалить...

7
 Аватар для mc-black
2786 / 718 / 106
Регистрация: 04.02.2011
Сообщений: 1,443
12.04.2012, 14:42
Да, все это можно.

Для этого подключается библиотека для работы с базами данных, чаще всего Microsoft ActiveX Data Objects 2.8 Library (сокращенно - ADO), либо старую библиотеку DAO, либо декрарируют функции библиотеки ODBC (интерфейс подобный Win API - вызовы по согл. STDCALL). Далее по любой из этих технологий надо указать параметры подключения в специальной строке, называемой ConnectionString. После этого библиотека подключается к базе данных и через язык структурированных запросов SQL можно сделать все указанные Вами операции: выборку, добавление и удаление данных, создание и удаление таблиц и т.д.

Если некоторые манипуляции с объектами Access не удастся осуществить на SQL (что крайне редко происходит), то можно также подключить к проекту объектную модель Access, посредством которой можно манипулировать Access из кода в Excel.
1
Эксперт WindowsАвтор FAQ
 Аватар для Dragokas
18031 / 7734 / 892
Регистрация: 25.12.2011
Сообщений: 11,502
Записей в блоге: 16
12.04.2012, 16:37
Смотрите примеры Gibboustooth
Перенос данных из Excel в Access
1
0 / 0 / 0
Регистрация: 12.04.2012
Сообщений: 5
12.04.2012, 20:54  [ТС]
Спасибо за развернутый ответ и за ссылку. Буду подробно все изучать
0
Александр741
12.05.2012, 13:23
Подскажите пожалуйста как удалять, добавлять Столбцы в таблице через VBA Excel в аксесе
735 / 203 / 11
Регистрация: 23.06.2011
Сообщений: 440
12.05.2012, 14:11
Цитата Сообщение от Александр741 Посмотреть сообщение
Подскажите пожалуйста как удалять, добавлять Столбцы в таблице через VBA Excel в аксесе
Добавление:

SQL
1
ALTER TABLE <Table_Name> ADD COLUMN <Column_Name> <Data_Type>
Например:
SQL
1
ALTER TABLE main ADD COLUMN test_field text(10)
Удаление:

SQL
1
ALTER TABLE <Table_Name> DROP COLUMN <Column_Name>
Например:
SQL
1
ALTER TABLE main DROP COLUMN test_field
Выполнение запросов в Excel делается через oConn.Execute, где oConn - переменная подключения к базе данных.
1
Александр741
12.05.2012, 15:15
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Set db = OpenDatabase(Name:=ThisWorkbook.Path & "\gr.mdb")
  Set rs = db.OpenRecordset("SELECT * FROM [Ozenka] WHERE [o_student] =" + CStr(t) + " and [o_2] =" + CStr(t2) + " and [o_3]=" + CStr(t3) + " and [o_4]=" + CStr(t4) + " and [o_5]=" + CStr(t5) + " and [o_6]=" + CStr(t6) + " and [o_7]=" + CStr(t7) + " and [o_8]=" + CStr(t8) + " and [o_9]=" + CStr(t9) + " and [o_10]=" + CStr(t10))
    kol = rs.RecordCount
    If kol = 0 Then
        rs.AddNew
        rs.Fields("o_student").Value = t
        rs.Fields("o_2").Value = t2
        rs.Fields("o_3").Value = t3
        rs.Fields("o_4").Value = t4
        rs.Fields("o_5").Value = t5
        rs.Fields("o_6").Value = t6
        rs.Fields("o_7").Value = t7
        rs.Fields("o_8").Value = t8
        rs.Fields("o_9").Value = t9
        rs.Fields("o_10").Value = t10
        rs.Update
а что ни-будь наподобие такого же кода можно придумать, а то запрос не получается(

Добавлено через 5 минут
токо этот код для добавления строки, а мне бы для столбца)))
735 / 203 / 11
Регистрация: 23.06.2011
Сообщений: 440
14.05.2012, 09:41
Цитата Сообщение от Александр741 Посмотреть сообщение
токо этот код для добавления строки, а мне бы для столбца)))
Visual Basic
1
2
sSQL="INSERT INTO Ozenka(student, o_2, ....") VALUES(" & t & "," & t2 & "," ...."
db.Execute(sSQL)
Цитата Сообщение от Александр741 Посмотреть сообщение
а что ни-будь наподобие такого же кода можно придумать, а то запрос не получается(
Я вам описал выше, как добавить столбец в таблицу.

Если вам надо поменять значение какого-то столбца в уже существующей строке, то это делается с помощью SQL-запроса UPDATE:
Visual Basic
1
2
sSQL= "UPDATE ozenka SET o_2=" & t2 & ", o_3=" & t3 & ... & " WHERE [o_student] =" & CStr(t)
db.Execute(sSQL)
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
14.05.2012, 09:41
Помогаю со студенческими работами здесь

Возможно ли управлять ноутбуком через wi-fi с телефона без интернэта
Здравствуйте, нужно настроить беспроводное управление компьютером с телефона, либо планшета при отсутствии интернета. Team viever и другие...

Если в Google диске содержатся файл HTML и БД Access, возможно ли будет через интернет просматривать эту БД?
GafarovIS вижу только название темы, нет сообщения

народ, кто-нибудь знает, как из Excel управлять процессами Access
народ, кто-нибудь знает, как из Excel управлять процессами Access нужно всё. т.е. Импорт txt файла в таблицу Access по нажатию кнопки...

Управлять БД SQL Server через Excel 2010
Уважаемые форумчане прошу помочь! Допустим есть БД в SQL Server Management studio, которая называется &quot;МояБазаДанных&quot; в БД...

Работа с Excel-файлом из Access
Добрый день! Возникла задача внесения данных из файла Excel в таблицу Access. На мой взгляд есть два приемлемых варианта: 1. С помощью...


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

Или воспользуйтесь поиском по форуму:
8
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами
8Observer8 20.02.2026
Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .
Конвертировать закладки radiotray-ng в m3u-плейлист
damix 19.02.2026
Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .
Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI
Eddy_Em 18.02.2026
Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru