Pasando al proyecto en si, el tema es que Intente la siguiente formula pero no funciona:
Código:
Private Sub cmdGuarda_Click()
cnn.Execute "INSERT INTO Tabla1 " & "(campo1,campo2,campo3,campo4,campo5) VALUES('" & _
Option1(0) & "','" & _
Option1(1) & "','" & _
Option1(2) & "','" & _
Option1(3) & "','" & _
Combo8 & "','" & "')"
rs.Requery 1
DoEvents
Unload Me
Set FrmDatos = Nothing
Desde ya les agradezco la ayuda, hace tiempo que no participo por razones de indole laboral pero volvi a las fuentes digamos,