Как из VBA создать новую базу Access?

@BiSHOP · Регистрация: 23.06.2008

Author24 — интернет-сервис помощи студентам

1.как из VBA создать новую базу Access?
2. программно выполнить из VBA макрос или модуль Access
Спасибо!!!

@JustAlex · 27.07.2008, 11:14

там же в хелпах все есть:

Visual Basic

Dim wspDefault As Workspace, dbs As Database
    Dim tdf As TableDef, fld1 As Field, fld2 As Field
    Dim idx As Index, fldIndex As Field
 
    Set wspDefault = DBEngine.Workspaces(0)
    ' Создает новую зашифрованную базу данных.
    Set dbs = wspDefault.CreateDatabase('НоваяБД.mdb', _
        dbLangGeneral, dbEncrypt)

а выполнить: смотря где находится твоя процедура....в тойже базе
или в соседней ??

@BiSHOP · 27.07.2008, 12:23 **[ТС]**

процедура находится в соседней базе

@BiSHOP · 27.07.2008, 14:26 **[ТС]**

когда запускаю этот макрос, то отладчик ругается, что элемент не описан (Workspace)

@Влад77 · 15.04.2019, 17:04

Сообщение от JustAlex

Dim tdf As TableDef, fld1 As Field, fld2 As Field
Dim idx As Index, fldIndex As Field

А эти поля не лишние?

@BiSHOP 0 / 0 / 0 Регистрация: 23.06.2008 Сообщений: 36
		1
	Как из VBA создать новую базу Access? 27.07.2008, 00:37. Показов 4184. Ответов 4 Метки нет (Все метки) 1.как из VBA создать новую базу Access? 2. программно выполнить из VBA макрос или модуль Access Спасибо!!! 0

@BiSHOP 0 / 0 / 0 Регистрация: 23.06.2008 Сообщений: 36
	27.07.2008, 12:23 [ТС]	3
	процедура находится в соседней базе 0

@BiSHOP 0 / 0 / 0 Регистрация: 23.06.2008 Сообщений: 36
	27.07.2008, 14:26 [ТС]	4
	когда запускаю этот макрос, то отладчик ругается, что элемент не описан (Workspace) 0

@Влад77 0 / 0 / 0 Регистрация: 11.08.2015 Сообщений: 17
	15.04.2019, 17:04	5
	Сообщение от JustAlex Dim tdf As TableDef, fld1 As Field, fld2 As Field Dim idx As Index, fldIndex As Field А эти поля не лишние? 0

Опции темы