Décalagedes cellules de BAS vers le HAUT

[Ilino]

Forum Bonjour
ci joint une partie du code

Range("A2:C2").Select
  Selection.Insert Shift:=xlDown <------------ incrémenter
  ActiveWindow.ScrollColumn = 1
  Range("A2").Select
  Range("A2").Value = TextBox1.Value
  Range("B2").Value = ComboBox1.Value
  Range("C2").Value = TextBox2.Value

si j'ai bien compris, il fait le décalage de HAUT vers le bas (la nouvelle donée est affichée dans la celluleA2)
je souhaite faire le decallage aprtir de la derniere ligne non vide
A+