Excel:如何用用户输入修改的代码填充单元格?

Excel:如何用用户输入修改的代码填充单元格?,excel,if-statement,module,nested,user-input,Excel,If Statement,Module,Nested,User Input,我有以下声明: =IF([Year]=2016,IF([Condition]="XClean",72,IF([Condition]="Clean",72,IF([Condition]="Average",72,IF([Condition]="Rough",72,0))))) 我将这个IF语句嵌套在一个单元格中55次,以填充11年的时间范围(从2016年到2005年)。我对多个作业使用该公式。我想知道是否有办法创建一个模块,在这里我可以输入一个单元格坐标来替换[Year],输入另一个单元格坐标来

我有以下声明:

=IF([Year]=2016,IF([Condition]="XClean",72,IF([Condition]="Clean",72,IF([Condition]="Average",72,IF([Condition]="Rough",72,0)))))
我将这个IF语句嵌套在一个单元格中55次,以填充11年的时间范围(从2016年到2005年)。我对多个作业使用该公式。我想知道是否有办法创建一个模块,在这里我可以输入一个单元格坐标来替换[Year],输入另一个单元格坐标来替换[Condition],以及一个我希望填充公式的单元格

这就是我所处的困境:

Sub MaxTerm()
Dim year As Range         '[Year]'
Dim condition As Range    '[Condition]'
Dim origin As Range       'first cell of the column I want to populate'

year = InputBox("what is the coordinate for model year?")
condition = InputBox("what is the coordinate for the condition of the vehicle condition?")
origin = InputBox("what is the origin?")

非常感谢您的帮助

以获得范围

Sub dural()
   Dim origin As Range
   Set origin = Application.InputBox(Prompt:="click on origin cell", Type:=8)
End Sub
请注意,我们使用设置

请注意,我们可以使用鼠标或在字段中键入地址。

这很有帮助,但如何将用户输入的值输入到第一行代码中,并将该代码放入原始单元格?@chadochinqo根据您的帖子,我们将为原始范围设置一个,一组用于年份范围,一组用于条件范围……然后,我们将使用origin.address等来生成公式。