TextBox condicionado a un ComboBox

Hola a todos

Deseo a través de un formulario rellenar una base de datos

En la columna B tengo matrícula de coches, y en la columna C los tipos diferentes de coches. En un UseForm tengo un ComboBox que al seleccionar un coche determinado, deseo se añada automáticamente en un TextBox1 su matrícula correspondiente. Al Aceptar se deben introducir el tipo de coche en la celda R66 y la matrícula en la R69.

Un cordial saludo

Éste es el código que tengo, pero no sé cómo condicionar el TextBox con el ComboBox:

Sub introducirdatos()
UserForm1.Show
End Sub
Private Sub ComboBox1_Change()
End Sub
Private Sub CommandButton1_Click()
ComboBox1.SetFocus
Range("R66") = ComboBox1
Unload UserForm1
End Sub
Private Sub TextBox1_AfterUpdate()
TextBox1.Value = Format(TextBox1, "#,##0.0000")
Range("R69").Value = CDbl(TextBox1.Value)
End Sub
Private Sub TextBox2_AfterUpdate()
TextBox2.Value = Format(TextBox2, "#,##0.0000")
Range("R70").Value = CDbl(TextBox2.Value)
End Sub
Private Sub UserForm_Click()
End Sub