Gerenciador de Licenças de Software em VBA – Excel

Pensando na dificuldade que tinha para gerenciar as licenças de softwares de um empresa, resolvi dedicar alguns dias para desenvolver uma ferramenta, no Excel,  utilizando VBA e formulários.

Compartilho com os colegas o gerenciador para que me ajudem a continuar desenvolvendo este pequeno projeto que pode ser de grande ajuda.

Imagem via Shutterstock

Imagem via Shutterstock

Características:

  1. Acesso realizado com criptografia
  2. Nível de permissão definido por perfil de usuário (3 tipos)
  3. Cadastro e controle de contas de usuários
  4. Cadastro de licenças
  5. Opções adicionais para licenças: alterar licença e sua validade ou excluir
  6. Cadastro de Uso de licenças: Cadastra Nome de usuário e computador que utiliza a licença
  7. Opções adicionais do cadastro de uso: alterar usuário, computador ou local da licença e remover uso cadastrado – isso não exclui a licença
  8. Impressão em tela da lista de licenças com filtro por local (setor, filial…) ou tipo de licença

Tenho utilizado de forma bem simples o gerenciador, mas sei que ele tem potencial para evoluir bastante e é por isso que preciso da colaboração dos colegas para criticarem, darem sugestões, apontarem falhas e possíveis melhorias e também colaborar com o desenvolvimento da ferramenta.

Baixe o Gerenciador de Licenças clicando aqui.

Dados para Acesso

Senha de criptografia: 010203*
Altere-a conforme desejar utilizando a opção do próprio excel ( Arquivo > Proteger Pasta de Trabalho > Criptografar com senha). Esta senha deve ser utilizada inicialmente e para qualquer usuário.

Usuário: admin
Senha: senha
Perfil: Admin

Usuário: user
Senha: 1234
Perfil: Restrito

A ferramenta não foi criada com intuito de gerar retorno financeiro e, agora compartilhada, assim deve ser mantida. Utilizem, alterem, divulguem, mas mantenham o trabalho de forma colaborativa.

Grande Abraço

Lucas Alcântara

Mais artigos deste autor »

Profissional formado em Gestão de Redes de Computadores, Especialista em Gestão da Segurança da Informação, Certificado como MCP ( Microsoft Certified Professional), ITIL V3 2011 Foundation, Green IT Citizen - EXIN Certification, Support Center Analyst HDI e ISFS ISO 27002 (Exin Security).
Eterno Curioso "fuçador".


26 Comentários

Lucas Alcântara
4

Bom dia, meus queridos. Desculpem pela falha, realmente acabei esquecendo de publicas os dados das contas. Segue abaixo:
1ª etapa de acesso:
Senha de criptografia: 010203*
Altere-a conforme desejar utilizando a opção do próprio excel ( Arquivo > Proteger Pasta de Trabalho > Criptografar com senha). Esta senha deve ser utilizada inicialmente e para qualquer usuário.
2ª Etapa:
Usuário: admin
Senha: senha
Perfil: Admin
Usuário: user
Senha: 1234
Perfil: Restrito

Alexssandro Gottschalk
5

