Como Abrir Uma Tela Apenas Logado

Olá, preciso resolver uma aplicação que consiste em um botão de “Entrar” que leva para uma segunda tela. No entanto, essa função só pode ser realizada com algum dos usuários diversos logados.

@amcassis, boa tarde.

Podes realizar a configuração em “Permissão de Usuário”. Veja:

Caso não queira fazer desta forma, pode-se criar um script que verifique qual é o usuário logado na aplicação e, dependendo de qual for este, abra ou não a tela. Veja:

Sub CommandButton1_Click()
If Application.User = "" Then
	MsgBox "Não usuários logados no sistema!"
Else
	If Application.User <> "Usuario1" Then
		MsgBox "Usuário não tem permissão de acesso!"
	Else
		Application.GetFrame("").OpenScreen("Quadro1?4?0"), 0
	End If
End If
End Sub

Sds.

O script atendeu perfeitamente minha aplicação. Muito obrigado.:slight_smile: