Incrémentation dans un tableau

Désolé pour le retard dans mes réponses.

Alors après avoir vu la complexité à mettre en place cette simple fonctionnalité et surtout le fait de la partie "aléas" liée à l'utilisation des macros et VBA selon la configuration de la machine, j'ai décidé de revoir la copie avec Excel.

Les saisies seront faites via FileMaker et exportées dans Excel pour analyse uniquement.

Merci en tout cas à tous

Bonjour

Voici une solution avantageuse pour l'exemple; en cliquant sur l'une des cellules juste après le tableau

A savoir les cellules dans les colonnes de D a H; l'incrementation se fait dans la cellule de la colonne D.

bonjour le fil,

la macro de LouReeD modifiée (on utilise complètement le tableau structuré)

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

     With Me.Range("COMMANDES_TBL").ListObject     'le TS
          With .Range
               If .Row + .Rows.Count <> Target.Row Then Exit Sub     'on n'est pas sur la ligne suivante du TS = EXIT
               If Target.Column < .Column Or .Column + .Columns.Count <= Target.Column Then Exit Sub     'on n'est pas dans les mêmes colonnes que le TS = EXIT
          End With

          If .ListRows.Count = 0 Then        'le TS est encore vide
               .InsertRowRange.Cells(1) = 1
          Else
               .ListRows.Add.Range.Cells(1) = Application.Max(.ListColumns(1).DataBodyRange) + 1     'le max de la première colonne +1
          End If
     End With

End Sub