Silva,

Crie um UserForm2 com TextBoxes nos quais serão inseridos usuário e senha.

Na TextBox da senha, utilize a Propriedade PasswordChar com *

Inclua também um CommandButton codificado assim:

Private Sub CommandButton1_Click()

If TextBox1 = "JOÃO" And TextBox2 = "senha" Then

Me.Hide
UserForm1.show
End If

Indique qual o tratamento a ser dado caso usuário e/ou senha não sejam válidos.

Em EstaPasta_de_trabalho:

Private Sub Workbook_Open()
UserForm2.Show
End Sub

Tem como para cada usuario cadastrado assim que acessar ele abrir somente sheet com o nome dele.

silva_jmp

Olá Pessoal,

Tenho uma planilha de dados q contem:
UserForm1 = Login de acesso da planilha
Contem Usuário = fulano
Contem Senha = ******
Após o usuario confirmado aparecerá a tela principal.
UserForm2 = Tela Principal
Contem Bt acesso de UserForm3 para Cadastro
Contem Bt acesso de Relatório e outros

UserForm3 = Cadastro de Atividades
Contem TextBox1 = descrição de atividades
Contem ComboBox1 = Lista de Materiais cadastro
e vários TextBox... e ComboBox... para outras informações

Este dados vão ser armazenados na plan4 (Cad_Ativ)

Tenho mais de 4 usuarios que irão introduzir esta informações no UserForm3 ao mesmo tempo, além de compartilhar a pasta com estes usuarios, existe outra opção q não carregue muito o arquivo na hora de salvar? E sendo pasta compartilhada o usuario conseguirá abrir userform3 ao mesmo tempo também???