Dim resetRow As Integer resetRow = Range("C10").Value Range("F" & (resetRow) & ":I" & (resetRow)).Formula = "=G10_Anchor+short_end_increment*(base_year-F$57)" Range("K" & (resetRow) & ":L" & (resetRow)).Formula = "=G10_Anchor+short_end_increment*(base_year-F$57)" Range("G10_anchor_range").Formula = "=G10_Anchor" Range("CEE_anchor_range").Formula = "=CEE_Anchor" Range("CEE_anchor_range").Formula = "=CM_Anchor" End Sub
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)