自建公式，VBA在Excel中解一元一次方程
文章目录
前言
小学必考内容：一元一次方程。
只要将方程输入到Excel工作表单元格内，VBA代码可以快速识别方程未知数，求得未知数系数和常数值，使用自建公式，一拖一拉，快速求解一元一次方程。
一、运行效果图
二、操作思路
1、查找方程中未知数，未知数可以是”A-Z”和”a-z”遍历方程字符串，凡为以上字母，均将替换；
2、计算常数，将上述查询到的字母替换成“0”，将方程“=”两边分成两个数组，左边数组数值计算得数后（-1）后与右数数组数值相加；
3、计算未知数系数，将上述查询到的字母替换成“1”，将方程“=”两边分成两个数组，右边数组数值计算得数后（-1）后与左数数组数值相加，再加上2中得出的常数值，即为未知数系数。
4、常数除以未知数系数，即为未知数值。
优点：未知数可以是26个字母大小写，适用于大多数方程式。
缺点：常数只能是数值，不能是字母。
如不符合实际需求，有兴趣的童鞋可以修改未知数和常数的判断条件。
三、代码
1.去除方程中未知数，将未知数转为“*0”
Function DelX(str As String) As String
Dim c As String
Dim i As Integer
Dim tmp As St原文地址：https://blog.csdn.net/BeijixingVBA/article/details/139105523
免责声明：本站文章内容转载自网络资源，如本站内容侵犯了原著者的合法权益，可联系本站删除。更多内容请关注自学内容网（zxcms.com）！