Здравствуйте добрые люди!
Подскажите как создать несколько копий одного отчета
По образу нескольких копий одной формы не получилось.
Спасибо за подсказку

http://www.sql.ru/forum/1088673/neskolko-kopiy-odnogo-otcheta

Добрый день!
Подскажите, пожалуйста, по такому вопросу:
я создал форму в MS Access, добавил на нее textbox, затем создал запрос такого плана SELECT 10 AS studval;
Затем попытался связать этот запрос и текстбокс следующим образом:
Зашел в Properties -> Data -> Control Source этого текстбокса и выбрал там свой запрос, но мне постоянно выдает ошибку #Name?. Как мне это исправить? Или может есть другие пути, как связать кастомный SQL запрос с контролом на форме?

http://www.sql.ru/forum/1088647/kak-svyazat-textbox-na-forme-s-proizvolnym-sql-zaprosom

Здравствуйте!
Есть Главный отчет, а в нем - Подчиненный. Подчиненный отчет может занимать несколько страниц.
Не получается сделать колонтитулы (заголовки столбцов) так, чтобы они повторялись на каждой странице.
Можно ли такое сделать и если можно - то как?

http://www.sql.ru/forum/1088646/verhnie-kolontituly-v-podchinennom-otchete

Доброго времени суток, господа.
Пытаюсь бороться с проблемой скроллинга большого текстового поля Varchar(max) в формочке. Интересует не прокрутка записей формы, а именно скроллинг поля. Есть некий код, но он, кажется, старый и нерабочий... Кто поможет? Может кто знает, как это побороть?
Вот сам код:

Dim BlockRecordChange As Boolean
Dim CurrRecord As Integer

Private Sub Form_Current()
   If BlockRecordChange Then
    DoCmd.GoToRecord acActiveDataObject, , acGoTo, CurrRecord
    BlockRecordChange = False
  End If
End Sub

Private Sub Form_MouseWheel(ByVal Page As Boolean, ByVal Count As Long)
    CurrRecord = Me.CurrentRecord
    BlockRecordChange = True
End Sub

http://www.sql.ru/forum/1088631/prokrutka-tekstovogo-polya-kolesikom-myshi

Встала достаточно сложная и объёмная задача. Сейчас выбираю средства реализации оной. Думаю, как сделать, чем сделать.
Суть вот в чём:
Имеется 5 разных документов в которых повторяются некоторые данные (Номер, ФИО и т.п.; не суть). И всё приходится делать руками - вносить изменения в каждый из 5 документов, создавать новые. А сели меняется форма, то нужно всё исправлять. Ужас!

Вот я и подумал, что было бы не плохо создать базу данных. И чтобы значения из базы автоматически вставлялись в нужные места в документах, сохранялись под определённым именем. Но возникло очень много проблем.

Вообще такое реально? Дайте советы какие-нибудь, пожалуйста!

http://www.sql.ru/forum/1088624/vozmozhnosti-access-2013

Прошу прощения за повтор, но сформулирую проблему заново и полнее:
Имею код на кнопке:

Private Sub Кнопка12_Click()
On Error GoTo er1
Set obj = GetObject("D:\List.xlsx")
obj.Application.Visible = True
obj.Parent.Windows(1).Visible = True
Exit Sub
er1:
MsgBox "Нет Файла!"
End Sub 

Надо, чтобы открываемый excel-овский файлик выскакивал поверх всех окон и просил обновить все связи в файле как если бы он был открыт просто из винды. Под "связями" имеется ввиду обновление связей, которые excel берет из другого файла excel. Просто если открывать Excel из Access, он почему-то не выдает это окно с запросом на обновление связей!

http://www.sql.ru/forum/1088606/otkryt-knigu-excel-iz-access-i-obnovit-svyazi

Есть код VBA на кнопке:

Private Sub Кнопка12_Click()
Set obj = GetObject("D:\List.xlsx")
obj.Application.Visible = True
obj.Parent.Windows(1).Visible = True
End Sub

При нажатии на кнопку, открывается файлик Excel. Если данного файла по указанному пути нет, он выдает "Run time error 432". Я, конечно, жму на End и понимаю, что файлика тут D:\List.xlsx нет. Но конечный пользователь не поймет и будет "ворчать". Вопрос, как мне дополнить свой код, чтобы вообще отключить окно с ошибкой. И второй вариант: как сделать, чтобы выписывалась ошибка с моим текстом? Например: "Файла не существует по указанному пути"

http://www.sql.ru/forum/1088603/oshibki-vba

Здравствуйте!
У меня вопрос. Разложу по полочкам.
Есть форма "Main_form"(Pic01) с выпадающим списком значений "ПолеСоСписком10".
Эти значения можно добавлять в форме "Frukti" (Pic02). Нажимая на кнопу "изменить элементы списка" у поля "ПолеСоСписком10" или же по запросу(Pic03), когда вводимый элемент отсутствует в списке, у меня появляется форма "Frukti" для добавления новых записей в список. И все бы хорошо, только я хочу, чтобы форма "Frukti" открывалась сразу на новую запись в этих двух случаях!!! когда нужно добавить или изменить запись. Нужен VBA....

