OLá, boa tarde a todos! Meu problema é o seguinte, tenho uma textbox num determinado relatório. Apliquei este código para quando este relatório for carregado:
Option Compare Database
Dim nome As String
Dim nis As String
Dim codigo As String
Private Sub Report_Load()
nome = Forms!form1!txtnome
nis = Forms!form1!txtnis
codigo = Forms!form1!txtcodigo
Me.txtprincipal = "Eu, " & nome & ", inscrita no NIS de nº " & nis & " e residente no Código Familiar " _
& codigo & ", autorizo efetuar a exclusão do(s) componente(s) a seguir do meu cadastro no sistema do Cadastro Ùnico " _
& "do Governo Federal e concordo que serei responsável pelas consequências deste ato."
Me.txtprincipal.TextAlign = 4
End Sub
Como vcs poderam perceber, eu defini o alinhamento do texto da textbox como "Distribuir". Embora de fato o texto fique de forma distribuida(justificada), a última linha sempre fica com muitos espaços entre as palavras e as letras, deixando uma estética horrível para o texto, vejam na foto que deixei anexada. Desta forma queria saber se tem como alinhar todo o texto de forma distribuida(justificada), sendo que a última linha do texto o alinhamento seja pra esquerda. Infelizmente ainda não consegui encontrar uma solução pra isso, encontrei uma função no vba MsoParagraphAlignment, mas não sei como usá-la. Desde ja agradeço a todos!
Option Compare Database
Dim nome As String
Dim nis As String
Dim codigo As String
Private Sub Report_Load()
nome = Forms!form1!txtnome
nis = Forms!form1!txtnis
codigo = Forms!form1!txtcodigo
Me.txtprincipal = "Eu, " & nome & ", inscrita no NIS de nº " & nis & " e residente no Código Familiar " _
& codigo & ", autorizo efetuar a exclusão do(s) componente(s) a seguir do meu cadastro no sistema do Cadastro Ùnico " _
& "do Governo Federal e concordo que serei responsável pelas consequências deste ato."
Me.txtprincipal.TextAlign = 4
End Sub
Como vcs poderam perceber, eu defini o alinhamento do texto da textbox como "Distribuir". Embora de fato o texto fique de forma distribuida(justificada), a última linha sempre fica com muitos espaços entre as palavras e as letras, deixando uma estética horrível para o texto, vejam na foto que deixei anexada. Desta forma queria saber se tem como alinhar todo o texto de forma distribuida(justificada), sendo que a última linha do texto o alinhamento seja pra esquerda. Infelizmente ainda não consegui encontrar uma solução pra isso, encontrei uma função no vba MsoParagraphAlignment, mas não sei como usá-la. Desde ja agradeço a todos!