Amigos Bom Dia!!
Gostaria da ajuda dos colegas na seguinte questão:
De acordo com horário, (>=0 , >=12 e >18) gostaria de vincular as mensagens de informação. Até ai tudo ok. O “problema”, é que gostaria de incluir no código o usuário que abrir o arquivo. Abaixo segue o código, porem não consigo incluir na Msg o usuário. Isso é possível?
Private Sub Workbook_Open()
Dim dHora As Integer

dHora = Hour(Now)

Select Case dHora
Case Is >= 18
sSaudacao = "Por Pavor antes de Iniciar, imprima, o relatório do Banco de Dados"
Case Is >= 12
sSaudacao = "Imprima o Relatório de Fechamento do Turno"
Case Is >= 0
sSaudacao = "Após a Verificação, imprimir o relatório do início do Turno"
End Select

MsgBox sSaudacao & "! Seja bem vindo. Não esqueça de verificar as mensagens de alertas!!!", vbInformation, "Lembretes"

End Sub