Questione : Oggetto Excel Required di errore RunTime 424 di VBA

Ciao i tipi, il

I hanno avuti certo aiuto ECCELLENTE con un esperto di qui sull'ottenere il mio userform che va ed appena una piccola piccola cosa sta accadendo, io sto ottenendo un oggetto di errore runtime 424 richiesto ed è punto culminante questa linea

If c.Value & ““& c.Offset (0, 1).Value = cmbnames. Testo e c.Offset (0, 5).Value = txtTrainSessionNo.Text Then


Here è il codice qui sotto: il wb secondario del
Dim del btnSubmitStats_Click del
Private () come Workbook
oscura la WS come Worksheet
rng1 fioco come Range
rng2 fioco come Range
c fioca come Range
s fioca come
di Integer
stabilito wb = ActiveWorkbook
stabilito la WS = ActiveSheet
stabilito rng1 = la WS. Gamma (“G2: G„ & (gamma (“G65536„). .Row dell'estremità (xlUp)))
del
per ogni c in rng1
se c.Value &„ “& c.Offset (0, 1).Value = cmbnames. Testo e c.Offset (0, 5).Value = txtTrainSessionNo.Text Then
c.Offset (0, 6).Value = txtWrittenAssess.Text
c.Offset (0, estremità If
Next
cmbnames.SetFocus
di cboGrade.Text
se <> 0 Then
di cmbnames.ListCount per i = 0 a cmbnames.LineCount - 1
se cmbnames. Lista (i) = cmbnames. Cmbnames di If
di conclusione di If
Next
di conclusione di Then
cmbnames.RemoveItem (i)
. Il
End Sub

I del "" = di valore realmente non può vedere male qualche cosa con esso perché questo ha cominciato soltanto accadere dopo cambiando un txt sistemare ad una casella combinata sul userform. il

File è attaccato qui sotto: l'aiuto del

Any sarà appreciated
cheers class= " lastRow del

>Attachments " di nome " del class= del class= " valore " del

il