Exigir que InputBox seja inserido
Enviado: 23 Set 2017 às 23:31
Boa noite, pessoas!!
Seguinte, tenho essa planilha de conferencia de caixa. Eu preciso que sempre que algum usuário for conferir, a inputbox solicite o nome do usuário. Esse inputbox é criado no evento inicialize do userform. Até aqui foi tudo bem. O problema é que, se o usuário não digitar nada e der ok, ou clicar em "Cancel", o userform carrega.
A pergunta é. Tem como fazer com que o interronpa o carregamento do userform caso o inputbox esteja vazio ou cliquem em "Cancel"? Se sim, tem como inserir uma mensagem informando o motivo de não prosseguir a conferencia?
Segue o codigo
Desde já agradeço pelo suporte!!!
[/size]
Seguinte, tenho essa planilha de conferencia de caixa. Eu preciso que sempre que algum usuário for conferir, a inputbox solicite o nome do usuário. Esse inputbox é criado no evento inicialize do userform. Até aqui foi tudo bem. O problema é que, se o usuário não digitar nada e der ok, ou clicar em "Cancel", o userform carrega.
A pergunta é. Tem como fazer com que o interronpa o carregamento do userform caso o inputbox esteja vazio ou cliquem em "Cancel"? Se sim, tem como inserir uma mensagem informando o motivo de não prosseguir a conferencia?
Segue o codigo
Código: Selecionar todos
A variável Conferente tem que ser publica, pois é utilizada em outros momentosPublic Conferente As String
---------------------------------------------------------------------------------
Private Sub UserForm_Initialize()
Conferente = InputBox("Insira o seu nome", "Conferente")
End Sub
Desde já agradeço pelo suporte!!!
[/size]