Не применять формулу к последней строке

Я пытаюсь добавить последнюю строку, а затем поместить формулы в определенные ячейки в этой последней строке. Когда я запускаю то, что у меня есть, он добавляет формулу к последней строке OLD, а не той, которую я недавно создал. Вы можете помочь?

Sub AddDataRow() Dim tableName As String Dim sheet As Worksheet Dim table As ListObject Dim lastRow As Range tableName = ActiveSheet.ListObjects(1) Set sheet = Range(tableName).Parent Set table = sheet.ListObjects.Item(tableName) If table.ListRows.Count > 0 Then Set lastRow = table.ListRows(table.ListRows.Count).Range If Application.CountBlank(lastRow) < lastRow.Columns.Count Then table.ListRows.Add End If End If lastRow.Columns("L").Formula = "=A1+B1" End Sub 

Если вы добавите строку, то ваша последняя строка перемещается на одну строку.

вам нужно будет снова определить свою последнюю строку перед lastRow.Columns("L").Formula = "=A1+B1" .

Добавьте еще один Set lastRow = table.ListRows(table.ListRows.Count).Range перед строкой выше.

  • Извлечь два имени из строки
  • Суммируйте три разных числа в одной ячейке
  • Просмотр столбцов в Excel с помощью VB.NET - Борьба за просмотр столбцов «AB» и т. Д.
  • Преобразуйте строку с каратом в число (и оцените)
  • Пространство не пространство на строке
  • Строить строку идентификатора из компонентов, включая первую и последнюю буквы от имен
  • Код Excel VBA, вводящий правильные номера
  • C # excel interop: значения DateTime не выписаны последовательно
  • Чтение строк в Matlab от excel?
  • Ошибка при использовании String as Range (VBA Excel)
  • Проблема с InStr и Left для возврата правого текста из строки
  • Interesting Posts

    Получить динамический диапазон столбца в таблице

    Как указать строковый путь для открытия файла excel?

    Excel Macro не находит следующую пустую строку, просто переписывая последнюю

    ClosedXML и C #: Как свернуть строки по умолчанию?

    Для всех экземпляров, где столбец a = конкретное значение, проверьте, содержит ли столбец b текст

    Выберите CheckBox с другого листа

    Как выбрать диапазон ячеек в верхней копии таблицы с помощью VBA?

    Excel применяет условное форматирование на основе внешнего диапазона ячейки

    Как я могу поручить excel выполнить мой .xla-файл автоматически при запуске?

    C # Excel interop – как проверить, работает ли объект interop и выполняет ли задание?

    Отчет Dynamic Excel 2010 по службам анализа MS Cube с использованием параметров

    Формула Excel в пространстве вне диапазона в зависимости от другой переменной

    Импорт изображений из таблицы Excel в таблицу SQL Server C #

    Функция Excel Len

    Excel Macro, пауза перед печатью

    Давайте будем гением компьютера.