Agora é a vez do colega Fabio Trindade.
Nas palavras do próprio:
Boa tarde, galera.
Estou disponibilizando um pequeno projeto que fiz para minha namorada, mas que também quero compartilhar com todos do FORUM que me ajudam a esclarecer dúvidas.
Trata-se de uma Agenda Telefônica bem simples, mas que segui o mesmo principio do projeto do Mauro Coutinho disponibilizado aqui no FORUM, como meu conhecimento em VBA ainda e um pouco restrito pode ser que contenha alguns erros, segue descritivo:
Botão Cadastrar
- Cadastro de Nome, Endereço, Número, Bairro, Cidade, UF, E-mail, Tel. Residencial, Tel. Celular e Tipo de Pessoa;
- Possui verificar de no Campo Nome se este preenchido;
- Nos campos Tel. Residencial e Tel. Celular possui verificar se um dos campos estão preenchidos é possivel digitar somente números que auto formata (xx)xxxx-xxxx;
Botão Pesquisa
- Campo Nome auto completa ao digitar;
- Botão Pesquisar e Excluir com verificador de campos Nome se este vazio;
- Apos pesquisar um Contato e possivel alterar dados, marcando o checkbox Alterar que ira chama o Botão ALTERAR.
Obs.: Como eu disse acima pode conter erros, pois meu conhecimento e um pouco restrito quando a VBA, espero que gostem.
Abaixo seguem alguns prints das telas do Modelo disponibilizado.
Agenda Telefonica.rar(137.81 KiB)
Olá, achei muito bacana o projeto, mas estou tendo um problema. Uso como sistema operacional o Windows 7 e o Office 2010. Quando vou utilizar a planilha um erro ocorre. Ele abre a tela do VBA e apresenta a seguinte mensagem:
“Erro de Compilação:
o código desse projeto deve ser atualizado para uso em sistemas de 64 bits. Analise e atualize as instruções Declare e, em seguida, marque-as com o atributo PtrSafe.”
Não tenho ideia de como corrigir este problema, você poderia ajudar?
Carlos,
Uma alternativa:
http://www.tomasvasquez.com.br/forum/viewtopic.php?f=5&t=1179&p=5947&hilit=64+bits+ptrsafe#p5947
Abraços
Olá Thomás,
Eu poderei levar o arquivo já com nomes cadastrados a um outro computador, sem perder os dados? Parabéns pelo blog e pelo trabalho!