Access - AddItem - Combox

Hola. Podíais decirme cómo agregar valores en un cuadro combinado, de tipo origen de fila "Lista de Valores". Quiero agregarlos en tiempo de ejecución, pero no me sale lo siguiente:

If Me.IdInforme.Value = "CI" Then
Me.Tipo.RowSourceType = "Value List"
Me.Tipo.AddItem "Informe1", "Informe2"..
End If

Además, quiero agregar una segunda columna con el valor de código que quiero guardar.

Muchas gracias y buen finde!!!!