Счетчик строк в списке Excel

[zIP]

Есть список в excel. Как сделать счетчик строк?

[Pavel55]

Не очень понятно, что за счётчик строк Вам нужен, поэтому след. варианты
Вариант 1
Взято из http://www.developing.ru/forum/topic8375.html
1) Добавте на лист столбец (например слева)
2) В первой строке после "шапки" введите в этот столбец единицу (например, это будет ячейка A2)
3) В следующую ячейку (в данном примере это будет A3) введите формулу =A2 и растяните ее автозаполнением вниз до конца вашего списка.

Вариант 2
Взято из http://www.developing.ru/forum/topic8173-0-asc-0.html
'макрос счётчик, который в столбце А увеличивает число на 1
'процедура должна быть записана в модуле текущего листа

Код: Выделить всё

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
    If Target.Column = 1 Then
       If Not IsEmpty(Target.Item(1).Value) = True Then
          If MsgBox("Вы действительно хотите удалить прежнее значение ячейки ?", vbYesNo, "") = vbNo Then
             Exit Sub
          End If
       End If
       iMax = Application.Max(Me.Columns(1))
       If Not IsError(iMax) Then
          Target.Item(1).Value = iMax + 1
       Else
          'Возможно в этом случае необходимо будет проверить корректность заполнения столбца "A"
       End If
    End If
End Sub

[zIP]

Не очень понятно, что за счётчик строк Вам нужен,

Добавляются данные в таблицу через форму. Таблица представлена в виде списка с названием полей. Одно из полей - порядковый номер строки.

Нужно сделать это поле auto_increment. Т.е. при добавлении новой строки его значение увеличивалось на 1. А при удалении строки - уменшалось.