For Loop Vba Excel Triangular Numbers