使用另一个子区域修改子区域的范围

我在Excel中build立一个计算器。 用户将自己定义为一个225内置types，然后2个计算器自动填充该types的数据。

有10个数据来源填写计算器。 我已经在15×15网格中的10个不同的工作表中设置了这些数据。 每种types用户的数据被存储在10张不同纸张的每一张的同一个单元中。 （例如，如果是types20，那么结果的数据将存储在所有10页的单元格"D6"中）。

我想弄清楚如何在我的代码中更改这个引用，以便每个types的特定单元格引用被embedded，但是我没有find正确的方法来完成这个工作。 代码示例如下：

 Sub CallTypeX() Dim backendvalue As Range Set backendvalue = Range("L17") Call CallGeneralCode End Sub Sub CallGeneralCode() 'Call data for InsCalc, where backendvalue represents appropriate range for type ThisWorkbook.Sheets("InsCalc").Range("H18").Value = ThisWorkbook.Sheets("Indic2a").backendvalue.Value 'Call data for Indicator A worksheet, where backendvalue represents appropriate range for type ThisWorkbook.Sheets("IndicatorA").Range("F17").Value = ThisWorkbook.Sheets("Indic2a").backendvalue.Value ThisWorkbook.Sheets("IndicatorA").Range("F18").Value = ThisWorkbook.Sheets("Indic3a").backendvalue.Value ThisWorkbook.Sheets("IndicatorA").Range("F19").Value = 0.44 'Call data for InsCalc, where backendvalue represents appropriate range for type ThisWorkbook.Sheets("InsCalc").Range("H19").Value = ThisWorkbook.Sheets("Indic2a").backendvalue.Value 'Call data for Indicator A worksheet, where backendvalue represents appropriate range for type ThisWorkbook.Sheets("IndicatorA").Range("F22").Value = ThisWorkbook.Sheets("Indic2b").backendvalue.Value ThisWorkbook.Sheets("IndicatorA").Range("F23").Value = ThisWorkbook.Sheets("Indic3b").backendvalue.Value ThisWorkbook.Sheets("IndicatorA").Range("F24").Value = 0.52 ' 'Move to Indicator B section [TRUNCATED CODE FOR LENGTH] 

基本上，我想弄清楚如何设置我所调用的“backendvalue”作为适当的范围types，而不必写出我调用"CallGeneralCode"为我的225个types的每个与相应的单元格引用取代。

我对VBA.很新VBA.