Utilisation d'une liste - VBA

Bonjour à tous. J'ai un petit problème dans mon code. J'utilise deux ComboBox dans un projet que je viens de créer. En gros, je choisis une valeur dans la première liste qui permet à la deuxième liste de trouver une autre valeur. Voila le code : (Je l'ai simplifier pour que vous compreniez mieux)

Dim SheetName1 As String

SheetName1 = ComboBox1.Value

ComboBox2.RowSource = "'SheetName1'!F1:F" & Sheets("SheetName1").Range("A" & Rows.Count).End(xlUp).Row

Sauf que ca ne fonctionne pas. (Je mentionne que les valeurs dans le comboBox1 sont le nom EXACT de chacune de mes feuille).

Quelqu'un peut m'aider ?

Bonjour

A tester

C'est excellent, merci beaucoup cela vient de régler mon problème !