Ir ao conteúdo
  • Cadastre-se

LUCIANO LUIZ ROSA

Membro Pleno
  • Posts

    20
  • Cadastrado em

  • Última visita

posts postados por LUCIANO LUIZ ROSA

  1. Pessoal, tenho uma planilha com proteção de usuário e senha, além de prazo para utilização. Contudo, o código esta permitindo acesso a planilha, mesmo sem digitar a senha e usuário, uma vez que, clicando em cancelar na caixa inputbox, a planilha abre mesmo sem digitar os dados de usuário e senha.

    Segue código:
     

    Private Sub Workbook_Open()
    Dim dt As Date
    
    'Escolha a data em a Pasta de Trabalho deverá expirar (ano, mês, dia)
    
    dt = DateSerial(2021, 12, 31)
    
    If Date >= dt Then
    MsgBox "Esta Pasta de Trabalho expirou! Favor contatar o administrador através do e-mail [email protected] ou pelo WhatsApp (31) 99610-8436."
    
    ThisWorkbook.Close SaveChanges:=False
    
    End If



    Reiniciar:

    Usuario = InputBox("Digite o seu usuário:")
    Senha = InputBox("Digite a sua senha:")
    
    On Error Resume Next
    ActiveSheet.Unprotect
    If Err Then
    MsgBox "senha errada"
    ThisWorkbook.Close SaveChanges:=False
    End If
    On Error GoTo 0
    
    senha_certa = Worksheets("Logins").Cells.Find(Usuario).Offset(0, 1)
    MsgBox "Esta Pasta de Trabalho esta ativa!"
    If Senha & "" <> senha_certa & "" Then
    
    ThisWorkbook.Close SaveChanges:=False
    
    
    End If
    
    
    
    End Sub

     

  2. Amigos, tenho tido dificuldades em criar um código para minhas planilhas. 

    Preciso de um código VBA para criar prazo de validade da planilha, com possibilidade e extensão do prazo por mais 365 dias. 

    Preciso ainda de um código para verificar se o usuário tem acesso, e se digitar a senha errada a planilha encerra sem salvar.

    Tenho o código para senha, só que preciso acrescentar o prazo de validade.

     

    CODE<>

     

    Private Sub Workbook_Open()
    Reiniciar:
    Usuario = InputBox("Digite o seu usuário:")
    Senha = InputBox("Digite a sua senha:")
    
    On Error Resume Next
    
    senha_certa = Worksheets("Logins").Cells.Find(Usuario).Offset(0, 1)
    
    If Senha & "" <> senha_certa & "" Then
        GoTo Reiniciar
    End If
    
    End Sub


     

  3. Em 26/08/2018 às 15:10, LUCIANO LUIZ ROSA disse:

    Amigos, boa tarde!

     

    Já quebrei a cabeça aqui, mas tá osso! Preciso de uma formula que indique o a carga horária de acordo com o tipo de jornada, de acordo com o período de tempo e de acordo com o dia da semana .

     

    Mais detalhes no arquivo em anexo. 

    Se puderem me ajudar, agradeço desde já!

     

    Abraços!

    @Edson Luiz Branco  @deciog

    @deciog

     

    modelo.xlsx

     

    modelo.xlsx

    adicionado 0 minutos depois

    modelo.xlsx

  4. Amigos, bom dia! Estou finalizando uma planilha e preciso que a aba onde apresento os resumos dos valores apurados, seja criado uma macro ou código vba(prefiro macro com botão), que oculte todas as linhas que estejam em branco (na planilha estas células possuem a fórmula =" " ) de um determinado intervalo de células. Coloquei uma formatação condicional que colore de amarelo as células que possuem valor, mesmo que este seja 0, para facilitar a visualização das células que contém valor e não podem ser excluídas.

     

    Anexo envio planilha com mais detalhes.

    ocultar linhas com base em células específicas.xlsx

  5. 45 minutos atrás, LUCIANO LUIZ ROSA disse:

    Da forma que você fez ficou muito bom. Será que poderia colocar esse código que você fez funcionando na minha planilha na aba(INADIMP. POR UNID.).

    Vacilei aqui... Deveria ter mandado logo a planilha formatada para que fosse ajustada direto nela... 

    VBA não é muito a minha praia... até tentei ajustar na minha planilha aqui... mas não deu.

     

    Planilhas e Graficos de CSM - Caixa - 2017 12 em adequação.xls

  6. Prezados amigos, bom dia!

    Estou precisando de ajuda com uma planilha de Excel para controle de inadimplentes de condomínio. Nesta planilha, preciso de uma formatação condicional para que, todos aqueles apartamentos que estiverem em débito, conforme lista de devedores criada na mesma aba, fiquem com formatação diferente na tabela de apartamentos. Por exemplo, se o apartamento 501 estiver listado na célula A28(tabela de devedores) como devedor, a célula A20(na tabela de apartamentos) fique em amarelo.

     

    Aguardo a ajuda dos senhores!

  7. Prezados amigos, boa noite!

     

    Venho aqui mais uma vez solicitar a ajuda de vocês!

     

    Tenho algumas planilhas de excel que pretendo comercializar. Contudo, sou leigo em VBA, e não consegui resolver algumas questões para controle de acesso, controle usuários, prazo de expiraçao da planilha, tela de login(VBA) para controlar o acesso, para  assim garantir que somente aquelas pessoas possam utilizar o sistema. 

    Fiz diversas pesquisas, vi vários vídeos, mas não consegui resolver esta questão. 

    Será que existe algum código VBA pronto que eu possa acrescentar nestas planilhas? Qual o melhor método para resolver todas estas questões de segurança de planilhas Excel?

    Aguardo orientaçoes de vocês...

  8. Com a fórmula procv utilizada,  ela retorna somente os feriados quando estes encontram-se na primeira coluna da tabela de feriados. As datas das demais colunas, a formula não encontra os resultados. Isto acontece porque é necessário indicar a coluna de resultado, que no caso do nosso exemplo, foi a coluna 1. Todavia, existem vários outros feriados que encontram-se nas demais colunas. Acho que o a formula Índice.corresp resolveria...

     

  9. Amigos, boa tarde!

            Estou tentando encontrar uma fórmula que possa me indicar se as datas existentes na coluna C da Planilha 1 Abaixo , correspondem a dias de feriados, conforme datas existentes na tabela 2(Tabela de Feriados).

     

            Por exemplo, se o dia 01/01/2018 (coluna C, linha 7) da planilha 1, constar como feriado na planilha 2(tabela de Feriados), a célula B7 retornará "FER", abreviatura de feriado.

         

           Com esta formula, terei condições de visualizar automaticamente na planilha 1, todos os feriados que ocorrem no período que estarei fazendo o levantamento.

     

    PLANILHA 1 

    image.thumb.png.7d23130ed0d3e259417b157013241f8f.png

     

    PLANILHA 2 - TABELA DE FERIADOS

     

    image.thumb.png.a584e9f9f248dc5e02d57f3eb4d559fc.png

     

    (a tabela de feriados corresponde ao intervalo de (h2:AB22)

    image.thumb.png.22193b684d192fd488b0ac9204165c63.png

     

    Alguém poderia me ajudar, preciso muito resolver esta questão, pois, já tentei diversas opções aqui e não consegui resolver.

     

    Abraços a todos!

    MODELO DE CARTÃO - MÚLTIPLAS APURAÇÕES.xlsx

Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×
×
  • Criar novo...

Ebook grátis: Aprenda a ler resistores e capacitores!

EBOOK GRÁTIS!

CLIQUE AQUI E BAIXE AGORA MESMO!