Afficher dans une combobox les éléments d'une feuille excel

Bonjour à tous,

très débutante en VBA je tente de m'initier en créant une base de données pour une bibliotheque.

J'ai créé une UserForm pour les nouvelles réservations qui s'enregistrent sur la feuille 3 du classeur, dans laquelle j'ai mis une Combobox qui devrait afficher les titres des livres qui sont sur la Feuille 2 de mon classeur.
Cependant, je n'arrive pas a afficher ces titres dans la Combobox.

J'ai lu pas mal de postes à ce sujet sans y comprendre grand chose !

Voila mon code so far :

Private Sub CommandButton1_Click()
'sauvegarder les données sur la feuille 1
Dim nom As String
Dim prenom As String
Dim titre As String
Dim dateretour As String


Feuil3.Activate
Range("A1").Select
'je me met en A1
'Tant que la cellule active n'est pas vide
While ActiveCell.Value <> ""
ActiveCell.Offset(1, 0).Select
Wend
'maintenant je suis sur une cellule vide
nom = TextBox1.Value
prenom = TextBox2.Value
titre = ComboBox1.Value
dateretour = TextBox4.Value

ComboBox1.AddItem Sheets("Feuil2").Range("A2")


ActiveCell.Value = nom
ActiveCell.Offset(0, 1).Value = prenom
ActiveCell.Offset(0, 2).Value = titre
ActiveCell.Offset(0, 3).Value = dateretour


ThisWorkbook.Save
End Sub


Par avance je remercie toutes les bonnes volontés de leur aide.