Курсовая работа: Статистический анализ деятельности предприятия

Range("C114").Select

ActiveCell.FormulaR1C1 = "=R[-76]C[-1]"

Range("C114").Select

Selection.AutoFill Destination:=Range("C114:H114"), Type:=xlFillDefault

Range("C114:H114").Select

Range("A107").Select

ActiveCell.FormulaR1C1 = "=R[-70]C[9]"

Range("A108").Select

ActiveCell.FormulaR1C1 = "=R[-71]C[10]"

Range("A109").Select

ActiveCell.FormulaR1C1 = "=R[-72]C[11]"

Range("A110").Select

ActiveCell.FormulaR1C1 = "=R[-73]C[12]"

Range("A111").Select

ActiveCell.FormulaR1C1 = "=R[-74]C[13]"

Range("K107").Select

ActiveCell.FormulaR1C1 = "="

Range("K107").Select

ActiveCell.FormulaR1C1 = "=R[-69]C[-1]"

Range("K108").Select

ActiveCell.FormulaR1C1 = "=R[-70]C"

Range("K109").Select

ActiveCell.FormulaR1C1 = "=R[-71]C[1]"

Range("K110").Select

ActiveCell.FormulaR1C1 = "=R[-72]C[2]"

Range("K111").Select

ActiveCell.FormulaR1C1 = "=R[-73]C[3]"

Range("K112").Select

ActiveWindow.SmallScroll Down:=9