Bonjour les ptis loups

J'aimerai mettre une boucle dans ce petit programme. Le but est de dire que tant que la valeur du label76 n'est pas egale à la valeur de la textbox2, je copie et colle des cellules une fois que la valeur du label76 est egale à la textbox 2 je sort de la boucle et j'arrive à ma msgbox. avec DO et LOOP on peux faire quelque chose??? merci
Private Sub CommandButton6_Click()
If Label76.Caption = textbox2.Value Then
MsgBox "Le chariot demandé est arrivé au capotage de déchargement"
Else
Range("A1:A164").Select
ActiveWindow.SmallScroll down:=1
Selection.Cut Destination:=Range("A2:A165")
Range("A165").Select
ActiveWindow.SmallScroll up:=1
Selection.Cut Destination:=Range("A1")
End If
End Sub