Função Publica para mudar cor do text

[geraldo pereira]

Boa Noite

Desde já quero agradece a ajuda que me enviaram sobre Nota Promissória e agora estou precisando  de vocês, tenho pouca experiência no assunto e estou estudando vba, e no momento preciso fazer uma função Publica  tenho a função privada porém não consigo transformar ela em publica, é  o sequinte tenho  12 formularios com 23 textbox para usar estee procedimentos Me.Textbox6.BackColor = corEnabledTextBox e Me.Textbox6.BackColor = corDisabledTextBox, desde já agradeço a atenção de quem possa colaborar com o meu aprendizado

 

Grato

Geraldo Pereira

[Alyson Ronnan Martins]

Boa noite @geraldo pereira.

Eu criei um módulo e coloquei um variável publica, depois eu creio uma comando para mudar o valor da variável ou definir.

Public corEnabledTextBox

Public Sub setColorText()
corEnabledTextBox = &HFF&
End Sub

Quando o formulário foi iniciado ele preencheu a variável com a cor do comando

Private Sub UserForm_Initialize()
setColorText
End Sub

E criei um botão para mudar a cor do textbox no formulário (pegando o valor da variável publica)

Private Sub CommandButton1_Click()
TextBox1.BackColor = corEnabledTextBox
End Sub

[geraldo pereira]

Muito obrigado

Deus lhe abençoe

 

deu certinho só fiz a adaptação da cor

valeuuuuuuu!!

[Alyson Ronnan Martins]

Show!