VBA в Access

[таня]

мне нужно сбелать в Access то есть в VBA программ чтобы открывал пользователь форму где сразу высвечивались в опреленном каталаги файлы *.dbf (чтоба пользователь не выбирал сам расширение) то есть по умолчанию для редоктирование и сохранить по нажатию кнопки в файл *.dbf Я идиот! Убейте меня, кто-нибудь!
помагите пожалуйста как это можно сделать? отправить можно по адресу: chtn@omskpost.ru
зарание спасибо!!!!

[Valery_II]

Стоп! Если у тебя прога в Access-е, то логично и таблицы иметь там же. Либо иметь ссылки на таблицы, что почти что то же самое (ну разве что структуру таблиц не будешь менять). В обоих случаях можно просто получить список что таблиц, что отчетов и т.д. Ты можешь присоединить даже листы Excel-а как таблицу. Ссылку на таблицу делаешь Файл/Внешние данные/Ссылка на таблицу... Твое условие об ограничении пользователя в выборе будет соблюдено, т.к. только от тебя зависит куда его пустить.
Например заполнение списка имеющимися названиями отчетов:

For i = 0 To CurrentProject.AllReports.Count - 1
' если список непустой, то добавляем в конец разделитель элементов
If List.RowSource <> "" Then List.RowSource = List.RowSource & ";"
' добавляем элемент списка - название отчета под номером i
List.RowSource = List.RowSource & CurrentProject.AllReports(i).Name
Next i

Или для дерева (что конечно, зрительно красивее):
...
Dim nodX As Node
...
' ввод родителя для все группы отчетов. Пункт необязателен
Set nodX = Tree.Nodes.Add(, , "Отчеты", "Отчеты")
' делает дерево раскрытым
nodX.Expanded = True
' собственно заполнение дерева
For i = 0 To CurrentProject.AllReports.Count - 1
Set nodX = Tree.Nodes.Add("Отчеты", 4, CurrentProject.AllReports(i).Name, CurrentProject.AllReports(i).Name)
Next i

Пимер рабочий и взят из действующего приложения. Я небольшой спец. и возможно мое решение неэлегантно, но работает.