我怎样才能使公式的一部分变化？

I am trying to make just a part of the code change while the worksheet change, but it does not work. Changing from one worksheet to other is OK, but the changing integer do not work in the code. I create the J Integer to grow in one unit as the worksheet change. Therefore, the graph and the shapes are based on another Sheet (Dados) which has the data in different lines to provide the information to each worksheet.I am trying to make just a part of the code cha