Página 1 de 1

FormulaR1C1 não retorna o valor correto

Enviado: 30 Jun 2021 às 15:48
por igorguim
Pessoal, primeiramente gostaria de agradecer ao tópico e já pedir desculpas caso eu tenha postado um assunto que já tenha sido discutido ou violado qualquer outra regra que eu desconheça. Não encontrei nada parecido, mas como ainda sou iniciante, pode ser que tenha passado despercebido.

Vamos lá.

Eu já tentei diversas construções para essa macro, mas ela não me retorna o valor correto. Basicamente, eu quero que ela busque um valor em uma planilha e cole esse valor em uma célula subtraindo o valor a esquerda dela. Para simplificar, cortei boa parte do código:

saldofin = 10.5
Range("b" & 2, "b" & 2).FormulaR1C1 = saldofin & "- RC[-1]"




Basicamente quero que ela me retorne o valor de "saldofin" subtraído da célula imediatamente a esquerda dela.

Desde já agradeço a atenção de vocês.

Re: FormulaR1C1 não retorna o valor correto

Enviado: 30 Jun 2021 às 16:41
por Foxtri
Boa tarde.
Por acaso seria isso ?
Range("b2").Value = saldofin - Range("b2").Offset(0, -1)
?????
Até
Foxtri

Re: FormulaR1C1 não retorna o valor correto

Enviado: 30 Jun 2021 às 16:52
por igorguim
Obrigado Foxtri pela resposta. É praticamente isso, a diferença é que eu preciso que a formula continue ali.
no caso eu precisaria que a célula tivesse a seguinte função.
"=10,5-b1"

Na sua resposta, ele calcula o resultado e retoma na célula um valor fixo. Só que essa célula da esquerda as vezes muda o valor então o resultado ficaria errado, entende?

Re: FormulaR1C1 não retorna o valor correto

Enviado: 30 Jun 2021 às 19:38
por Foxtri
Olá
Veja se é assim:
saldofin = 10.5
Range("B2").FormulaR1C1 = "= " & """" & saldofin & """" & " - RC[-1]"
Até
Foxtri

Re: FormulaR1C1 não retorna o valor correto

Enviado: 01 Jul 2021 às 09:35
por igorguim
Foxtri,

Funcionou perfeitamente, muitíssimo obrigado. Não entendi exatamente a estrutura desse & """"&, mas funcionou. Vou tentar entender o que foi feito.

Obrigado, Foxtri.

Re: FormulaR1C1 não retorna o valor correto

Enviado: 01 Jul 2021 às 09:39
por igorguim
Não estou sabendo marcar como resolvido na sua mensagem. :?