Private Sub CommandButton2_Click()If MsgBox("Capacity Payment Structure Up-to-date?", vbQuestion + vbYesNo) <> vbYes Then Run
Range("D4").Select
Selection.Copy
Sheets("Rate Analysis").Select
Range("L40").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone...