Здравствуйте. Есть 2 задачи, которые никак не могу решить.
1. Необходимо при вводе в форму 2х дат создание отчета , в которых бы содержались данные между этими двумя датами. Как я понимаю для этого необходимо создание запроса с 2мя параметрами +связь запроса с формой и отчетом, однако в свойствах запроса получается только ввод одной даты
2. Необходимо осуществить изменение цвета поля в зависимости от значения этого поля. В условном форматировании можно сделать только 3 условия, но в поле примерно 25 значений. для каждого нужен свой цвет. Как я понял, для этого необходимо уже VBA, а я в нем ни бум-бум.Пытаюсь написать чтото вроде

If (name_smi = "значение поля") Then

name_smi.ForeColor = vbYellow

name_smi.BackColor = vbRed

End If
однако она изменяет при нажатии цвета всех полей на последнее.

Подскажите пожалуйства. Заранее спасибо!

А можно поподробнее по поводу SQL запроса? А то теперь она просит меня ввести еще параметры Формы!Form-select date!ДатаС. Как я понимаю, сначала необходимо создать сам запрос, а затем уже форму относительно новой "виртуальной таблицы". на оф сайте просто довольно запутанно написано (http://office.microsoft.com/ru-ru/access/HA100963181049.aspx?pid=CH100645771049)
А по поводу цветов - мне необходимо просто вбить цвета для каждого значения, чтобы в отчете они всего лишь выделялись. Неужели это действительно так сложно сделать на VBA, ведь в условном форматировании это довольно легко...

Я пишу такую строчку в SQL режиме :
WHERE (((alltable.[date_publish]) Between [Forms]![select]![31.05.2007] And [Forms]![select]![31.12.2007]));
Пишет про ошибку в скобках.
2. Цвета должны быть только в отчете, однако при выполнии такого кода, как я написал, она меняет цвет всех полей на один (если процедура Click()), а не относительно значений. т.е .как я понимаю необхидо что то писать между ИмяПоля() и BackColor..

Спасибо, выборку она сделала, ввод в форму работает, и запрос сам выполняется, только отчет выводится по всем датам еще, там также необходимо где то изменить выражение?
А на счет Click() - вообще там по умолчанию Before Update стояла. я просто поменял процедуру когда тестировал...

С датами и отчетом разобрался, большое спасибо.
А процедуру я создавал в Microsoft Office Access Class Objects , т.е. мне эти условия копировать в модуль надо? Не помогло

Значит я скорее всего нетам пишу :(. В конструкторе отчетов я выбираю поле, с которым необходимо провести данное действие, затем правой кнопкой - обработка событий - программа , мне выходит VB, в центре окно Private Sub name_smi_BeforeUpdate(Cancel As Integer) и End Sub, я ввожу между ними свой код, затем Debug -> Compile info1, затем запускаю Run -> Run Sub/User form, выходит окошко , где надо ввести имя Macro Name, я ввожу имя(test) , жму Create, справа где дерево появляется папка "Modules" и модуль Module1 и окно
Sub test()

End Sub
и тут я уже незнаю что делать, если вводить тот же код.:
Select Case name_smi
Case ([name_smi] = "ÐÎÑÁÀËÒ")
name_smi.BackColor = vbRed
Case [name_smi] = "Èçâåñòèÿ"
name_smi.BackColor = vbYellow
End Select
то ругается на name_smi что не найдет проект или библиотека :(

Нашел в сойствах отчета "Форматирование", написал такой код :
if [name_smi]="РОСБАЛТ" then [name_smi].bacлcolor=vbRed(или 55da6r) endif - реакции не заметил :(
Может там должен быть другой синтаксис?

Спасибо огромное! Все теперь понял =)

Видимо не ответят

За программу спасибо, а то приходилось из графического редактора в калькулятор копировать и там конвертировать =). А с цветами шрифтов я как с фоном сделал, спасибо