Excel Error en el método 'Value' de objeto Range

Tengo el siguiente código que:

1-. El usuario da un click sobre un item de un listbox

2-. Llena dos texbox con código de producto y nombre de producto

3-. El usuario debe escoger la unidad de medida de un listbox y en un textbox digita con la cantidad.

4-. Tengo un botón que me envía los datos a una hoja temporal para luego llenar otro listbox con lo escogido.

Pero al cuando se hace esta operación más de tres veces me saca "Error en el método 'Value' del objeto 'Range' y no entiendo porque... Comparto el código para que por favor un experto me ilustre y colabore.

de antemano mil gracias...

Saludos..

Jforero

Private Sub btnAgregaMaterial2_Click()
'Envía datos del item de material a la hoja temporal y al listbox
Worksheets("TemPDM").Range("a" & Rows.Count).End(xlUp).Offset(1).Resize(, 6).Value = _
Array(txbCodigoMaterialPDM2.Text, txbNombreMaterialPDM2.Text, cmbCodigoUMedida2. Value, txbUMedida2.Text, txbCantidad2.Text, txbObservacionesMaterial2.Text)

'llena el listbox con el material seleccionado
lbxProductosPedido2.RowSource = "TemPDM"
'limpia datos
txbCodigoMaterialPDM2.Text = ""
txbNombreMaterialPDM2.Text = ""
cmbCodigoUMedida2.Value = ""
txbUMedida2.Text = ""
txbCantidad2.Text = ""
txbObservacionesMaterial2.Text = ""
End Sub