-Поиск по дневнику

Поиск сообщений в rss_sql_ru_access_programming

 -Подписка по e-mail

 

 -Постоянные читатели

 -Статистика

Статистика LiveInternet.ru: показано количество хитов и посетителей
Создан: 16.03.2006
Записей:
Комментариев:
Написано: 4


Условное форматирование из данных другой таблицы

Понедельник, 18 Сентября 2017 г. 14:00 + в цитатник
Приветствую,

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

например: в ленточной форме есть записи по полю (ID)
1267
4562
3876
1112

В другой таблице есть записи 4562 и 1112. Соответственно, нужно чтоб в ленточной форме поле ID изменило цвет.

Добавлял на ленточную форму вспомогательное поле(lstID), и условным форматированием по полю (ID) ссылался на него, но поле меняет цвет только в одной записи.

Возможно как-то организовать эту задачу программно?
Private Sub Form_Load()
 
        Dim rs As ADODB.Recordset
        Dim sql As String
        Dim i As Integer
        Dim str As String
       
        
   ' Выбор данных для сравнения
        sql = "SELECT tbl_Current_Diagnos.ID_Tehniks " & _
                "FROM tbl_Current_Diagnos " & _
                "WHERE tbl_Current_Diagnos.Status =False"

        
        Set rs = New ADODB.Recordset
            rs.Open sql, CurrentProject.Connection, adOpenKeyset, adLockOptimistic
            If rs.RecordCount <> 0 Then
                rs.MoveLast
                i = rs.RecordCount
                ' Цикл нужен
                Debug.Print rs.Fields(0)
                rs.MoveFirst
                rs.Close
                Set rs = Nothing
     

          
        End Sub

http://www.sql.ru/forum/1271796/uslovnoe-formatirovanie-iz-dannyh-drugoy-tablicy


 

Добавить комментарий:
Текст комментария: смайлики

Проверка орфографии: (найти ошибки)

Прикрепить картинку:

 Переводить URL в ссылку
 Подписаться на комментарии
 Подписать картинку