Code qui s'incremente

Bonjour j'ai réussi à faire un petit code fonctionnel qui est lié à un tableau excel (2010) qui est naturellement modifié au fil du temps mais le code lui , il se modifie pas tout seul , donc je voudrais savoir comment faire pour que les code prennent en compte toutes les nouvelles ligne qui seront ajouté au fil du temps .
voici une partie de mon code , j’espère que cela vous suffira pour m'aider .

Private Sub TextBox1_Change()

Application.ScreenUpdating = False

Range("A5:F60").Interior.ColorIndex = 2
' Pensez à modifier le range au fil du temps pour que le tableau prennent en compte toutes les données '
ListBox1.Clear
ListBox1.IntegralHeight = False
ListBox1.ColumnCount = 1

If TextBox1 <> "" Then
For ligne = 5 To 60
' idem pour la text box qui doit etre augmenter avec le nombre de ligne '
If Cells(ligne, 2) Like TextBox1 & "*" Then
Cells(ligne, 1).Resize(, 4).Interior.ColorIndex = 8
ListBox1.AddItem Cells(ligne, 2) & " - " & Cells(ligne, 3) & " - " & Cells(ligne, 4)
' la list box prends en compte les lignes 5 à 60 du tableau et les colonnes ABC et D'
End If
Next
End If
If ListBox1.ListCount < 1 Then MsgBox " Pas d'intervention sur cette clim "
End Sub