VBA Optimiser un bout de code

Bonjour,
Je voudrai un exemple de boucle qui me permetterais d'ecrire ce bout de code en quelques lignes seulement :
"compo.TextBox1.Value = Worksheets("BDD").Cells(7, 3).Value
compo.TextBox2.Value = Worksheets("BDD").Cells(7, 4).Value
compo.TextBox3.Value = Worksheets("BDD").Cells(7, 5).Value
compo.TextBox4.Value = Worksheets("BDD").Cells(7, 6).Value
compo.TextBox5.Value = Worksheets("BDD").Cells(7, 7).Value
compo.TextBox6.Value = Worksheets("BDD").Cells(7, 8).Value
compo.TextBox7.Value = Worksheets("BDD").Cells(8, 3).Value
compo.TextBox8.Value = Worksheets("BDD").Cells(8, 4).Value
compo.TextBox9.Value = Worksheets("BDD").Cells(8, 5).Value
compo.TextBox10.Value = Worksheets("BDD").Cells(8, 6).Value
compo.TextBox11.Value = Worksheets("BDD").Cells(8, 7).Value
compo.TextBox12.Value = Worksheets("BDD").Cells(8, 8).Value"

J'ai un niveau VBA intermédiaire.
Merci d'avance,