代码之家  ›  专栏  ›  技术社区  ›  Reno

Excel VBA循环访问命名范围

  •  0
  • Reno  · 技术社区  · 7 年前

    SensitivityResults ). 如何让Excel从本质上说:

    Range("Scenario1").Value = Range("SensitivityResults").Value
    
    Range("Scenario2").Value = Range("SensitivityResults").Value
    
    Range("Scenario2").Value = Range("SensitivityResults").Value
    

    等。。。

    Dim i As Integer
    Dim s As Integer
    
    For i = 1 To 20
      For s = 1 To 20 
        Range("Active_Scenaro") = s
        Calculate
        Range("Scenario(i)").Value = Range("SensitivityResults").Value
      Next s
    Next i
    
    1 回复  |  直到 6 年前
        1
  •  3
  •   Pᴇʜ    7 年前

    你只需要加上计数器 i 作为固定名称的字符串 Scenario

    Range("Scenario" & i).Value = Range("SensitivityResults").Value