Перенумеровать строки после перемещения

Question

У меня есть электронная таблица с 25 рядами задач.Если задача становится горячей темой, мне нужно переместить или перенумеровать строку, чтобы перенести ее наверх, и я бы хотел, чтобы Excel перенумеровал строки ниже в порядке возрастания.(то есть, если я изменю 19 на номер 1, все остальное будет двигаться вниз и перенумеровано в порядке возрастания).

Answer 1

Скажем, наш список задач выглядит так:

поместите этот код в область кода рабочей таблицы:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If Target.Column <> 1 Then Exit Sub
    Cancel = True
    Rows("1:1").Insert Shift:=xlDown
    Target.EntireRow.Copy Range("A1")
    Target.EntireRow.Delete
End Sub

Когда жена скажет вам, что у нее начались роды, дважды щелкните ячейку A4 , и список задач станет:

Answer 2

Итак, простой пример, просто для демонстрации:

Таким образом, вы можете сортировать и включать столбец А или нет, как вы хотите.