VBA: faire une boucle sur un select case

Salut les gars,

Je suis débutante en VBA et j'aimerais regrouper les données de la colonne C vers la colonne D sous un nom different comme vous pouvez le voir dans mon code ci-dessous. Le code fonctionne sur une cellule mais j'aimerais l'appliquer à toute la colonne. pourriez-vous m'aider à mettre en place une boucle qui tourne bien.
Merci d'avance. 🙄

Sub Voiture()


Select Case Cells(2, 3).Value

Case "Renault", "Peugeot", "Citroen"
Cells(2, 4).Value = "Fra"

Case "Ferrari"
Cells(2, 4).Value = "Ita"

Case "BMW"
Cells(2, 4).Value = "All"

End Select

End Sub