[Resolvido]Nome do usuário logado

Boa tarde,

Preciso de colocar num relatório o usuário logado e não consigo.
Nos formulários criei uma label a que dei o nome de "lblNomeUtil" e utilizo o seguinte código "Ao carregar":

Me.lblNomeUtil.Caption = "" & varNomeUtilizadorLog

mas no relatórios não está a dar...

Cumprimentos

coloque a informação em uma caixa de texto simples


me.suacaixadetexto = varNomeUtilizadorLog

Boa tarde,

Desculpe a ignorância mas aonde coloco esse código?

Cumprimentos

insira uma caixa de texto em qualquer parte do seu relatorio, de preferencia, no cabeçalho. agora, no evento "ao carregar" do seu relatorio, coloque a seguinte expressão: me.suacaixadetexto.value = varNomeUtilizadorLog.
veja se carrega.

Bom dia,

Continua a não funcionar.
Eu carrego no botão imprimir e imprime directamente para a impressora mas com o campo de usuário logado em branco.
O botão "imprimir" tem duas funções: imprime e grava o pdf do documento numa pasta.

O código que utilizo para imprimir:

Private Sub BtnTerapImprimir_Click()

On Error Resume Next

Dim strDocName As String
Dim strFilter As String
Dim strArquivo As String
Dim strLocal As String


If MsgBox("Imprimir registo actual?", vbQuestion + vbYesNo, "IMPRIMIR") = vbYes Then
strDocName = "REL_GTRAT"
FiltroRelatorioUtente = Me.TxtTerapID
DoCmd.OpenReport strDocName, , , FiltroRelatorioUtente, acViewPreview

strArquivo = "\" & Form_FRM_TERAPEUTICA.TxtTerapNome & "\" & "GUIA_TRATAMENTO " & Format(Now, "ddmmyyyy") & ".pdf"
strLocal = CurrentProject.Path & "\PROCESSOS" & strArquivo
DoCmd.OutputTo acOutputReport, "REL_GTRAT", acFormatPDF, strLocal
DoCmd.OutputTo acOutputReport, "REL_GTRAT", acFormatPDF, "C:\Users\hmconpneumoenf\Desktop\marcos\PASTA_01\CRTHM_0.0.5\PROCESSOS" & strArquivo

End If


End Sub

Cumprimentos

Bom dia,

Estive a fazer alguns testes e descobri que alterando a linha de código:

DoCmd.OpenReport strDocName, , , FiltroRelatorioUtente, acViewPreview

por:

DoCmd.OpenReport strDocName, acViewPreview, FiltroRelatorioUtente, , acWindowNormal

Já aparece uma previsão do REL_TRAT o usuário logado mas não imprime.

Quando o programa estiver pronto até pode aparecer a previsão do REL_TRAT mas como posso imprimir?

Cumprimentos

poste uma parte do seu bd com o que precisa

Bom dia,

Penso ter resolvido o problema de impressão.
Depois da linha de comando:
DoCmd.OpenReport strDocName, acViewPreview, FiltroRelatorioUtente, , acWindowNormal
introduzi o seguinte comando:
DoCmd.PrintOut
e isso fez com imprimisse o relatório, mas como ele ficava aberto em fundo depois de gravar o ficheiro:
strArquivo = "\" & Form_FRM_TERAPEUTICA.TxtTerapNome & "\" & "GUIA_TRATAMENTO " & Format(Now, "ddmmyyyy") & ".pdf"
strLocal = CurrentProject.Path & "\PROCESSOS" & strArquivo
DoCmd.OutputTo acOutputReport, "REL_GTRAT", acFormatPDF, strLocal
DoCmd.OutputTo acOutputReport, "REL_GTRAT", acFormatPDF, "C:\Users\xxxxxx\CRTHM_0.0.5\PROCESSOS\" & strArquivo
introduzi o seguinte comando:
DoCmd.Close acReport, "REL_GTRAT"
e isso faz com que seja salvo o relatório em pdf e grave numa pasta e depois fecha o relatório aberto em fundo.

Vou testar e depois se não houver problema ponho como "resolvido".

Desde já os meus agradecimentos pelos contributos dados

cantu, como ficou?

Aguardamos...

Desculpem o atraso na resposta.
Está a funcionar conforme o esperado.
Os meus agradecimentos a todos aqueles que se interessaram pela minha dúvida.
Cumprimentos