Mettre plusieurs résultats dans une inputbox

Bonjour, voila j'utilise VBA depuis peu et je suis bien embêter.

Mon code devrait me servir à identifier, dans un tableau, toutes les factures d'un client à partir de son nom. Le problème est que je n'ai aucune idée de comment faire car il ne m'affiche que la première facture qu'il trouve et je voudrais qu'il les affiche toute.

Sub Bouton23_QuandClic()
Dim nomclient As String
Dim ligne As Integer
Dim facture As String
nomclient = InputBox("Entrer le nom du client")
ligne = 2
facture = ""
For ligne = 2 To 200
If Cells(x, 3) = "" Or Cells(x, 3) <> nomclient Then
ElseIf Cells(x, 3) = nomclient Then
facture = Cells(x, 9)
End If
Next
MsgBox ("facture:")

End Sub

Merci d'avance pour votre réponse!