P.S. Формочка сделана на скорую руку, для примера, на рабочей форме все сложнее, там по двойному клику по полю открывается форма именно с тем значением, которое введено в соответствующую запись основной формы. Потому я хочу добавить в VBA код, который позволил бы только при изменении и добавлении записей открывать форму и переходить сразу на новую запись.

http://www.sql.ru/forum/1088593/perehod-k-novoy-zapisi-v-forme-access-s-usloviem

Как подключиться с клиента MS Access 2010 на Windows к базе данных PostgreSQL, установленной на Linux ?!
Где взять драйвера ?! Какие драйвера ?! Как их установить ?!
У кого есть опыт работы в такой конфигурации ?!

http://www.sql.ru/forum/1088581/postgresql-on-linux-ms-access-client-on-windows

Прошу помочь. Наверняка мой вопрос - это банальный вопрос новичка..

Sub module1()
Dim query1 As String
Dim db As DAO.Database
Dim res1 As DAO.Recordset
Dim qdf1 As DAO.QueryDef
Dim order_id As String 

query1 = "SELECT order_id, date, client_id FROM orders"

Set db = CurrentDb()
Set qdf1 = db.CreateQueryDef("", query1)
Set res1 = qdf1.OpenRecordset(dbOpenDynaset, dbReadOnly)

Do While Not res1.EOF
    order_id = Nz(res1.Fields("order_id"))
    'здесь будут ещё sql-запросы для получения информации из доп.таблиц
    MsgBox (order_id)
    res1.MoveNext
Loop


End Sub

Сейчас при помощи MsgBox я просто могу убедиться, что sql-запрос действительно выполнился и я получил результат.
Как вывести результат в виде таблицы? Той же самой таблицы, которая отображается, когда нажимаешь F11 и слева в списке таблиц щёлкаешь по какой-нибудь таблице и видишь список всех записей таблицы.

http://www.sql.ru/forum/1088537/kak-vyvesti-rezultat-sql-zaprosa-iz-vba-vyvesti-v-vide-tablicy

Здравствуйте, уважаемые форумчане.
Нужна ваша помощь.
В базе есть 2 таблицы и есть ещё 2 прилинкованные аналогичные первым двум.

Запрос

SELECT T_Scans_Linked.id AS SL_ID, T_Scans_Linked.id_work AS SL_IW, T_Scans_Linked.Content AS SL_Content, T_Scans.id AS S_ID, T_Scans.id_work AS S_IW, T_Scans.Content AS S_Content
FROM (T_ID_Works INNER JOIN T_Scans ON T_ID_Works.id = T_Scans.id_work) INNER JOIN 
        (T_ID_Works_Linked INNER JOIN T_Scans_Linked ON T_ID_Works_Linked.id = T_Scans_Linked.id_work) ON 
         T_ID_Works.Work_Code = T_ID_Works_Linked.Work_Code;

возвращает то, что на первой таблице, а мне нужно получить то, что на второй.
Какой запрос нужно написать для этого?
Сразу оговорюсь, что сравнивать по Content нельзя и T_Scans.id не обязательно равен T_Scans_Linked.id.

http://www.sql.ru/forum/1088519/sopostavlenie-dannyh-s-chetyryoh-tablic

Всем доброго дня!
Странная ситуация... При добавлении записи в подчиненную форму появляется ошибка:

Данные добавленные в базу данных не будут отображены в форме, т.к. они противоречат условиям на базовый источник записей.

Это происходит в Access 2002 (adp) & MS SQL 2008 SR2!

Если подключить программу к той же базе, но в MS SQL 2000 SR4 - то все нормально, ошибки нет , записи добавляются!
Не могу сообразить, в чем проблема. Если кто знает = буду благодарен за помощь.
Спасибо

http://www.sql.ru/forum/1088475/oshibka-dobavleniya-zapisi-v-ms-sql-2008-sr2-a-v-ms-sql-2000-sr4-net

Здравствуйте уважаемые форумчане.
Очень нужна ваша помощь.

Access 2007.
Есть таблица "Table" с числовым столбцом "Column". Данные в нем в виде цифр "1,2,3,4....".
Есть файл С:\123.dbf.
Нужно присвоить имя расширению файла на основе данных таблицы, полученных при помощи запроса "select max(column) from table". Т.е.файл должен иметь вид с:\123.001 и т.д.

Необходимо это реализовать при помощи VBA.
Т.к. я совсем не силен в VBA, прошу написать мне готовый код.
Заранее благодарен.

http://www.sql.ru/forum/1088436/rasshirenie-fayla-zapros-iz-tablicy

