Не получается обратиться к "комбинированный" в vba:

Me.Комбинированная15.Value 'ошибка

http://www.sql.ru/forum/1218092/obrashhenie-k-combobox-vba

Всем привет, имеется такой вопрос. Надо в access в форме в комбинированный, он же combobox в excel, добавить текст, однако в excel справлялся с помощью строчки vba, а тут не знаю. Читал, что нужно написать процедуру, а потом..., а потом куда её прописать не знаю.Может кто-то знает, как с помощью vba записать данные в "комбинированный"
код в экселе:

Combobox1.AddItem "TEXT"

http://www.sql.ru/forum/1217997/kombinirovannyy-combobox

Есть таблица с пациентами в которой есть поля:
-Фамилия
-Имя
-Отчество
-Дата приема
-Дата выписки

Нужно чтобы текстовое из формы искало по всем полям всевозможные комбинации.
Например, ввожу в поле: "Иван Иванович 02.15.2015" и получаю нужную строку в нижней части. Или ввожу 02.15.2015 и получаю всех поступивших и выписавшихся за дату 02.15.2015.

Сейчас это сделано через макрос и работает только по вводу только имени, только фамилии, только отчества и например если написать в поле "фамилию имя" то поиск покажется пустой результат

Что можно сделать чтобы доработать?

Тестовая база, форма q_filter

http://www.sql.ru/forum/1217926/polnotekstovyy-poisk-v-tablice-iz-polya-2010-ms-access

Господа, есть вопрос, можно ли организовать фильтрацию данных в форме (с помощью выпадающего списка) с помощью параметрического запроса без применения макросов или VBA?

http://www.sql.ru/forum/1217915/filtraciya-s-pomoshhu-parametricheskogo-zaprosa

имею бд с таблицами. на печать выводится таблица с реквизитами, два вида, можно выбрать. но мне не нужен ни один из них. как удалить эти реквизиты? в редакторе просто удаляю эти поля - не работает вся бд. подскажите, пожалуйста
http://keep4u.ru/image/SaqNz
http://keep4u.ru/image/SaqN7
http://keep4u.ru/image/SaqNF

http://www.sql.ru/forum/1217885/redaktirovanie-bd

Добрый вечер!
У меня есть вот такой код:

Option Compare Database
Option Explicit
Private WithEvents cbb1 As Office.CommandBarButton
Private WithEvents cbb2 As Office.CommandBarButton
Private WithEvents cbb3 As Office.CommandBarButton
Private cb As Office.CommandBar
Private Sub Form_Close()
Set cbb1 = Nothing
Set cbb2 = Nothing
Set cbb3 = Nothing
cb.Delete
Set cb = Nothing
   End Sub
Private Sub Form_Open(Cancel As Integer)
Set cb = Application.CommandBars.Add("CONTEXTMENU" & Me.Hwnd, 5, , True)
Set cbb1 = cb.Controls.Add(1, , , , True)
    cbb1.Caption = "Строка1"
    cbb1.FaceId = 423
Set cbb2 = cb.Controls.Add(1, , , , True)
    cbb2.Caption = "Строка2"
    cbb2.FaceId = 420
Set cbb3 = cb.Controls.Add(1, , , , True)
    cbb3.Caption = "Строка3"
    cbb3.FaceId = 430
Список12.ShortcutMenuBar = cb.Name
End Sub

Этот код для Список12.
Всё замечательно.

Как мне сделать второе контекстное меню для Список 13 (другое. На пример Строка10, Строка11, Строка12...)
Спасибо!

http://www.sql.ru/forum/1217833/kak-mne-sdelat-2-kontekstnoe-menu

Здравствуйте! Хочу с помощью VBA открыть двойным кликом из формы "История" форму "История_план" с условием отбора по полю "КодР" (Код репликации). Помогите написать вба код, пожалуйста.

http://www.sql.ru/forum/1217653/kak-mozhno-otkryt-formu-s-usloviem-otbora

