Isso deve gerar uma referência circular (acho...)

Tente postar a planilha.

Abs,

Parece uma pouco complicado mas vou tentar explicar.

Tenho as seguinte células.

A1 = 300
B1 = 1000
B2 = 1000

Gostaria de saber se tem como uma seguinte fórmula. Se B1 for diferente de B2, alterar o valor de A1 (para mais ou para menos) até B1 ficar igual a B2.

Porque por tráz de tudo isso, tem um cáculo a partir de A1 qual da origem ao valor de B1.

Posta sua planilha ai brother.. Abs

boa noite!!

Oi maninhx, veja se isso te ajuda

Abra o Edito VBA, Alt + F11, do lado esquerdo Plan1 (Plan1), cole o código, e faça os testes

Private Sub Worksheet_Change(ByVal Target As Range)

    If Target.Cells.Count > 1 Then Exit Sub
    If Intersect(Target, Columns("B:B")) Is Nothing Then Exit Sub
    If Not IsNumeric(Target.Value) Then Exit Sub
    
    Application.EnableEvents = False
    
    If (Target.Row Mod 2) = 0 Then
        Select Case Target - Target.Offset(-1, 0)
            Case Is = 0
              
                Target.Offset(-1, -1) = 0
            Case Is > 0
              
                Target.Offset(-1, -1).Value = Target.Value - Target.Offset(-1, 0).Value
                Target.Offset(-1, 0).Value = Target.Value
            Case Is < 0
             
                Target.Offset(-1, -1).Value = Target.Value - Target.Offset(-1, 0).Value
                Target.Value = Target.Offset(-1, 0).Value
        End Select
    End If
    
    Application.EnableEvents = True
        
End Sub