Sub TestTableauDynamiquePlageExcel() ' Déclare le tableau Dim strNames() As String ' déclare un nombre entier pour compter les lignes d'une plage Dim n As Integer ' Déclaration d 'un nombre entier pour la boucle Dim i As Integer ' Compte les lignes d'une plage n = Range("A1", Ra...