Помогите что-нибудь придумать. Ситуация:
Есть программа, написаная на аксессе, у каждого пользователя она устанавливается на компе. К ней цепляются куча библиотек, список которых постоянно расширяется. Раньше этоту программу ставили на диск C:\project. Но итишники стали против, чтобы пользователи что то писали на диск С и стали запрещать.
Мы съехали в папку AppData, как вы понимаете, у каждого юзера свой путь до нее (например: c:\Documents and Settings\vladimir.CLOVER.005\Application Data\Project). Все бы ничего, но у нас была процедура, которая присоединяет необходимые библиотеки (dllки, ocxы, tlbы)

Public Sub AddLibrary(Name As String)
On Error Resume Next
  Dim strPath As String
  strPath = CurrentProject.path + "\files\libs\" + Name
  References.AddFromFile strPath
End Sub

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

http://www.sql.ru/forum/1088251/dobavlenie-bibliotek-k-aksessu

Привет Всем !
Вот такая задача:
Есть подчиненная табличная форма в которую загружаются значения с Табл 1
Нужно выделить цветом только те строки в которых значение флажка равно true c Табл 2
связь между таблицами полем OrdrerID

http://www.sql.ru/forum/1088246/uslovnoe-formatirovanie

Никак не могу найти поиском.

Нужно в одном месте создать в памяти (не записывая на диск) экземпляр Excel, а потом, из другого места, получить к нему доступ и записать в него кое-что.

Как это можно организовать в акцессе?

http://www.sql.ru/forum/1088213/sozdat-v-pamyati-ekzemplyar-excel-a-potom-poluchit-k-nemu-dostup

Есть база данных, в которой ключевые поля некоторых следующих таблиц состоят из простой подстановки предыдущих ключевых полей.
Например: в таблице "Все работы с БД" ключевое поле "Код работы с БД" представляет собой подстановку из полей "Код БД", "Код работы" и "№ пп". Так вот, пока это выполняется вручную. Нельзя ли сделать так, чтобы это делал сам Access?

http://www.sql.ru/forum/1088206/mozhno-li-sdelat-kluchevoe-pole-sostavnym

Здравствуйте.
Придумал вот такую схему добавления и удаления чисел через запятую в одно поле ввода с помощью чекбоксов:

Private Sub p1_AfterUpdate()
If Me.p1.Value = True Then
    If Len(Me.ots1.Value) > 0 Then
        Me.ots1.Value = Me.ots1.Value & ", 1"
    Else
    Me.ots1.Value = "1"
    End If
Else
    If Len(Me.ots1.Value) < 3 Then
        Me.ots1.Value = Replace(Me.ots1.Value, "1", "")
    Else
        Me.ots1.Value = Replace(Me.ots1.Value, "1, ", "")
        Me.ots1.Value = Replace(Me.ots1.Value, ", 1", "")
    End If
End If
End Sub

Чекбоксов много ... очень много, около 100 штук.
Каждый условно пронумерован и при значении ИСТИНА номер этой галочки заносится в поле ввода.
Все вроде работает, вот только когда заносится к примеру "1, 11, 12" и если я хочу убрать 1, то остается "112". Получается, убирается "1, 11, 12". Помогите найти решение этой проблемы, пожалуйста.
И еще, что неудобно, событие вешается на каждый чекбокс.

http://www.sql.ru/forum/1088203/dobavlenie-chisel-v-pole-vvoda-cherez-zapyatuu

Приветствую всех!
Знаю, что тема избитая, поиском пользовался (весь Хром во вкладках :)), но ответ на свой вопрос так и не нашел. Опишу ситуацию.
Имеется база с таблицами:
tbl1_01, tbl2_01, tbl3_01 и т.д.
tbl1_02, tbl2_02, tbl3_02 и т.д.
tbl1_03, tbl2_03, tbl3_03 и т.д.
и т.д.
Наборы таблиц с разными индексами идентичны.
В интерфейсной базе подключены таблицы tbl1_01, tbl2_01, tbl3_01 и т.д., но имена таблиц заданы как tbl1, tbl2,tbl3 и т.д.
Есть необходимость, при выполнении некоторых условий, переподключать таблицы к набору таблиц с индексом 2, 3 и т.д., сохраняя их имена в интерфейсной базе.
Т.е., при переподключении таблиц нужно указать конкретно, какую таблицу к какой подключить, фактически изменить свойство SourceTableName у подключенной таблицы.
Возможно ли такое вообще?

http://www.sql.ru/forum/1088199/perelinkovka-tablic

Подскажите, как нажатием кнопки на главной форме создать новую запись в подчинённой форме, данные в которой связаны с главной как М:М? Получается, помимо новых записей в главной и подчинённой форме, нужно создать новую запись в связующей таблице и записать туда последние значения?
Проблема ещё в том, что если просто поставить кнопку на подчинённую форму, она не работает - новая запись не появляется

http://www.sql.ru/forum/1088193/novaya-zapis-v-podchinyonnoy-forme-m-m