Comunidade DATAB

Seja bem vindo ao fórum oficial da DATAB | Sua dose diária de Power BI e Excel

Pesquisa resultou em 94 ocorrências

 Voltar para a pesquisa avançada

Re: Bloquear digitação em colunas especificas

 por fcarlosc2018 ¦  13 Mai 2022 às 17:00 ¦  Fórum: Macros e VBA ¦  Tópico: Bloquear digitação em colunas especificas ¦  Respostas: 3 ¦  Exibições: 104

Boa-tarde jmarcelosp

Segue planilha alterada, testa ai...!

Att,
Francisco

Re: Tela de login multiUsuários e registo de alterações nas células

 por fcarlosc2018 ¦  22 Mar 2022 às 19:45 ¦  Fórum: Macros e VBA ¦  Tópico: Tela de login multiUsuários e registo de alterações nas células ¦  Respostas: 25 ¦  Exibições: 331

Boa-noite Bikke Na Aba Logg nas colunas H está formata para Data e eu tinha feito uma Formatação Personalizada nas coluna G e H que estava funcionando. Está é a Formatação Personalizada na Aba Logg -- [<=99999]00000;00\/00\/0000 Na Aba NumerosUsados também usei Formatação Personalizada nas colunas F...

Re: Tela de login multiUsuários e registo de alterações nas células

 por fcarlosc2018 ¦  20 Mar 2022 às 20:38 ¦  Fórum: Macros e VBA ¦  Tópico: Tela de login multiUsuários e registo de alterações nas células ¦  Respostas: 25 ¦  Exibições: 331

Bikke,

Manda uma imagem com exemplo dos formatos que pretende ou faz um exemplo na planilha e anexa.

Re: Tela de login multiUsuários e registo de alterações nas células

 por fcarlosc2018 ¦  20 Mar 2022 às 16:44 ¦  Fórum: Macros e VBA ¦  Tópico: Tela de login multiUsuários e registo de alterações nas células ¦  Respostas: 25 ¦  Exibições: 331

Segue arquivo com alteração...Testa aí...!!!

Re: Tela de login multiUsuários e registo de alterações nas células

 por fcarlosc2018 ¦  20 Mar 2022 às 15:53 ¦  Fórum: Macros e VBA ¦  Tópico: Tela de login multiUsuários e registo de alterações nas células ¦  Respostas: 25 ¦  Exibições: 331

Boa-tarde O que eu consegui por enquanto é que na Aba NumerosUsados nas colunas com data, usei: Formatar Células -- Personalizado e coloquei -- 00\/00\/0000 Na Aba Logg nas colunas que gravam as alterações, coloquei: Geral;00\/00\/0000 No caso vai ficar assim: ex.: 20032022 e se tiver um zero à esqu...

Re: Tela de login multiUsuários e registo de alterações nas células

 por fcarlosc2018 ¦  20 Mar 2022 às 11:07 ¦  Fórum: Macros e VBA ¦  Tópico: Tela de login multiUsuários e registo de alterações nas células ¦  Respostas: 25 ¦  Exibições: 331

Bom-dia

Talvez com Formatação Personalizada.

Re: Tela de login multiUsuários e registo de alterações nas células

 por fcarlosc2018 ¦  17 Mar 2022 às 18:06 ¦  Fórum: Macros e VBA ¦  Tópico: Tela de login multiUsuários e registo de alterações nas células ¦  Respostas: 25 ¦  Exibições: 331

Boa-tarde Faça a seguinte alteração: Vá no Evento da Aba WsNumerosUsados(NumerosUsados) e altere na linha: de: .Cells(r, "E") = nUserMaquina para: .Cells(r, "E") = WsUsers.Range("J2").Value Acho que resolve o problema de registrar o Usuário na Aba Logg. Att, Francisco

Re: Tela de login multiUsuários e registo de alterações nas células

 por fcarlosc2018 ¦  17 Mar 2022 às 11:11 ¦  Fórum: Macros e VBA ¦  Tópico: Tela de login multiUsuários e registo de alterações nas células ¦  Respostas: 25 ¦  Exibições: 331

Bom-dia Fiz as alterações e aparentemente está tudo OK...! Também fiz testes na Aba NumerosUsados com usuários diferentes e está registrando as alterações na Aba Logg. Já está bloqueando Usuários após digitar 5 vz a senha errada e não está mas aparecendo a Aba Menu quando clicar em SAIR conforme men...

Re: Tela de login multiUsuários e registo de alterações nas células

 por fcarlosc2018 ¦  16 Mar 2022 às 13:35 ¦  Fórum: Macros e VBA ¦  Tópico: Tela de login multiUsuários e registo de alterações nas células ¦  Respostas: 25 ¦  Exibições: 331

Boa-tarde Bikke

Fiz as novas alterações. Segue anexo...!
Fica faltando a parte de "tentativas e bloqueio de usuário", que no momento estou meio empacado.

Att,
Francisco

Re: Tela de login multiUsuários e registo de alterações nas células

 por fcarlosc2018 ¦  15 Mar 2022 às 16:35 ¦  Fórum: Macros e VBA ¦  Tópico: Tela de login multiUsuários e registo de alterações nas células ¦  Respostas: 25 ¦  Exibições: 331

Boa-tarde

Fiz novas alterações e acredito que esteja perto do que pretendia, ainda falta a parte de bloquear o usuário após 5 tentativas e a de alteração de senha.
Tenta fazer essas alterações, se não conseguir avisa.

Vai testando ai...!

