Ir ao conteúdo
  • Cadastre-se

josequali

Membros Plenos
  • Total de itens

    34
  • Registro em

  • Última visita

  • Qualificações

    N/D
  1. @LaerteB Boa noite! Atualmente criei um formulário que após eu cadastrar minha informações no excel me permiti transferir as informações do userform para um documento do word. No entanto, só consigo transferir o texto. Queria também poder transferir a imagem carregada no formulário do registro pesquisado na listbox1 junto com as suas informações. Conhece algum comando que permite transferir a imagem para um campo pré-determinado no word? Estou encaminhado o projeto do excel, a pasta com formulário modelo e a pasta para salvamento das imagens após o cadastro (se for em altera não salva a imagem na pasta, melhor apagar o cadastros e inserir novos com imagens, caso queira). Para poder abrir o formulário do word tem que mudar o caminho da pasta no seu pc (atualizar o caminho da pasta Relatórios) assim como a para salvar as imagens (atualizar o caminho da pasta imagensnf). Ver imagens anexas 1 e 2. Após é só selecionar um registro no listbox1 e da um click botão relatórios. Vide imagem 3 e 4. Desde já agradeço a atenção e a disponibilidade! Muito obrigado . inserir imagem no word.zip
  2. @LaerteB Boa noite! Realizei a mudança sinalizada e o código não da mais erro, no entanto, quando abre o whatsapp ele não da o comando para realizar a pesquisa e enviar a mensagem .
  3. @LaerteB Boa noite! Funcionou perfeitamente! Muito obrigado!
  4. @LaerteB @LaerteB Boa noite! Muito obrigado! Realizei as mudanças indicadas, mas ainda continua dando erro no código, tentei mudar como descrito na imagem, mas ainda sim não deu certo. whatsapp envio de mensagem.zip
  5. @LaerteB Perfeito Muito obrigado! adicionado 19 minutos depois @LaerteB Boa noite! gostaria de saber como fazer para evitar a transferência da primeira linha contendo os dados (a linha 3). Porquê caso eu transfira tudo o meu ID irá começar do número 1 novamente, prejudicando assim que eu tenha um número único por registro. Sendo assim, independente do status estar Fechado na linha 3, queria que está não seja transferida para não prejudicar a continuação do meu ID. O projeto é o mesmo do post anterior. Segue abaixo as imagens.
  6. @LaerteB Consegui Resolver! Era só colocar Range("C" & Linha).Value = "Fechado" Uma dúvida queria transferir a informação carregada do userform1 (form_inconformidades) para o userform2 (form_alerta) nas combobox procedendia e motivo. Existe algum comando que permite? Desde já agradeço pela ajuda. EXPORTAR DADOS PROJETO.zip
  7. @LaerteB Bom dia! Então tentei, mas não funcionou. Até adicionei o código para executar o explore e o explore e abrir o whatsapp (o outro não funcionava - veja abaixo). Mesmo assim ele não realiza a pesquisa. Estava assim não executava o comando. Shell "C:\Program Files\Google\Chrome\Application\chrome.exe" & " https://web.whatsapp.com/" Deixei assim: ActiveWorkbook.FollowHyperlink Address:=" https://web.whatsapp.com/" Mas ele não realiza a busca do contato e nem envia a mensagem. whatsapp Solucao 1 - LB - 08-08-2020.zip
  8. @LaerteB Bom dia! O código funcionou perfeitamente. Era o que eu esperava! muito obrigado! Queria tirar uma duvida. Quando eu realizo o cadastro e coloco o nome do responsável em aberto o campo do "Status" fica em "Aberto", e essa informação é salva na planilha assim como eu desejava. Entretanto, quando eu seleciono o nome do responsável e vou em "Alterar" a informação é salva no painel, mas gostaria que essa informação também fosse alterada na planilha e o nome "Aberto" muda-se para "Fechado". Acredito que tenho que acrescentar o comando no comando de "Alterar", tentei a mesma especificação do botão "Salvar", mas ela acaba mudando só da linha C3 e não da que eu desejo ao da um click. Então não funcionou. Veja as imagens abaixo. Desde já agradeço a disponibilidade. Obrigado! If Opt12 = True Then Planilha9.Range("c3").Value = "Fechado" End If EXPORTAR DADOS PROJETO.zip
  9. @LaerteB Bom dia! Consegui aplicar o comando para atualização da listbox1 e contagem das linhas. Na contagem de linhas ele ele esta contando junto com o cabecario, contabilizando 14 registros, mas só exitem 13 (vide imagem abaixo). Como corrigir esse erro de contagem? Já na transferência de dados, realizei as mudanças mas além de continuar dando não transfere todas informações e nem deleta as transferidas . Removi todos os links externos da planilha e estou a encaminhado só a parte do projeto que importa, o restante removi tudo. Outra duvida é: deixei propositalmente o comando de cadastrar também na segunda guia para ver se conseguia cadastra na guia 1 os dados, mas para minha surpresa, os dados acabam indo para a guia 2 mesmo. Existe algum comando para complementar o comando de salvar para escolher a a guia para salvar? Tentei usando worksheet mas não deu certo. Desde já agradeço pela ajuda! Obrigado! EXPORTAR DADOS PROJETO.zip
  10. @LaerteB Boa noite! Muito obrigado! vou testar e te dou um retorno .
  11. @LaerteB @LaerteB Boa noite! Realizei os testes, no entanto, da um erro no código do transferir dados - exportar (nome do botão) Na parte de: Private Sub txtvalidar_Click() Após o código: ActiveCell.Offset(0, 9).Value = ListBox1.List(y, 9) da erro a partir do (0, 10) até o (0,15). Já na parte do: Sub RemoveItensGuia1Status() está dando error no código: Selection.SpecialCells(xlCellTypeBlanks).Select Fiz uma planilha resumida para tentar a correção nela, para que eu possa também estudar depois e comparar com a outra que você encaminhou e entender melhor o código. A senha para a opção alterar e excluir dados é: 123. Outra duvida é: existe algum código vba para atualizar a planilha depois que transferir os dados da listbox1, porque só atualiza depois que eu fecho o vba e abro novamente, rs. E se tem como colocar o código referente a soma do número de registro para ficar abaixo da list box. Tentei alguns tutoriais, mas da error porque os modelos que encontro é para soma de valores referentes a dados como número total de despesas, gastos, pagamento de salários e etc. Vide exemplo abaixo. Desde já agradeço pela disponibilidade e atenção. Estarei encaminhado o anexo do projeto resumido. EXPORTAR DADOS PROJETO.zip
  12. @LaerteB Fiquei perdido, porque não entendi como montar o painel de acordo com as informações de quem confeccionou a macro. Dei uma olhada também no site, mas ele não explicou muito. O objetivo no meu caso é enviar mensagens única notificação a cada nova solicitação interna aberta, não é mensagem em massa para contatos aleatórios, que nesse caso acredito que poderia dar problema e ser reconhecido como "Bot", meu objetivo é enviar apenas para um grupo especifico no meu trabalho e não para vários contatos. Tentei algumas macros de outros usuários, mas não funcionou porque os modelos que acho é para enviar para vários contatos ao mesmo tempo e não quero isso. . Quero fazer naquele modelo que te enviei acima, algo mais simples, direcionado e prático. , só preciso saber como fazer, rs.
  13. @LaerteB Atualmente adaptei um comando para enviar mensagem de e-mail no outlook pelo excel utilizando a mensagem da combobox1 para para um e-mail especifico e consegui. Queria tentar fazer o mesmo processo, só que com whatsapp. Comecei, mas me perdi nos códigos. O objetivo é enviar a mensagem, mas não para um contato especifico e sim para um grupo do whatsapp na empresa em que trabalho (qualidade), para que possam receber uma notificação quando um novo processo for aberto. No caso o comando deve fazer um loop para achar o nome do grupo do whatsapp especificado. A mensagem enviada deve ser a seguinte. "Prezados, uma nova solicitação de análise de soja do" & combobox1 & " foi solicitada em nosso sistema. Por favor, verificar!" Ou seja a mensagem da combobox deve ficar entre essa mensagem padrão, assim como faço na do e-mail (que esta em anexo no modelo do userform que estou encaminhando). Poderia me ajudar? Desde já agradeço. Muito obrigado! whatsapp.zip
  14. @LaerteB vou criar um novo tópico com essa dúvida, acho melhor, ai te marco. adicionado 4 minutos depois
  15. @LaerteB Era bem isso que eu precisava! ficou incrível! muito obrigado cara! Atualmente adaptei um comando para enviar mensagem de e-mail no outlook pelo excel utilizando a mensagem da combobox1 para para um e-mail especifico e consegui. Queria tentar fazer o mesmo processo, só que com whatsapp. Comecei, mas me perdi nos códigos. O objetivo é enviar a mensagem, mas não para um contato especifico e sim para um grupo do whatsapp na empresa em que trabalho (qualidade), para que possam receber uma notificação quando um novo processo for aberto. No caso o comando deve fazer um loop para achar o nome do grupo do whatsapp especificado. A mensagem enviada deve ser a seguinte. "Prezados, uma nova solicitação de análise de soja do" & combobox1 & " foi solicitada em nosso sistema. Por favor, verificar!" Ou seja a mensagem da combobox deve ficar entre essa mensagem padrão, assim como faço na do e-mail (que esta em anexo no modelo do userform que estou encaminhando). Poderia me ajudar? Desde já agradeço. Muito obrigado! :D whatsapp.zip

Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×
×
  • Criar novo...

Aprenda a ler resistores e capacitores

EBOOK GRÁTIS!

CLIQUE AQUI E BAIXE AGORA MESMO!