error en el método range
Publicado por Celso (2 intervenciones) el 23/10/2022 16:37:54
Buenas.
No estoy consiguiendo localizar el error en el vba excel
el error es error en el metodo range de objeto global
Public Sub ModificarContactos()
Set con = New Clsconexion
con.Actualizar ("contactos")
con.rst.Find "id='" & Range("B" & Fila) & "'"
con.rst.Fields("documento").Value = Range("C" & Fila).Value
con.rst.Fields("nomape").Value = Range("D" & Fila).Value
con.rst.Fields("Dir").Value = Range("E" & Fila).Value
con.rst.Fields("cel").Value = Range("F" & Fila).Value
con.rst.UpdateBatch
con.rst.Requery
Set con = Nothing
MsgBox "Registro actualizado con exito", vbInformation, "atención"
End Sub
No estoy consiguiendo localizar el error en el vba excel
el error es error en el metodo range de objeto global
Public Sub ModificarContactos()
Set con = New Clsconexion
con.Actualizar ("contactos")
con.rst.Find "id='" & Range("B" & Fila) & "'"
con.rst.Fields("documento").Value = Range("C" & Fila).Value
con.rst.Fields("nomape").Value = Range("D" & Fila).Value
con.rst.Fields("Dir").Value = Range("E" & Fila).Value
con.rst.Fields("cel").Value = Range("F" & Fila).Value
con.rst.UpdateBatch
con.rst.Requery
Set con = Nothing
MsgBox "Registro actualizado con exito", vbInformation, "atención"
End Sub
Valora esta pregunta
0