Поомгите пожалуйста разобраться!
Есть форма ввода контрактов. на нее пользователь вносит данные нажимает добавить. данные добавляются и им присваивается порядковыый номер. а дальше он может внести доп.контракт к этому контракту. Он нажимает на форме контрактов внести "доп контракт" и открывается другая форма.

на форме контракт у меян нет порядкового номера. иначе он будет не так заносить данные в базу. я делаю через :

[src]rs.AddNew
rs!nomer_kontr = Me!nomer_kontr
rs!preds = Me!preds
rs!dataKs = Me!dataKs
rs!summa_s = Me!summa_s
rs!regN = Me!regN
rs.Update
rs.Close

[/SRC]

Я их соединила через regN (номер региональный) то есть когда открывается форма допконтракт то там появляется этот номер. это просто.
а мне нужно чтоб появлялся номер по порядку. и как это сделать запросом вывести его из той базы? Вобщем чтобы порядковй номер из таблицы котнрактов присоединился к номеру допконтрактов таблицы допконтракты. чтобы потом я их могла отобрать сколько доп котрактов у этого контракта. по условию можно чтобы порядковый номер например равнялся региональному или еще как.

НАдеюсь на помощь) Спасибо.

http://www.sql.ru/forum/1217557/vyvod-poryadkovogo-nomera-iz-bazy-sql

Добрый день.
При открытии формы не срабатывает запрос, указанный в источнике записей формы (в условии отбора - ссылка на поле формы), записи не отбираются. При открытии самого запроса отбор работает корректно..
Помогите, пожалуйста, понять, в чём ошибка?

Текст запроса:

SELECT tblOrders.number, tblOrders.ord_date, tblOrders.rec_date, tblOrders.call, tblOrders.Time,
  tblOrders.interval, tblOrders.pay, tblOrders.folder, tblOrders.status
FROM tblOrders INNER JOIN tblOrdPhones ON tblOrders.id = tblOrdPhones.order
WHERE ((tblOrdPhones.phone)  Like "*" & [Forms]![frmOrders]![f] & "*")
GROUP BY tblOrders.number, tblOrders.ord_date, tblOrders.rec_date, tblOrders.call, tblOrders.Time,
  tblOrders.interval, tblOrders.pay, tblOrders.folder, tblOrders.status;

Like "*" & [Forms]![frmOrders]![f] & "*"

