[Resolvido]Como deixar o registro em NEGRITO no modo FOLHA DE DADOS

Funcionou a dica do Good Guy - mas em modo de FOLHA DE DADOS, não funciona.  Temos como adaptar?


Private Sub Form_Current()
Call PorNegrito
End Sub


'Esta é a sua sub-rotina com o looping For Each... Next que percorre todos os campos com a marca(Tag) = -1 e
'deixa em negrito todo o conteúdo do campo
Public Sub PorNegrito()
Dim ctl As Control
Const conVinculado = -1

For Each ctl In Me.Controls '.....(não sei de o Me.Constrols deve ser substituido)
If ctl.Tag = conVinculado Then
Select Case ctl.ControlType 'Tipo de controle
Case acTextBox 'Caso seja caixa de texto. Você pode acrescentar acComboBox(combo)
ctl.FontBold = True
End Select
End If
Next
End Sub

Sim, com a formatação condicional dá certo, é é o que tenho feito até o momento. Agora, imagina o trabalhão de configurar campo por campo, em formulários com muitos campos ...hehehe Casso fosse uma função, eu poderia aplicar a todos os campos de uma vez, e claro usar em vários outros formulários... Valeu prezado Avelino, sempre atencioso em ajudar os amantes de access! Grande abraço!

Amigo, A formatação condicional aceita selecionar TODOS os campos do Formulario e aplicar uma unica regra de formatação condicional para todos.! Nao da trabalho algum.

Clique e segure com o Botão Esquerdo do Mause, e Selecione todos os Campos, depois va la e clique na Formatação Condicional... Coloque a Regra e Pronto.