Question

我是一名学生，并且有一项长期无法解决的任务。

因此，我需要创建userform，它将计算给定范围内所有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

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

这里有一些链接访问Home并了解这是详细的 http://www.homeandlearn.org/getting_started_with_user_forms.html

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

选择范围创建userform

2 个答案: