Автозаполнение и корректировка формул Excel

Question

Я сделал код, который добавляет столбцы в конец диапазона с функцией автозаполнения в VBA. Поэтому, когда столбец в начале диапазона удаляется, код добавит столбец в конец диапазона. Так что ассортимент всегда одного размера. Диапазон, который я имею в виду, - это, например, столбец N до столбца DA.

Все это работает отлично, за исключением одного. В столбце E (перед диапазоном N - DA) у меня есть формула, которая суммирует определенный диапазон в диапазоне N - DA. Чтобы определить, какой диапазон необходимо суммировать, я проверяю значение (номер недели) в диапазоне N - DA. Но когда столбец добавляется в конце, формула в столбце E не корректируется для повторного расширения до столбца DA.

Итак, как я могу сделать так, чтобы формула в столбце E корректировалась до столбца DA, когда Я использую автозаполнение в VBA? Когда я делаю это вручную с выделением и перетаскиванием вправо на листе, это тоже не работает.

Answer 1

В вашем VBA после добавления в столбец в конце добавьте код, который будет корректировать формулу. Например, предположим, что ваша формула суммы такова:

=SUM(N1:DA5)

У вас уже есть новый последний столбец в переменной (я предполагаю), поэтому используйте его для корректировки формулы. Вы можете программно вставить формулу примерно так:

newLastColumn = "DB"
Range("E1").Formula = "=SUM(N1:" & newLastColumn & "5)"