通过选择范围创建用户表单

Question

我是学生，有个任务很久没解决

因此，我需要创建用户窗体来计算给定范围内所有 x 的函数 y=15*x^3+7*x^2+47*x 值。用户将选择范围。

非常感谢您的帮助。

Answer 1

使用下面的子

Sub CalcFunc()
Dim YourRange As Range
Dim EveryCell, x, y

    Set YourRange = Application.InputBox("Select your range.", Type:=8)
    For Each EveryCell In YourRange
        x = EveryCell.Value
        y = 15 * (x ^ 3) + 7 * (x ^ 2) + 47 * x
        MsgBox y
    Next

End Sub

Answer 2

是的，当然可以在用户表单中实现 sub 为什么你不 google 如何在 excel 中添加用户表单。参考主页并学习 link 在下方向您的用户表单添加一个按钮，双击它 *（当您仍处于设计模式时）将相关代码放在那里，这很容易没有火箭科学如果您有任何问题，请随时询问

这里有一些 link 访问主页并了解详细信息 http://www.homeandlearn.org/getting_started_with_user_forms.html

还是没有帮助？然后访问 http://www.excel-easy.com/vba/userform.html谢谢

通过选择范围创建用户表单

Creating userform with choosing the range

excel

function

userform