Agenda Fones - Contribuição - Página 3 - Tomás Vásquez Fórum
Agenda Fones - Contribuição
jonatasnc
Registrado em: Seg Mar 19, 2012 2:32 pm
Re: Agenda Fones - Contribuição
Mensagem por jonatasnc » Seg Mar 19, 2012 2:40 pm
Alterei o layout dos Forms para atenderem a minha demanda, ja revisei todos os códigos da planilha porem tem alguma coisa errada:
o Modulo Cadastro ficou assim:
Sub confirma_Cad()
'Rotina das Variaveis Cadastro
With frmCAd
VarNome = .cpNome.Value
Varmat = .cpMatricula.Value
Varsetor = .cpsetor.Value
Varz = .cpz.Value
Varturno = .cpturno.Value
Varadmissao = .cpadmissao.Value
Varcargo = .cpcargo.Value
Varsupervisor = .cpsupervisor.Value
Varcelular = .cpcelular.Value
Varresidencial = .cpresidencial.Value
Varmovimentacao = .cpmovimentacao.Value
Varobservacao = .cpobservacao.Value
'Entradas Registros Cadastro
With Worksheets("cadastro")
Range("nome").FormulaR1C1 = VarNome
Range("matricula").FormulaR1C1 = Varmat
Range("setor").FormulaR1C1 = Varsetor
Range("z").FormulaR1C1 = Varz
Range("turno").FormulaR1C1 = Varturno
Range("admissao").FormulaR1C1 = Varadmissao
Range("cargo").FormulaR1C1 = Varccargo
Range("supervisor").FormulaR1C1 = Varsupervisor
Range("celular").FormulaR1C1 = Varcelular
Range("residencial").FormulaR1C1 = Varresidencial
Range("movimentacao") = Varmovimentacao
Range("observacao").FormulaR1C1 = Varobservacao
Call RegistrarCadastro
Sub RegistrarCadastro()
Range("ResCadastro").Activate
as linhas em negrito aparecem o erro 1004:
o metodo RANGE do objeto global falhou.
Mensagem por Mauro Coutinho » Seg Mar 19, 2012 11:30 pm
jonata, as linhas em Negrito se referem a Ranges NOMEADOS, e o erro é devido de os mesmos não existirem na Planilha.
Você fez a adaptação para seu uso, alterou os nomes dos campos "Nomeados" na rotina, mas não alterou na planilha.
Vá no Menu(excel 2003) Inserir / Nome / Definir e será exibido a lista dos nomes que foram atribuidos aos ranges, edite-os e altere.
Mensagem por jonatasnc » Qua Mar 21, 2012 3:46 pm
Mauro Coutinho escreveu: jonata, as linhas em Negrito se referem a Ranges NOMEADOS, e o erro é devido de os mesmos não existirem na Planilha.
Obrigado pela resposta Mauro, onde fica este atalho no 2007?
Mensagem por Mauro Coutinho » Qua Mar 21, 2012 4:56 pm
Obrigado pela resposta Mauro, onde fica este atalho no 2007?[/quote]
http://office.microsoft.com/pt-br/excel ... create_nam
Jaime Rib.Preto
Registrado em: Seg Mar 05, 2012 3:07 pm
Mensagem por Jaime Rib.Preto » Qua Mar 28, 2012 9:53 am
Bom dia, baixei a planilha e qdo vou descomprimir aparece um erro:
AgendaFonesMVC.rar: O cabeçalho do arquivo "???" está corrompido.
Mensagem por Mauro Coutinho » Qua Mar 28, 2012 2:44 pm
Jaime, de fato, o arquivo se corrompeu na epoca que tivemos problemas no forum, qdo chegar em cas procuro a cópia e atualizo.
OK - Anexo Atualizado em 29/03/12 - é só baixar.
O Tomas publicou a mesma no Blog (http://www.tomasvasquez.com.br/blog/) dele, de uma olhada se tambem está corrompida, aqui no serviço não temos acesso a Blogs.
fireangelsc
Registrado em: Qua Jul 04, 2012 10:28 am
Mensagem por fireangelsc » Qua Jul 04, 2012 10:31 am
Bom dia gostei muito da agenda realemente é o que estou precisando mas não entendo muito de excel ainda mais programação...precisava acrescentar algumas informações no radapé junto aos creditos com seu nome mas parece que é bloqueado poderia me ajudar?
jayrmellooliveira
Registrado em: Sex Jul 19, 2013 4:06 pm
Mensagem por jayrmellooliveira » Sex Jul 19, 2013 4:25 pm
Mauro Coutinho escreveu: Anexo uma Agenda de Telefones e outros que criei ja faz algum tempo e fiz algumas correções, não usa as mesmas rotinas do Modelo de Cadastro do Tomaz, mas é uma outra opção um pouco mais simples.
Os códigos estão abertos para qualquer modificação e adaptações a quem interessar.
Anexo Atualizado em 29/03/12
AgendaFonesMVC.zip
Olá! Agradeço aos colaboradores que disponibilizam exemplos tão completos como esse, porem, gostaria que fosse incluído as seguintes funções: No local de pesquisa fosse ampliado para localizar qualquer campo do cadastro e não só o nome, e fosse acrescentado mais campos de cadastro do tipo Outro e-mail e outro celular e empresa, resumindo, gostaria que tivesse mais ou menos uns 15 a 20 campos. Obrigado e agradeço antecipadamente.
Mensagem por jayrmellooliveira » Ter Jul 23, 2013 11:37 am
Bom dia colaboradores.
Gostaria que fosse incluído as seguintes funções: No local de pesquisa fosse ampliado para localizar qualquer campo do cadastro e não só o nome, e fosse acrescentado mais campos de cadastros.