Условное форматирование не сохраняется в БД

@vlanatvaszla · Регистрация: 10.09.2016

Author24 — интернет-сервис помощи студентам

Условное форматирование произвожу кодом vba.
Кусок кода:

Visual Basic

          Dim objFrc As FormatCondition
      If Me.[Act] = "Contains" Then
                Set objFrc = Forms![frmMainForm].Controls![subfrmCandidates].Form.Controls!(Me.[Filed name]).FormatConditions.Add(acExpression, _
                    acEqual, "[" & Me.[Filed name] & "] Like '*" & Me.[Result] & "*'")
            ElseIf Me.[Act] = "Equals" Then
                Set objFrc = Forms![frmMainForm].Controls![subfrmCandidates].Form.Controls!(Me.[Filed name]).FormatConditions.Add(acFieldValue, _
                    acEqual, Me.[Result])
            ElseIf Me.[Act] = "Higher" Then
                Set objFrc = Forms![frmMainForm].Controls![subfrmCandidates].Form.Controls!(Me.[Filed name]).FormatConditions.Add(acFieldValue, _
                    acGreaterThan, Me.[Result])
            ElseIf Me.[Act] = "Lower" Then
                Set objFrc = Forms![frmMainForm].Controls![subfrmCandidates].Form.Controls!(Me.[Filed name]).FormatConditions.Add(acFieldValue, _
                    acLessThan, Me.[Result])
            End If
        End If
        i = Forms![frmMainForm].Controls![subfrmCandidates].Form.Controls!(Me.[Filed name]).FormatConditions.Count
        
        With Forms![frmMainForm].Controls![subfrmCandidates].Form.Controls!(Me.[Filed name]).FormatConditions(i - 1)
            .BackColor = QBColor(Me.[Pick colour].Column(1))
'            .FontBold = True
'            .ForeColor = lngBlack
        End With

После применения кода условное форматирование работает. Но только до конца работы с БД.
Запускаю БД - условного форматирования нет.
С чем это может быть связано?

@ltv_1953 · 15.06.2017, 18:24

Сообщение от vlanatvaszla

С чем это может быть связано?

А форма открыта в режиме конструктора? Насколько я помню, изменения шрифта полей, форматов, ... - сохраняться только если их делать на форме, открытой в режиме конструктора.

@vlanatvaszla · 15.06.2017, 19:03 **[ТС]**

Нет. В конструкторе не открыта. Спасибо за совет.

@ltv_1953 17487 / 7249 / 1651 Регистрация: 21.06.2012 Сообщений: 13,866
	15.06.2017, 18:24	2
	Сообщение от vlanatvaszla С чем это может быть связано? А форма открыта в режиме конструктора? Насколько я помню, изменения шрифта полей, форматов, ... - сохраняться только если их делать на форме, открытой в режиме конструктора. 0

@vlanatvaszla -55 / 4 / 0 Регистрация: 10.09.2016 Сообщений: 371
	15.06.2017, 19:03 [ТС]	3
	Нет. В конструкторе не открыта. Спасибо за совет. 0