Bom dia
De uma forma simples o pretendido será.
Ter uma tabela como a abaixo representada.
Depois através de algo similar ao procv, ele irá atribuir as regras.
Dim Formul is string
Dim Objeto is string
Dim Regra is string
Dim Estado is string
Aplica o procv à tabela ao objeto txt_487 e recolhe os seguintes dados
Formul = frm_456
Objeto = txt_487
Regra = Visible
Estado = True
Ficaria totalmente dinâmico.
IF txt_487 = "True" then
Formul.Objeto.Regra = Estado
else
Formul.Objeto.Regra = False
End If
Assim de uma forma simples, seria possível atribuir regras a todos os objetos presentes nos formulários.
Isto é possível em termos de VBA de forma simples?
De uma forma simples o pretendido será.
Ter uma tabela como a abaixo representada.
Depois através de algo similar ao procv, ele irá atribuir as regras.
Dim Formul is string
Dim Objeto is string
Dim Regra is string
Dim Estado is string
Aplica o procv à tabela ao objeto txt_487 e recolhe os seguintes dados
Formul = frm_456
Objeto = txt_487
Regra = Visible
Estado = True
Ficaria totalmente dinâmico.
IF txt_487 = "True" then
Formul.Objeto.Regra = Estado
else
Formul.Objeto.Regra = False
End If
Assim de uma forma simples, seria possível atribuir regras a todos os objetos presentes nos formulários.
Isto é possível em termos de VBA de forma simples?