gpt4 book ai didi

excel - 将未知变量添加到 Excel

转载 作者:行者123 更新时间:2023-12-03 02:36:58 25 4
gpt4 key购买 nike

这是我的 TI CAS 的屏幕截图: TI-CAS

我想对 Excel 文件执行相同的操作。我想将“x”放入一个单元格中,并让其他单元格用它进行计算。

有没有办法向 Excel 添加“未知变量”?我不希望它解决任何问题,但我需要具有如下值:0.06*x+66000

编辑

例如,如果 D2 = x 且 E3 = 2,如果我在单元格中输入“=D2-E3”,我希望得到“x-2”。

编辑

“x”必须被计算,而不仅仅是连接。它必须简化下一个方程,如屏幕截图所示。例如,如果您有:A1: x-2A2: 3,如果您有:A3: =A1*A2,您应该有:3x-6

最佳答案

这是一个用户定义的函数。

enter image description here

还有代码...

Public Function MakeEqn(inputStr As String) As String
Dim tempStr As String
Dim rngStr As String

Dim myRng As Range
Dim iLoop As Long, jLoop As Long

Application.Volatile

tempStr = ""
Set myRng = Nothing
iLoop = 1
Do While iLoop + 1 <= Len(inputStr)
On Error Resume Next
For jLoop = 2 To 4
rngStr = Mid(inputStr, iLoop, jLoop)
Set myRng = Range(rngStr)
If Not myRng Is Nothing Then Exit For
Next jLoop
On Error GoTo 0
If myRng Is Nothing Then
tempStr = tempStr & Mid(inputStr, iLoop, 1)
Else
tempStr = tempStr & myRng.Value
Set myRng = Nothing
iLoop = iLoop + jLoop - 1
End If
iLoop = iLoop + 1
Loop

MakeEqn = tempStr
Set myRng = Nothing
End Function

关于excel - 将未知变量添加到 Excel,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/36683405/

25 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com