- значение из поля f не берётся (

http://www.sql.ru/forum/1217542/ne-rabotaet-zapros-v-recordsource-formy-a2010

Есть таблица «вход» нужно превратить ее в табличку «выход». Дорогие форумчане, помогите с кодом VBA чтобы, заполнить диапазон строк названием улицы из верхней строки, до строки с другой улицей, и т.д. Таблицы здоровущие, в 5-7 тысяч строк. Очень прошу.

http://www.sql.ru/forum/1217512/bratya-pomogite-a-to-ya-spyachu

Здравствуйте! Знаю что элементарная задачка, но никак не могу вспомнить как делается. Имеются 2 файла в xlsx.
Задача: необх-мо сравнить по полю СНИЛС в файлах Книга1(10 строк) и Книга2 (5строк) и вывести СНИЛСы которых нет в Книге2. Файлы прикреплены Книги.zip. Очень буду признателен если будет пример mdb. Спасибо.

http://www.sql.ru/forum/1217511/neobhodimo-sravnit-v-access-2013-dve-fayla

Есть классы - Класс1 и Класс2
Класс1 внутри себя создаёт 3 объекта Класса2
Из Класса1 в Класс2 передаются ссылки на поля ввода (поля для отбора записей в списке) и отслеживаются события в этих полях

Вот я вошёл в поле ввода, нажал букву А, появилось событие Change в Классе2, как мне сообщить "родительскому" Классу1 об этом событии?
Отслеживать события в Классе1 получается очень накладно - там не только Change отслеживается.

И вообще задумка такая - в Классе2 отслеживаются все события и выполняется всякая унифицированная мелочёвка, а в родительском Классе1 формируется строка "WHERE ..." изменяется запрос и обновляется список с этим запросом

В общем, суть вопроса - Класс1 породил несколько объектов Класса2, как сообщить в Класс1 о возникшем событии в объектах Класса2?

Зачем нужно мудрить с классами?
В реальности полей будет не 3, и таких форм с поиском будет не одна, вот и есть мысль перенести эти отслеживания событий в класс, чтобы писать по 2-3 строчки, а не по 150 строк, в каждой форме.

http://www.sql.ru/forum/1217494/vopros-pro-rabotu-s-klassami

Друзья, есть задачка
Есть динамичный справочник Excel - Access
Есть ли возможность через Access добавлять этот справочник запросом в БД SQL Server?

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

http://www.sql.ru/forum/1217458/insert-into-from-access-to-ms-sql-server

Добрый день, подскажите как можно открыть файл по нажатию кнопки вставленный в таблицу в поле объекта Ole.
Варианты через выпадающий список и гиперссылки не подходит.

http://www.sql.ru/forum/1217426/fayl

Коллеги, добрый день!

Помогите пожалуйста со следующим вопросом:

Как в access организовать поиск пересечений столбца и строки?

Есть таблица. в ней есть несколько тысяч строк с наименованиями товаров, веса и объема.

В другой табличке по вертикали - вес, по горизонтали - объем, внутри - цена.

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

Спасибо!

http://www.sql.ru/forum/1217411/index-i-match-zamena-v-access

Здравствуйте.
У меня есть две таблицы-представления "Товары в заказе" (qdfDetailedGoods.) и "Услуги в заказе" (qdfDetailedServices). Поля в них одинаковые, и есть одно объединяющее поле "Код заказа" (OrderIDCalc). Мне надо объединить эти две таблицы по полям, чтобы на выходе получилось как на рисунке 1.
Написала запрос:
SELECT qdfDetailedGoods.Component, qdfDetailedGoods.ComponentSize, qdfDetailedGoods.Quantity, qdfDetailedServices.Component, qdfDetailedServices.ComponentSize, qdfDetailedServices.Quantity FROM qdfDetailedGoods INNER JOIN qdfDetailedServices ON qdfDetailedServices.OrderIDCalc = qdfDetailedGoods.OrderIDCalc WHERE qdfDetailedServices.OrderIDCalc = 2 AND qdfDetailedGoods.OrderIDCalc = 2
но получается какая-то ерунда, в первую часть таблицы, та которая с товарами попадают записи дублируясь столько раз сколько записей во второй таблице которая с услугами. И то же самое со второй частью таблицы.

http://www.sql.ru/forum/1217343/pomogite-obedenit-dve-tablicy

Доброе время суток!

Есть excel-ий файл. Там присутствуют несколько листов с данными. Есть подключение ODBC, который запускает SQL-запрос к этим листам, и выводит результат на отдельный лист.

Пытаюсь в запросе использовать временную таблицу, так как запрос сложный, присутствуют вложенности, join и union. Пишу запрос с использованием INTO. Такая функция вроде должна работать в Microsoft Access SQL/Queries.

Вот простой пример.

SELECT * INTO TEMP FROM `Лист1$`

Запускаю. Выдает сообщение об ошибке "[Microsoft][Драйвер ODBC Excel] Обновление не возможно". База данных или объект доступны только для чтения". Если разрешить доступ к базе данных, в данном случае к листу, то логически как временную таблицу можно поместить на лист, если там находятся исходные данные?

Если написать такой запрос

WITH TEMP AS (SELECT * FROM `Лист1$`)
SELECT * FROM TEMP

то выдает сообщение об ошибке. "[Microsoft][Драйвер ODBC Excel] Ошибочная инструкция SQL; предполагалось 'DELETE', 'INSERT', 'PROCEDURE', 'SELECT' или 'UPDATE'". Похоже WITH для сохранения промежуточного результата запроса в Microsoft Access SQL/Queries не поддерживается.

Что не так делаю? Как здесь правильно создать временную таблицу?

http://www.sql.ru/forum/1217333/vremennaya-tablica

Уважаемые форумчане!
Помогите пожалуйста дописать код
В прикрепленном архиве 2 файла как есть сейчас и как должно быть
Это выгруженная темповая таблица из акса.
Таблицу заполняю вот таким кодом

Dim db As Object, strSQL As String, name_P As String, name_VR As String, SQLins As String
Dim rs As DAO.Recordset, f_date As String, rs_TMP As DAO.Recordset, R As String, P As String
Set db = CurrentDb
 db.Execute ("DELETE * from tmp_BUD_ROSP")
If IsNull(Me.F_data) Then MsgBox "Незадана дата формирования сметы", vbCritical, "Мудуль формирования отчетов: Ошибка!": Exit Sub
f_date = Format(Me.F_data, "MM\/DD\/YYYY")

strSQL = "SELECT Sum(dbo_R_R.SUMM_1Q) AS [SUMM_Q], dbo_K_LSR.CVD_MF, dbo_K_LSR.CPR, dbo_K_LSR.CCS_FULL, dbo_K_LSR.CVR, dbo_K_LSR.CDEP, dbo_K_CS.NCS" & _
" FROM (dbo_R_R INNER JOIN dbo_K_LSR ON dbo_R_R.K_LSRID = dbo_K_LSR.K_LSRID) INNER JOIN dbo_K_CS ON dbo_K_LSR.K_CSID = dbo_K_CS.K_CSID" & _
" WHERE  dbo_R_R.DU  < #" & f_date & "#" & _
" GROUP BY dbo_K_LSR.CVD_MF, dbo_K_LSR.CPR, dbo_K_LSR.CCS_FULL, dbo_K_LSR.CVR, dbo_K_LSR.CDEP, dbo_K_CS.NCS" & _
" ORDER BY dbo_K_LSR.CVD_MF, dbo_K_LSR.CPR, dbo_K_LSR.CCS_FULL, dbo_K_LSR.CVR, dbo_K_LSR.CDEP;"

Set rs = db.OpenRecordset(strSQL, dbOpenDynaset, dbSeeChanges)

Set rs_TMP = db.OpenRecordset("SELECT * FROM tmp_BUD_ROSP")
Do While rs.EOF = False
name_P = rs!NCS
name_VR = " (" & DLookup("[NAME_VR]", "tb_VR", "[KOD_VR]='" & rs!CVR & "'") & ")"
R = Left(rs!CPR, 2)
P = Right(rs!CPR, 2)
rs_TMP.AddNew
rs_TMP!name_P = name_P & name_VR
rs_TMP!K_RASP = Trim(rs!CVD_MF)
rs_TMP!KBK_R = Trim(R)
rs_TMP!KBK_P = Trim(P)
rs_TMP!KBK_C = Trim(rs!CCS_FULL)
rs_TMP!KBK_VR = Trim(rs!CVR)
rs_TMP!KBK_F = Trim(rs!CDEP)
rs_TMP!SUMM_R = Trim(rs!SUMM_Q)
rs_TMP.Update
rs.MoveNext
Loop

rs.Close
rs_TMP.Close
Set rs = Nothing
Set rs_TMP = Nothing

End Sub

не могу понять как мне в цикле подсчитывать подитоги
Растолкуйте на примере.

http://www.sql.ru/forum/1217323/pomogite-s-formirovaniem-dannyh

помогите, пожалуйста, разобраться как добавать/скрыть scrollbars по количеству записей (форма подчиненная)?

If Me.RecordsetClone.RecordCount > 10 Then
    Me.ScrollBars = 2
    Else
    Me.ScrollBars = 0 
End If

Это я делаю непосредственно в подчиненной форме, на событие открыть.ВРоде нормально.
Но когда использую на кнопке главной формы, ничего не происходит.
Может что-то посоветуете)

и еще, можно ли поменять цвет ScrollBar&
Спасибо!

http://www.sql.ru/forum/1217303/scrollbar

Как с этим бороться?
если добавить round(3 * 63.03;2) получается 189.089996337891. От этого не легче.
Заказчик проверяет накладные, как мне кажется, даже не на калькуляторе, а на счетах
Как получить 9 копеек?

http://www.sql.ru/forum/1217281/pochemu-v-access-3-63-03-189-089996337891-ne-ponimau