Ir ao conteúdo
  • Cadastre-se

João Paulo Lucas

Membros Plenos
  • Total de itens

    40
  • Registro em

  • Última visita

  • Qualificações

    N/D
  1. Obrigado Tenho um outro problema. Como executar uma macro, a partir de uma das opções de uma lista suspensa ? Obrigado
  2. Boa tarde Mediante um procv identtifico o conteudo na planilha1 de uma celula que este em outra planilha. Como substituir o conteudo da celula da outra planilha
  3. Boa Noite Procuro ajuda para o seguinte: - Numa coluna está inscrito os nomes de várias pessoas. Procuro uma forma de substituir, somente parte do nome, mantendo o resto nome já existente. Ex. Maria dos Santos Valerio Na minha coluna, tenho várias Marias, porém pretendo substituir, as 'Marias que eu quiser por 'Ana', mantendo o resto do nome Em vba Obrigado
  4. Boa tarde Incluo aqui o código que o Sr. Basole colocou. A minha questão é a seguinte: - Como marcar a linha toda a amarelo, depois da localização ser feita. Neste caso, marca somente a(s) célula(s) encontradas Muito Obrigado Dim y As Integer, rSearch As Range, RangeFim As Range LblOcorrencias.Caption = Empty n = 0 Set rSearch = PROFISSIONAIS.Range("c12", Range("c1000").End(xlUp)) y = rSearch.Rows.Count Set RangeFim = Range("c" & y) LocalizarString = Me.TextBox1.Value If LocalizarString <> "" Then With rSearch Set rng = .Find(LocalizarString, after:=RangeFim, SearchOrder:=xlByRows) If Not rng Is Nothing Then .Interior.ColorIndex = xlNone rng.Interior.ColorIndex = 6 Localizar = LocalizarString PrimeiraCelula = rng.Address VaiEndereco = rng.Address n = 1 Else MsgBox "Item Não Existe ", vbInformation End If End With End If Set rng = Nothing End Sub
  5. Boa tarde Basole como é que você, escreveu o botão Ativar ? Obrigado
  6. Bom dia Macro que execute o seguinte: Se uma dada célula, fôr menor que 0, o PDF não é gerado Obrigado
  7. Boa tarde Gostaria de criar uma macro que verificasse o seguinte: Se uma determinada célula fôr menor que 0, o que sgnifica que não foi preenchida, então o PDF não é gerado. Se fôr maior que 0, então sim Obrigado
  8. Bom dia Tenho o seguinte código, que funciona Private Sub WorkBook_Open() Dim Fechar As Date Fechar = Now + TimeValue("00:30:00") Application.OnTime Fechar, "sair" End Sub Como poderei, colocar uma mensagem, no momento em que a aplicação entra no ar, informando que encerra após 30 minutos? Obrigado
  9. Boa tarde Através de uma planilha, por exemplo planilhaA, tenho uma hiperligação para outro livro, por exemplo inventario. Pretendo a partir desse momento, executar macro pertencente a inventario Obrigado
  10. Boa tarde Resolvido Muito Obrigado
  11. Boa tarde Como sair do livro excel, de forma automática, após um determinado tempo Obrigado
  12. Muito Obrigado De todo o modo a opção Boletim 0, não funciona, é devolvido sempre caminho errado
  13. @DiF Boa tarde A partir do código que enviei não sei como colocar os links a funcionar Obrigado
  14. Boa tarde Tenho uma lista pendente, em HTML. No entanto não consigo executar nada. Podem ajudar-me Segue o código <form name="dropdown"> <label>Boletins</label> <select name="list" accesskey="E"> <option selected="">Sselecione o Boletim <option value="href=../../observatorio/ano201920/Boletim1.pdf" <option value="http://www.google.pt">Boletim2 <option value="http://www.search.com/">Boletim3 <option value="http://www.dogpile.com/">boletim4 <select> <input type="button" value="Go" onclick="goToNewPage(document.dropdown.list)"></select></select></form> Obrigado

Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas publicações 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...

Eletrônica

PROMOÇÃO DE QUARENTENA

Aproveite o isolamento social para aprender eletrônica!
De R$ 39,90 por apenas R$ 19,90
Só até as 23h59min desta sexta-feira 10/04/2020

CLIQUE AQUI E COMPRE AGORA MESMO!