Gerenciador de Licenças de Software em VBA – Excel

AGRADEÇA AO AUTOR COMPARTILHE!

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

AGRADEÇA AO AUTOR COMPARTILHE!

Lucas Alcântara

Mais artigos deste autor »

Profissional formado em Gestão de Redes de Computadores, MCP ( Microsoft Certified Professional), ITIL V3 2011 Foundation, Green IT Citizen - EXIN Certification, Certificado HDI Support Center Analyst e Especialista em Gestão da Segurança da Informação. Interessado e se aperfeiçoando na área de Segurança e Soluções de Infra.
"Levo o conhecimento muito a sério e com o pensamento de que o compartilhamento deve ser feito sempre que possível, pois sempre terá algo a aprender tanto quanto a ensinar."


24 Comentários

Lucas Alcântara Autor do Post
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 Autor do Post
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 Autor do Post
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?

Deixe seu comentário

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

Você pode usar estas tags e atributos de HTML: <a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code class="" title="" data-url=""> <del datetime=""> <em> <i> <q cite=""> <strike> <strong> <pre class="" title="" data-url=""> <span class="" title="" data-url="">