ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

½Ð°Ý­n¦p¦óŪ¤J¥t¥~¤@­Ó¥¨¶°ªº¯x°}©O

½Ð°Ý­n¦p¦óŪ¤J¥t¥~¤@­Ó¥¨¶°ªº¯x°}©O

§Ú¦³¨â­Ó¥¨¶° µ{¦¡³£º¡ªøªº
©Ò¥H·|¥Î©I¥s¥t¥~¤@­Ó¥¨¶°ªº¤è¦¡¶i¦æ³B²z
·Q­nÅýreserve_table_Calculation ª½±µ¦bvbaªº¦a¤è ±Noutput_RBC ©Ò²£¥Íªºrbc(m) ª½±µÅª¤Jrbc1((k - 1) * MO + M, 1) ¸Ì­±?


Sub reserve_table_Calculation()
....
           Worksheets("Input").Range("C4") = 15 + I * 20
           Worksheets("Input").Range("C5") = j
..
     '' Produce reserve_result  & rbc_result
          For k = 1 To b Step 1   'scenario
           
            Worksheets("Month_P").Range("CL18") = k
            
            Call RBC_Main            
            Application.Calculation = xlCalculationAutomatic
            Application.Calculation = xlCalculationManual
            For M = 1 To MO Step 1
              
'                   rbc1((k - 1) * MO + M, 1) = ???color]            
               Next M
         Next k
End Sub

Sub output_RBC()
  Worksheets("Month_P_RV").Select
  Range("ref_AG37").Select
  For m = 1 To mo
    ActiveCell.Offset(T - 1, 2).Value = RBC(m)
  Next T

·PÁ¦U¦ì¤F

TOP

        ÀR«ä¦Û¦b : ¤f»¡¤@¥y¦n¸Ü¡A¦p¤f¥X½¬ªá¡F¤f»¡¤@¥yÃa¸Ü¦p¤f¦R¬r³D¡C
ªð¦^¦Cªí ¤W¤@¥DÃD