Bom dia, abri o arquivo com a senha informada, mas dá o erro abaixo antes de concluir.
Erro de compilação
Era esperado: Sub ou Function
No fundo aparece o INICIO e o cursor está na linha abaixo:
Private Declare PtrSafe Function FindWindowA Lib “USER32” (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
O que pode ser isso?
Uso Excel 2007

Lucas Alcântara
6

Olá, Alexssandro.
Eu criei a ferramenta com o MSo2010 64bits. Esta linha é de compatibilidade de arquivos para sistemas 32, então talvez apenas comentá-la pode resolver o seu problema(adicionar ‘ ao início da linha), ficando assim:
‘Private Declare PtrSafe Function FindWindowA Lib “USER32? (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Clique para continuar a execução ou salve, feche e abra novamente para saber se funcionou. Manda o resultado!
Grande abraço

arley lima
9

Lucas ele possui algum pré requisito além do excel? Aqui ele informa um erro: “Não foi possível carregar um objeto porque ele não está disponível nesta máquina”, aparece umas 4 vezes. Sabe o que pode ser?

Lucas Alcântara
10

Obrigado, Roger e Paulo.
Arley, só com essa informação eu não consigo identificar alguma solução, porém, imagino que o excel está indicando a falta de algum Controle Adicional que uso nos formulários, como o do calendário que é chamado de MonthView. Tenta, com o uso das funções, encontrar o ponto do erro. Grande abraço

Wyllian Bastos
13

Caro Lucas!
Baixei seu gerenciador de licencas, deu o mesmo problema que o arley, contudo, registrei mscomct2.ocx e parou o erro. so que quando vou colocar a data de validade e seleciono alguma data, dá um erro no VB campo é obrigatorio.
Grato,

Junio
16

Boa tarde,
A aplicação da erro na minha máquina quando vou inserir a licença e tenho que preencher o campo validade.
Ele não apresenta o calendário para ser selecionada a data. E se eu digitar qualquer coisa não dá.
Poderia me auxiliar.
Obrigado.
Att.: Júnio Moreira

Dayana
17

Olá,
Após corrigir o primeiro erro relacionado ao SO 32 bits, ocorreu um novo erro:
Erro de compilação:
‘Sub’ ou ‘Function’ não definida.
Está apontando para esta linha:
Private Sub UserForm_Initialize()
FindWindowA

Luiz Ricardo Giovanella
18

Pessoal,
Quem teve erro “erro em tempo de execução 424” ao incluir uma nova licença em selecionar uma data, é preciso alterar a parte do código do form “Data”:
DE:
UserForm3.TextBox_Validade = Data.MonthView.Value
PARA:
Cadastro_Licenças.TextBox_Validade = Data.MonthView.Value
Lucas,
Não sei se é necessário corrigir isso na planilha 😉
Abraços

ROGERIO
19

Bom dia,
Ele abre mas da a mensagem que alguns itens não estão disponíveis, sabe como resolver?

José Manoel
20

Bom dia,
No meu acontece como relatado pela Dayana…
Conseguiu resolver o problema Dayana?
Erro de compilação:
‘Sub’ ou ‘Function’ não definida.
Está apontando para esta linha:
Private Sub UserForm_Initialize()
FindWindowA
Obrigado

rodrigo
21

bom dia Lucas..
esta dando erro na planilha, o que pode ser?
erro em tempo de execução “9”:
subscrito fora do intervalo

GREISON
23

Muito Lucas, está de parabéns pela planilha e por disponibilizar ela gratuitamente para os demais colegas.
eu mesmo irei usufruir dela, e queria saber se consigo alterar, para em vez de buscar por licença, pesquisar por produto.
abraço,

Rodrigo
24

Boa tarde Lucas, o arquivo está com erro apos a inserção da senha.teria algum modo de enviar os prints com os erros?

Denilson Guedes
25

Antes de tudo, obrigado pela doação. Perfeita planilha, tudo funciona!
Precisei cadastrar os usuários e computadores também, para criar um padrão e não correr o risco de digitações ou acentos, como João e Joao ou “ESTACAO-01” e “ESTAÇÃO-01”. Então pensei se eu poderia alterar o “TextBox” do usuário para um “ComboBox” de uma lista como a já existente, sem precisar de botão dentro do userform do início.
Agradeço novamente pela disponibilização do controle.
Att,
Denilson Guedes

fabio alves
26

ola bom dia.. trabalho como programador em linguagem visual dataflex.. gostei do seu gerenciador de licencas.. preciso de um para controlar o acesso mensal dos clientes.. tipo a casa vencimento do mes (dia cogitado pra vencer) seja preciso que o cliente entre em contato pra eu gerar uma nova senha…desde ja agradeço. meu contato: (99) 99183-8278 whatsapp

Deixe seu comentário

Seu endereço de e-mail não será publicado. Campos com * são obrigatórios!