fradseu

@Midori deu certo! Sheets("bd_rastre").Select On Error Resume Next atualiza = Sheets("bd_rastre").Range("A:A").Find(TextBox2013.Value).Row Adicionei a tratativa de erro ( On Error Resume Next) antes da função e funcionou!

@Midori opá! Vou testar aqui e retorno com o resultado! Muito obrigado!

Olá boa tarde! Precisa de uma ajuda em um código vba. Está dando erro "A variável do objeto ou a variável do bloco "with" não foi definida Private Sub CommandButton14_Click() '''rotina para atualizar as informações ''localizador da os Dim atualiza As Integer If TextBox2001 = "" Then Label74.Caption = " Nº da OS de produção necessário para continuar! " Label74.BackColor = &H8080FF ' vermelho Exit Sub End If Sheets("bd_rastre").Select atualiza = Sheets("bd_rastre").Range("A:A").Find(TextBox2013.Value).Row With Worksheets("bd_rastre") atualiza = .Range("A:A").Find(TextBox2013.Value).Row End With as duas funções que eu estou tentando utilizar para localizar a linha do objeto está dando esse erro....

@DJunqueira Bom dia, tudo bem!? Essa proposta conseguiria manter o layout visual do projeto? Comecei a estudar para pelo menos entender o conceito proposto. Nesse caso seria interessante fazer procv no cnpj da empresa, caso tenha carrega as infos, caso não aceitar preencher ou cadastrar. Tipo se a empresa tiver mais de 800 cadastros de empresa, aparece uma lista enorme para selecionar, seria isso né? Excelente! isso é algo que eu preciso aprender! isso é o conceito que eu estava buscando! @DJunqueira nossa, era isso sim! Nesse novo modo de armazenagem de dados vai ser possível visualizar os seguintes itens? Consultar itens cadastrados( Uma matriz), ( acho que a primeira proposta do filtro() já atendia isso) Cadastrar item não localizado. Consultar o último movimento ( para checagem ou alteração caso cadastrado errado) Relatório final de movimentação ( acho que isso da para fazer via tabela dinâmica) O que eu preciso manter no projeto é o layout inicial ou o mais parecido possível. Ficou muito bom! Gostei sim! E espero aprender com essa remodelação de projeto! Nossa estou muito empolgado com essa oportunidade de aprendizado! @DJunqueira Mais uma vez obrigado pela iniciativa! E bom final de semana!

@DJunqueira bom dia, tudo bem?! Muito obrigado pela ajuda! Então o propósito desse projeto, é facilitar o uso da tecnologia para pessoas que não dominam informática, e maximizar a localização da informação, no setor de recebimento, tenho 2 funcionários idosos no setor, e preciso facilitar o serviço deles para não impactar a operação. Bom, vamos lá: Na aba Forms, o objetivo é que o usuário possa preencher o formulário indicando se é recebimento ou movimentação interna. Para recebimento deve preencher os campos de cnpj, nota fiscal, data do recebimento, a qual fábrica se destina e quem recebeu, já a movimentação interna, preenche setor, numero, e solicitante. E ao clicar na imagem de "Salvar" transferir os dados desse formulário para a Bd_movimentação. porém eu ainda não sei como fazer diretamente. Ficou bom! Eu tinha usado uma lista de fórmula ao lado da tabela pois alguns pcs aqui ainda não tem o 365, vou solicitar hoje ao TI a implementação,(se possível). Por eu ainda não dominar o vba, ainda apanho bastante para fazer algumas coisa, tais como, transferir os dados diretamente do Forms para a Bd_movimentação. Essa sheet Matrix_Reload, serve para modelar como os dados chegam na Bd_movimentação. Essa busca em especifico serve para o pessoal do almoxarifado, procurar por qualquer termo na tabela e achar as correspondências, por exemplo, se ele escrever "Entrada", obtém como resultado todos os itens da lista que contém o termo procurado. Acredito que a função FILTRO() também ajude nessa tarefa. Aquele formato de de data, facilita depois na tabela dinâmica? Não tinha o hábito de deixar nesse novo formato, sempre deixei resumido. Fico no aguardo para as demais orientações! Muito obrigado pela ajuda! A maioria dos PCs aqui tem o 2016.

