求一个EXCEL变量，函数

发布网友发布时间：2022-04-19 12:48

我来回答

共1个回答

热心网友时间：2023-07-14 22:30

一、定出反函数表达式

如B1=6*A1+8，则A1=(B1-8)/6，

在A1写入公式：

=(C1-8)/6

在C1输入希望值。公式下拉。

二、用宏

设数据表如下：

B列为原公式，A列为所求值，C列为B列的希望值。

打开VAB，双击Sheet1，输入代码：

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Column = 2 Then
        Range("B" & Target.Row).GoalSeek Goal:=Cells(Target.Row, 3), ChangingCell:=Range("A" & Target.Row)
    End If
End Sub

此公式非全自动，暂时写成半自动方式。

如是点击B列某单元格，VBA被执行。相应的行进行单变是求解。

首页

文章

求一个EXCEL变量，函数