Parabéns pelo vídeo, fantástico. Sucesso na sua caminhada e que seja sempre abençoado por fazer esse trabalho tão bacana de ensinar as pessoas de assuntos tão importantes e funcionais.
Cara Parabéns pelo designer do formulário. Ficou show! Com isso novas ideias me aparecerem para melhorar o meu projeto. Gostaria que você fizesse mais ´vídeos explicando como por exemplo realizar alteração de senhas para usuários já cadastrados. Fico no aguardo.
Olá amigo, fico muito feliz que tenha gostado. Este é o objetivo, dar conhecimento e dispertar ideias. Logo subiremos um material ensinando a cadastrar usuários e clientes. Ele vai atender a essa sua demanda. Forte abraço e bons estudos!
Boa noite Professor muito obrigado. Deu certo, tive que fazer algumas alterações e ficou assim. Private Sub usu_Senha_AfterUpdate() If Not IsNull(usu_Senha) Then If Not IsNumeric(usu_Senha) Then MsgBox "Apenas números são permitidos neste campo.", vbExclamation, "Erro" MsgBox "Cadastre novamente o USUÁRIO e SENHA" Cancel = True Me.Undo DoCmd.Close DoCmd.OpenForm "15-Cadastrar Usuarios" End If End If End Sub Quando coloca algo que não seja NUMERO ELE dá "Apenas números são permitidos neste campo." depois fecha o formulário e abre novamente pedindo para inserir NOVO USUARIO E SENHA.
Professor, agradeço-lhe pela dica. Curto seus vídeos, são um dos melhores de programando com VBA. Sucesso ao canal. Vou seguir sua sugestão. Obrigado!!!
Boa noite meu professor, consegui ficou assim. MsgBox "Bem vindo " & txtUsuarioLogado & " aguarde o carregamento do Sistema""!!!" Se eu trocar o Usuário troca o nome. Muito obrigado pela paciência.
Boa noite, obrigado pelas ajudas, não gosto de pedir os códigos pois assim seria fácil para nós que estamos fazendo o PROGRAMA. Gosto mesmo de me darem uma luz e eu correr atrás rsrsrs. Fiz uma tela de Login no acess, que quando entro com o nome do usuário e a senha, quando entro no formulário principal, ele já mostra o nome do usuário que está logado. Como faria para além de aparecer o nome do usuário logado, aparecesse também a foto. Pois no meu programa tem vários usuários e casa um tem seu NOME e sua SENHA. Se fizer Login com JULIO, aparece JULIO no formulário, se entrar com PAULO aparece PAULO. E assim o USUÁRIO JULIO alem do nome apareceria a minha foto ou de quem estivesse logado. Teria como me ajudar? È igual ao que fiz com o nome ou seria mais complexo?
Bom dia imperador. Primeiramente parabéns por estar buscando conhecimento, meu intúito com este canal é justamente poder ajudar pessoas como você a criar soluções inovadoras. Então fique a vontade em perguntar sempre que tiver dúvidas. Com relação a imagem é um pouco mais trabalhosa e creio que vale criar um vídeo aqui ensinando. Mas para lhe dar uma direção seria o seguinte: Crie em sua tabela de usuário mais uma coluna para salvar o caminho da imagem; No formulário adicione um controle de Imagem; Depois que o componente de Imagem está no formulário, selecione ele e na aba Dados na Opção Fonte de Controle selecione o campo da sua tabela. Pronto este é o caminho. Fique a vontade em questionar. Abraço!
Boa noite, muito bem explicado, ganhou mais um inscrito. Tenho uma dúvida, quando clico para ver a senha ela realmente aparece, mas quando eu desmarco a opção a senha continua aparecendo. Onde estou errando.
Boa noite, quando entro no Formulário Login e entro com o NOME do usuário e a senha, ele me leva para o Formulário principal, lá já está com o nome USUÁRIO LOGADO FULANO DE TAL. Estou com dificuldade de depois que entro no Login e antes de entrar no Formulário principal Apareça uma mensagem " Seja bem vindo FULANO DE TAL"
Boa noite Júlio. Boa questão! Existem várias formas de fazer isso, uma delas é você por no evento ao abrir do formulário principal o seguinte código Msgbox "Bem vindo ao sistema top " & nomedousuario & "!" Qualquer dúvida estou aqui. Abraço!
@@infinity-aprendendosempre "UsuarioLogado", já tentei colocar assim Msgbox "Bem vindo ao sistema top " & UsuarioLogado & "!" - só aparece até Bem vindo ao sistema top
Na miniatura do video os forms estão sem a borda superior onde aparecem o nome do form e os botões de minimizar, maximizar e fechar, como faço para remover os mesmos?
uso o Access 2007 já fiz e refiz esse exemplo e não fuciona quando mando exibir a senha. Pode ser a versão do Access ??? me de uma luz, o qie pode ser ???
Fala Vladimir, tudo bem? Cole este código um módulo ou no comando ao clicar de um botão: Sub AbrirArquivoExcel() Dim ExcelApp As Object Dim ExcelWorkbook As Object ' Inicializa o objeto Excel Set ExcelApp = CreateObject("Excel.Application")
' Abre o arquivo do Excel Set ExcelWorkbook = ExcelApp.Workbooks.Open("C:\Caminho\Para\Seu\Arquivo.xlsx")
' Fecha o arquivo do Excel ExcelWorkbook.Close ' Fecha o objeto Excel ExcelApp.Quit ' Libera a memória dos objetos Set ExcelWorkbook = Nothing Set ExcelApp = Nothing End Sub Caso não seja inscrito se inscreva para nos ajudar. Obrigado!
Estou fazendo algo errado kkkkk Só aparece Bem vindo ao sistema top. O nome do usuário que coloco é o que esta na tabela "UsuarioLogado", vou tentar até conseguir rsrsrs
Kkkkk, está chegando no seu objetivo. Faz assim: Msgbox "Sua mensagem " & dlookup("nomedacolunacomnomedousuario","Usuário logado"). Me avisa se deu certo.
@@infinity-aprendendosempre vou tentando aqui. não vou te prender mais, mas obrigado pela ajuda. quando conseguir te aviso ok. Só falta esse detalhe para começar a usar esse programa que estou fazendo para o meu trabalho.
Bom dia, grande professor, o senhor pode me dizer como coloco a senha para o usuário mas que ele aceite apenas NUMEROS na no campo senha. Se eu dizer ao senhor que eu esqueci como se faz o senhor acredita rsrsrs
Fala Imperador, bom dia. Faça o seguinte: Selecione o campo que deseja permitir apenas números, pressione a tecla F4, na pagina de propriedade que surge procure na aba eventos por "Após Atualizar", geralmente é a 3° opção. clique no botão "..." Neste momento você deverá estar na página de código vba do access, basta colocar agora o seguinte código: ' verifica se o campo possui valor If Not IsNull(NomeDoCampo) Then
' verifica se o valor do campo é numérico If Not IsNumeric(NomeDoCampo) Then
' exibe uma mensagem para o usuário MsgBox "Apenas números são permitidos neste campo.", vbExclamation, "Erro"
End If
End If. Pronto, agora seu campo aceitará apenas número. Me conta aqui se deu certo. Abraço!😃
@@infinity-aprendendosempre Deu certo, tive que fazer algumas alterações e ficou assim. Private Sub usu_Senha_AfterUpdate() If Not IsNull(usu_Senha) Then If Not IsNumeric(usu_Senha) Then MsgBox "Apenas números são permitidos neste campo.", vbExclamation, "Erro" MsgBox "Cadastre novamente o USUÁRIO e SENHA" Cancel = True Me.Undo DoCmd.Close DoCmd.OpenForm "15-Cadastrar Usuarios" End If End If End Sub
![[Excel] Formulário de entrada de dados VBA](/img/n.gif)
Bacana Prof. Segui o passo a passo e deu tudo certo muito bem explicado, sucesso em suas próximas Aulas.
@@geraldomajelagurgel4038 obrigado. Espero que tenha ajudado, logo vai sair mais videos.
Sucesso!
Parabéns pelo vídeo, fantástico. Sucesso na sua caminhada e que seja sempre abençoado por fazer esse trabalho tão bacana de ensinar as pessoas de assuntos tão importantes e funcionais.
Muito obrigado Fabiano, fico muito grato em poder passar meu conhecimento a vocês.
Forte abraço!
Cara Parabéns pelo designer do formulário. Ficou show! Com isso novas ideias me aparecerem para melhorar o meu projeto. Gostaria que você fizesse mais ´vídeos explicando como por exemplo realizar alteração de senhas para usuários já cadastrados. Fico no aguardo.
Olá amigo, fico muito feliz que tenha gostado. Este é o objetivo, dar conhecimento e dispertar ideias.
Logo subiremos um material ensinando a cadastrar usuários e clientes. Ele vai atender a essa sua demanda.
Forte abraço e bons estudos!
Parabéns !!! top demais.
Que bom que gostou. Espero que tenha ajudado.
Abraço!
Estou ansioso pelos próximos videos. Excelente
Muito obrigado amigo
sensacional
@@renatodiasdeoliveira2479 Obrigado e sucesso!
Que máximo. Esperamos os próximos vídeo .
Muito bem explicado, parabéns e sucesso pro canal.
Valeu obrigado Phil!
Boa noite Professor muito obrigado. Deu certo, tive que fazer algumas alterações e ficou assim.
Private Sub usu_Senha_AfterUpdate()
If Not IsNull(usu_Senha) Then
If Not IsNumeric(usu_Senha) Then
MsgBox "Apenas números são permitidos neste campo.", vbExclamation, "Erro"
MsgBox "Cadastre novamente o USUÁRIO e SENHA"
Cancel = True
Me.Undo
DoCmd.Close
DoCmd.OpenForm "15-Cadastrar Usuarios"
End If
End If
End Sub
Quando coloca algo que não seja NUMERO ELE dá "Apenas números são permitidos neste campo."
depois fecha o formulário e abre novamente pedindo para inserir NOVO USUARIO E SENHA.
Não precisa fechar o formulário, apague apenas o conteudo dos campos e jogue o foco no campo. Segue código atualizado: If Not IsNull(usu_Senha) Then
If Not IsNumeric(usu_Senha) Then
MsgBox "Apenas números são permitidos neste campo.", vbExclamation, "Erro"
' apaga o valor do campo
usu_Senha = ""
' manda o foco para o campo
usu_Senha.SetFocus
End If
End If 😀.
Sucesso!
Ótimo! Segundo passo: Acessar o menu principal pelo formulário de Login. Fale daí, Infinity
Valeu Raimundo!
Que tal um menu principal e um cadastro de cliente?
Professor, agradeço-lhe pela dica. Curto seus vídeos, são um dos melhores de programando com VBA. Sucesso ao canal. Vou seguir sua sugestão. Obrigado!!!
@@raimundolavra5333 Obrigado Raimundo, forte abraço e sucesso!
Muito bom o conteudo... vlw
Obrigado amigo. Valeu!
Boa noite meu professor, consegui ficou assim.
MsgBox "Bem vindo " & txtUsuarioLogado & " aguarde o carregamento do Sistema""!!!"
Se eu trocar o Usuário troca o nome. Muito obrigado pela paciência.
Parabéns Júlio, sabia que você conseguiria.
A persistência te leva sempre para um próximo nível.
Sucesso!
Boa noite, obrigado pelas ajudas, não gosto de pedir os códigos pois assim seria fácil para nós que estamos fazendo o PROGRAMA. Gosto mesmo de me darem uma luz e eu correr atrás rsrsrs.
Fiz uma tela de Login no acess, que quando entro com o nome do usuário e a senha, quando entro no formulário principal, ele já mostra o nome do usuário que está logado. Como faria para além de aparecer o nome do usuário logado, aparecesse também a foto.
Pois no meu programa tem vários usuários e casa um tem seu NOME e sua SENHA. Se fizer Login com JULIO, aparece JULIO no formulário, se entrar com PAULO aparece PAULO. E assim o USUÁRIO JULIO alem do nome apareceria a minha foto ou de quem estivesse logado. Teria como me ajudar? È igual ao que fiz com o nome ou seria mais complexo?
Bom dia imperador. Primeiramente parabéns por estar buscando conhecimento, meu intúito com este canal é justamente poder ajudar pessoas como você a criar soluções inovadoras. Então fique a vontade em perguntar sempre que tiver dúvidas.
Com relação a imagem é um pouco mais trabalhosa e creio que vale criar um vídeo aqui ensinando. Mas para lhe dar uma direção seria o seguinte:
Crie em sua tabela de usuário mais uma coluna para salvar o caminho da imagem;
No formulário adicione um controle de Imagem;
Depois que o componente de Imagem está no formulário, selecione ele e na aba Dados na Opção Fonte de Controle selecione o campo da sua tabela.
Pronto este é o caminho.
Fique a vontade em questionar.
Abraço!
Boa noite, muito bem explicado, ganhou mais um inscrito. Tenho uma dúvida, quando clico para ver a senha ela realmente aparece, mas quando eu desmarco a opção a senha continua aparecendo. Onde estou errando.
Olá amigo.
Posta seu código onde você defini para exibir a senha que dou uma olhada.
Boa noite, quando entro no Formulário Login e entro com o NOME do usuário e a senha, ele me leva para o Formulário principal, lá já está com o nome USUÁRIO LOGADO FULANO DE TAL. Estou com dificuldade de depois que entro no Login e antes de entrar no Formulário principal Apareça uma mensagem " Seja bem vindo FULANO DE TAL"
Boa noite Júlio. Boa questão!
Existem várias formas de fazer isso, uma delas é você por no evento ao abrir do formulário principal o seguinte código
Msgbox "Bem vindo ao sistema top " & nomedousuario & "!"
Qualquer dúvida estou aqui.
Abraço!
@@infinity-aprendendosempre nomedousuario ele muda toda fez que entro com outro USUÁRIO?
@@imperador41 como você está levando o nome do usuário do formulário de login para a página principal?
@@infinity-aprendendosempre "UsuarioLogado", já tentei colocar assim
Msgbox "Bem vindo ao sistema top " & UsuarioLogado & "!" - só aparece até Bem vindo ao sistema top
Show
Valeu!
Na miniatura do video os forms estão sem a borda superior onde aparecem o nome do form e os botões de minimizar, maximizar e fechar, como faço para remover os mesmos?
Olá, para remover as bordas entre nas propriedades do formulário e em "Estilo da Borda" deixe como Nenhum. Espero ter ajudado.
Sucesso!
@@infinity-aprendendosempre muito obrigado ajudou sim vlw
uso o Access 2007 já fiz e refiz esse exemplo e não fuciona quando mando exibir a senha. Pode ser a versão do Access ??? me de uma luz, o qie pode ser ???
@@marcelocahet fala amigo boa tarde, posta o código aqui para eu dar uma olhada
como faço para ao clicar em entrar acessar uma planilha no excel?
Fala Vladimir, tudo bem? Cole este código um módulo ou no comando ao clicar de um botão: Sub AbrirArquivoExcel()
Dim ExcelApp As Object
Dim ExcelWorkbook As Object
' Inicializa o objeto Excel
Set ExcelApp = CreateObject("Excel.Application")
' Abre o arquivo do Excel
Set ExcelWorkbook = ExcelApp.Workbooks.Open("C:\Caminho\Para\Seu\Arquivo.xlsx")
' Fecha o arquivo do Excel
ExcelWorkbook.Close
' Fecha o objeto Excel
ExcelApp.Quit
' Libera a memória dos objetos
Set ExcelWorkbook = Nothing
Set ExcelApp = Nothing
End Sub
Caso não seja inscrito se inscreva para nos ajudar.
Obrigado!
Boa noite, já descobri o erro. Deu tudo certo.
Valeu Julio, parabéns!!!
Em breve vou subir mais vídeos demostrando como cadastrar usuário na base e logar no sistema.
Abraço e sucesso!
Infelizmente o código VBA não esta funcionando, o botão fica fora de foco e não exibe a senha.
Olá Jano. Tudo bem?
Qual versão do access vc está utilizando?
Estou fazendo algo errado kkkkk Só aparece Bem vindo ao sistema top. O nome do usuário que coloco é o que esta na tabela "UsuarioLogado", vou tentar até conseguir rsrsrs
Kkkkk, está chegando no seu objetivo.
Faz assim:
Msgbox "Sua mensagem " & dlookup("nomedacolunacomnomedousuario","Usuário logado").
Me avisa se deu certo.
@@infinity-aprendendosempre vou tentando aqui. não vou te prender mais, mas obrigado pela ajuda. quando conseguir te aviso ok. Só falta esse detalhe para começar a usar esse programa que estou fazendo para o meu trabalho.
@@imperador41 é só questão de tempo, você vai conseguir.
Bom final de semana Júlio!🙏
Bom dia, grande professor, o senhor pode me dizer como coloco a senha para o usuário mas que ele aceite apenas NUMEROS na no campo senha. Se eu dizer ao senhor que eu esqueci como se faz o senhor acredita rsrsrs
Fala Imperador, bom dia.
Faça o seguinte:
Selecione o campo que deseja permitir apenas números, pressione a tecla F4, na pagina de propriedade que surge procure na aba eventos por "Após Atualizar", geralmente é a 3° opção. clique no botão "..." Neste momento você deverá estar na página de código vba do access, basta colocar agora o seguinte código:
' verifica se o campo possui valor
If Not IsNull(NomeDoCampo) Then
' verifica se o valor do campo é numérico
If Not IsNumeric(NomeDoCampo) Then
' exibe uma mensagem para o usuário
MsgBox "Apenas números são permitidos neste campo.", vbExclamation, "Erro"
End If
End If.
Pronto, agora seu campo aceitará apenas número. Me conta aqui se deu certo.
Abraço!😃
@@infinity-aprendendosempre Deu certo, tive que fazer algumas alterações e ficou assim.
Private Sub usu_Senha_AfterUpdate()
If Not IsNull(usu_Senha) Then
If Not IsNumeric(usu_Senha) Then
MsgBox "Apenas números são permitidos neste campo.", vbExclamation, "Erro"
MsgBox "Cadastre novamente o USUÁRIO e SENHA"
Cancel = True
Me.Undo
DoCmd.Close
DoCmd.OpenForm "15-Cadastrar Usuarios"
End If
End If
End Sub
Olá, tudo bem?
Qual o seu e-mail de contato?
Você tem LinkedIn podemos conversar lá?
Olá amigo tudo bem obrigado e vc?
Pode me passar um e-mail: youtube@mpgsystem.com.br