Ir para conteúdo
Fórum Script Brasil

Raphael Menezes

Membros
  • Total de itens

    1
  • Registro em

  • Última visita

Sobre Raphael Menezes

Raphael Menezes's Achievements

0

Reputação

  1. Boa tarde, estou tentando fazer um script que pega a informação de uma célula (C5), cola em outra célula (U5). Até aí tudo bem. Isso se faz necessário pois a célula C5 tem variáveis e na U5 eu já colo como valores. Em U5 eu aperto F2, seleciono tudo, copio e alterno a janela, para poder colar o conteúdo no whatsapp, para não ficar como imagem o que eu colar no whatsapp. Eis o código: Private Sub CommandButton1_Click() Range("C5").Copy Range("U5").PasteSpecial (xlPasteValues) Range("U5").Select SendKeys ("{F2}"), True SendKeys ("^(a)"), True SendKeys ("^(c)"), True SendKeys ("{ENTER}"), True SendKeys ("%({TAB})") SendKeys ("^(v)"), True End Sub Sendo que antes de alternar a janela, ele meio que copia novamente a célula C5 É tanto que eu já deixei como comentário a linhas que dá o ALT TAB e o Colar e ele faz tudo certo, mas quando entra a linha onde tem: "SendKeys ("%({TAB})")" aí não funciona do jeito que gostaria.
×
×
  • Criar Novo...