蔡諝的窝

摘要： 出于提高效率的原因，希望excel能够不需要人为干预的完成一些操作，学习excel宏的编写与调试：第一列输入公式，第二类输出计算结果：（如果自动获取文件的行数，待补充）Sub Calc()a = [a1].Value[b1].Value = Evaluate(a)a = [a2].Value[b2].Value = Evaluate(a)a = [a3].Value[b3].Value = Evaluate(a)End Sub改进：自动识别行数Sub Calc() Dim i As Long, lastRow As Long lastRow = GetLastRow(Workshe... 阅读全文