Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
Colar uma fórmula d...
 
Notifications
Clear all

Colar uma fórmula do Excel via VBA

 
2024 - VBA & Macros
Post Recente por Wagner Morel 12 anos atrás
4 Posts
2 Usuários
0 Reactions
1,083 Visualizações
RSS
wolneypk
 wolneypk
(@wolneypk)
Posts: 188
Estimable Member
Topic starter
 

Senhores, estou num impasse complicado aqui!

Criei um IF, e se verdadeiro, ele deveria colar a seguinte formula em uma célula na planilha:

ThisWorkbook.Sheets("Pedidox").Range("H10").Value = "=SEERRO(PROCV(B3;Cadastro_produtosth!$A$2:$O$7000;PROCV(Resultado_busca!$G$10;Ferramentas!$AN$2:$AO$7;2;FALSO);0);)"

"ERRO EM TEMPO DE EXECUÇÃO 1004 - Erro de definição de aplicativo ou de definição de objeto"

Reparem, eu tento colar uma fórmula do Excel via VBA, e mesmo eu colocando ela entre aspas, o Excel não aceita!
Tanto que se eu pegar essa mesma fórmula e colocar qq outra palavra dentro das aspas, tipo:

ThisWorkbook.Sheets("Pedidox").Range("H10").Value = "OE"

O Excel executa o comando perfeitamente!

Oq acontece amigos?
Existe uma maneira de driblar isso?
Estou fazendo alguma coisa de errado?

"O impossível, é só uma questão de tempo"

 
Postado : 20/06/2013 11:21 am
Wagner Morel
 Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

wolneypk,

Boa Tarde!

Para inserir uma fórmula, via VBA, o comando é FormulaLocal. Assim:

    ThisWorkbook.Sheets("Pedidox").Range("H10").FormulaLocal = "=SEERRO(PROCV(B3;Cadastro_produtosth!$A$2:$O$7000;PROCV(Resultado_busca!$G$10;Ferramentas!$AN$2:$AO$7;2;FALSO);0);)"

Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)

Atenciosamente
Wagner Morel

 
Postado : 20/06/2013 11:28 am
wolneypk
 wolneypk
(@wolneypk)
Posts: 188
Estimable Member
Topic starter
 

Wagner, camarada sempre disposto a ajudar!
Muito Obrigado meu caro!
São detalhes que vamos aprendendo aos poucos em VBA!

Muito Obrigado meu amigo e um forte abraço!

"O impossível, é só uma questão de tempo"

 
Postado : 20/06/2013 11:39 am
Wagner Morel
 Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

Disponha, wolneypk.

Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)

Atenciosamente
Wagner Morel

 
Postado : 20/06/2013 11:40 am
Forum Jump:
  Tópico Anterior
Próximo Tópico