Re: Tela de login multiUsuários e registo de alterações nas células

 por fcarlosc2018 ¦  15 Mar 2022 às 10:09 ¦  Fórum: Macros e VBA ¦  Tópico: Tela de login multiUsuários e registo de alterações nas células ¦  Respostas: 25 ¦  Exibições: 331

Bom-dia

A parte de registrar no Log os usuários vou concluir ainda, por enquanto estou testando, logo após o terminar essa parte vou partir para Aba NumerosUsados.

Att,
Francisco

Re: Tela de login multiUsuários e registo de alterações nas células

 por fcarlosc2018 ¦  14 Mar 2022 às 13:16 ¦  Fórum: Macros e VBA ¦  Tópico: Tela de login multiUsuários e registo de alterações nas células ¦  Respostas: 25 ¦  Exibições: 331

Boa-tarde Bikke Adaptei um código que eu tinha para a sua Planilha, aparentemente está funcionando, acessa as planilhas conforme permissão de cada usuário. Vai testando ai...!!! Ainda não implementei a parte de Log, talvez eu demore um pouco. Caso o "PHSabater" estiver com um "tempinh...

Re: Editar ListBox

 por fcarlosc2018 ¦  01 Mar 2022 às 11:33 ¦  Fórum: Macros e VBA ¦  Tópico: Editar ListBox ¦  Respostas: 9 ¦  Exibições: 255

Bom dia Uma sugestão é criar outra "ABA" com um Cadastro de informações "Fixas" de cada Funcionário e quando for criar uma nova tarefa, ao selecionar na ComboBox "Nome" trazer essas informações e ao cadastrar todas as informações finalizar no botão "Salvar" qu...

Re: Filtrar Listbox ao digitar no Texbox

 por fcarlosc2018 ¦  19 Fev 2022 às 11:37 ¦  Fórum: Macros e VBA ¦  Tópico: Filtrar Listbox ao digitar no Texbox ¦  Respostas: 3 ¦  Exibições: 66

Bom dia

Veja se é dessa forma...!?

Re: Editar ListBox

 por fcarlosc2018 ¦  16 Fev 2022 às 10:41 ¦  Fórum: Macros e VBA ¦  Tópico: Editar ListBox ¦  Respostas: 9 ¦  Exibições: 255

Bom-dia

Segue alteração...

Re: Editar ListBox

 por fcarlosc2018 ¦  05 Fev 2022 às 11:00 ¦  Fórum: Macros e VBA ¦  Tópico: Editar ListBox ¦  Respostas: 9 ¦  Exibições: 255

Bom-dia

Fiz algumas alterações e falta dar continuidade no código.
Parei na "caixa_conta.TextBox"

Att,
Francisco

Re: Corrigir data na caixa texto

 por fcarlosc2018 ¦  03 Fev 2022 às 15:41 ¦  Fórum: Macros e VBA ¦  Tópico: Corrigir data na caixa texto ¦  Respostas: 5 ¦  Exibições: 151

Boa-tarde Tente assim: Private Sub TBVctoPrim_Exit(ByVal Cancel As MSForms.ReturnBoolean) If TBVctoPrim.Text = "" Then Exit Sub End If If IsDate(TBVctoPrim.Text) Then TBVctoPrim.Text = CDate(TBVctoPrim) Else MsgBox ("Data Inválida !"), vbInformation, "Atenção!" Cancel =...

Re: Checagem de duplicadas forms VBA

 por fcarlosc2018 ¦  11 Jan 2022 às 09:38 ¦  Fórum: Macros e VBA ¦  Tópico: Checagem de duplicadas forms VBA ¦  Respostas: 1 ¦  Exibições: 35

Bom-dia Segue um exemplo. A verificação é feita ao sair da TextBox. Private Sub autuacao_Exit(ByVal Cancel As MSForms.ReturnBoolean) If WorksheetFunction.CountIf(Range("A1:A100"), autuacao.Value) > 0 And autuacao <> "" Then MsgBox "Multa já cadastrada, mesmo número de autuaç...

Re: Erro ao carregar textbox a partir de combobox

 por fcarlosc2018 ¦  15 Out 2021 às 14:03 ¦  Fórum: Macros e VBA ¦  Tópico: Erro ao carregar textbox a partir de combobox ¦  Respostas: 3 ¦  Exibições: 399

Tente assim: Dim xRg As Range Private Sub ComboBox1_Change() Me.TextBox1.Text = Application.WorksheetFunction.VLookup(Me.ComboBox1.Value, xRg, 2, False) End Sub Private Sub UserForm_Initialize() Set xRg = Worksheets("Usuarios").Range("A2:B10") Me.ComboBox1.List = xRg.Columns(1).V...

Re: Redefinir imagem no UserForm

 por fcarlosc2018 ¦  13 Out 2021 às 14:55 ¦  Fórum: Macros e VBA ¦  Tópico: Redefinir imagem no UserForm ¦  Respostas: 2 ¦  Exibições: 371

Obrigado pela resposta, mas dessa maneira eu já uso. Gostaria de não precisar usar uma ("logo.jpg") salva em uma pasta e sim usar a imagem que inseri no próprio UserForm que já é a minha "Logo Padrão". Também consigo fazer com que volte a imagem padrão após eu clicar no botão &qu...

... mas quando tento recolher as linhas usando[…]

Valeu, meu caro Deciog! Abraço!!!!

Galera, agradeço a quem pelo menos se inter[…]

Olá, @piasserpa . Experimente: Sub Rep[…]

Olá queridos parceiros! Estou com um proble[…]

=ÚNICO(FILTRO(Tabela1[SEÇÃO];[…]

Olá, @CinOlive . Se você disponi[…]

Experimente: Sub CriarArquivoV2() Dim fat As R[…]