@DJunqueira poxa bacana! Com certeza será um grande aprendizado para mim! Fico no aguardo! Muito obrigado!

Opa! arquivo em formato .zip! 08-Almox.zip

Poxa me desculpa! vou postar zipado.... 08-Almox.rar tinha deixado uma sheet com proteção com senha já liberei 08-Almox.rar

Olá amigos boa tarde! Estou tentando criar um cadastro, mas preciso de algumas orientações. Cheguei ao ponto onde consegui alcançar o objetivo, salvar as informações, consultar, e atualizar porém, existem algumas dúvidas e alguns pontos onde não achei resposta na net, no YouTube fiquei bem curioso como poderia proceder para melhorar esse VBA, vamos lá! O vba ficou ultra lerdo. A tela treme demais! mesmo com o application update screen false no ínicio, acho que é porque durante o cód fico trocando de sheet. Na primeira etapa, na sheet Forms, gostaria de saber como poderia fazer para dinamizar o armazenamento de dados diretamente para a BD, pois eu modelo os dados antes em outra sheets e só dai mando para o BD. Durante o preenchimento do formulário eu utilizei o Private Sub Worksheet_Change(ByVal Target As Range) para fazer alguns procvs, mas dai percebi que quando roda o cód de pesquisa, ele também passa várias vezes por essa etapa, gerando lentidão, tem como durante o processo de pesquisa não usar essa sub? ou haveria outro método ? Vou disponibilizar a planilha e espero que ajude os próximos que estão estudando VBA assim como eu, a compreender melhor e sanar dúvidas. Desde já agradeço a ajuda! 08-Almox.xlsx

@Basole boa tarde! Rapaz parabéns! ficou top! muito obrigado! fez exatamente como eu tinha imaginado kkk não sabia que o vba aceitava digitar o comando de atalhos tipo Ctrl+v dessa forma! Abriu mais minha mente! Mais uma vez muito obrigado!

Boa noite meus caros! Esse mês comecei a pesquisar sobre envio de email com vba, achei muito conteúdo sobre Outlook, mas sobre o Mozila ThunderBird ficou um pouco mais difícil, o problema que na empresa onde trabalho só usa o ThunderBird dai vem os desafios. Achei esse cód: Ele funciona tranquilo! Eu alterei no meu caso o SendKeys "^+{ENTER}", True para SendKeys "^{ENTER}", True e ficou show! Agora a dúvida eu gostaria de anexar uma parte da planilha direto no corpo do email tem como? Tipo Ctrl+C , Ctrl+v.... Pasta1.xlsx

Boa noite! Estou com uma dúvida, em relação ao uso de macro com os botões vba. Eu fiz uma macro para importar dados de planilhas e utilizei botão activeX para fazer o tal. ficou assim até então ok... Todavia quando fiz outro botão desta vez "simples" para copiar esses dados para um banco de dados, o botão some cada vez que rodo o importador, dai resolvi fazer o botão de activex, dai o 2º problema, não estou conseguindo rodar nenhuma macro de copia nele.... alguma solução? A primeira planilha fica como " temporário" para coletar dados e receber algumas fórmulas. depois transfiro para o banco de dados em forma de colar especial sem fórmulas. essa macro acima, só não funciona no botão activex, quando rodo em forma de macro normal, da certo, quando clico no botão activex e coloco esse cod, da errado. valeu!

Deu certo! em uma das tabelas o formato do código era diferente, logo o procv não encontrava... valeu!

Senhores, boa noite, tudo bem? Estou com uma dúvida em com relação a somar vários resultados de procv. No caso eu utilizo 3 matrizes, cada uma em uma planilha distinta. Eu tentei por SeErro, mas não somou. Eu usei essa sintaxe, porém não deu certo. Existe algum modo de fazer: =SeErro(Procv()+Procv()+Procv();"")? Acerto Estoque (2).rar

gente estou com problemas no hamachi 2.0 nele aparece um erro nas conexoes falando : " falha ao configurar o adaptador de rede. O par não está acessivel via VPN" como eu posso resolver isso?