MACRO - Actualizar mi SQL Server

[omarzinho86]

buenas noches a todos, por favor su apoyo, cuando quiero actualizar mi SQL Server con ciertos datos que tengo en mi excel me sale el siguiente error.

Sintaxis incorrecta cerca de ','...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Basole]

hola,
intente esto -> cambiar este fragmento en el código:

strSql = "UPDATE dist2014" & _
        " SET ESTADO  = '" & Range("b" & CStr(intFila)).Value & "'" & _
        " WHERE TARJETA =...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[omarzinho86]

Hola Basole,

muchas gracias por tu apoyo, modifique la linea ingresando lo que me indicaste, pero ahora me sale el siguiente error.

la operacion no esta permitida si el objeto esta...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[omarzinho86]

Consulta cerrada.

solucione el problema gracias, queda así el código.

Spoiler

Sub Actualizar()
Dim strNombreBD As String, strServidor As String, strUsuario As String, strPassword As String...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[omarzinho86]

Basole,

una ultima consulta, si quisiera agregar mas campos para actualizar, como insertaria el codigo

<i>
</i>strSql = "UPDATE dist2014" & _
        " SET ESTADO  = '" & Range("F" &...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[a18327]

Te faltan las comas para separar cada columna

<i>
</i>strSql = "UPDATE dist2014" & _
        " SET ESTADO  = '" & Range("F" & CStr(intFila)).Value & "',"_
        " ULTIMOUBIGEO  = '" &...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[a18327]

Te faltan las comas para separar cada columna

<i>
</i>strSql = "UPDATE dist2014" & _
        " SET ESTADO  = '" & Range("F" & CStr(intFila)).Value & "',"_
        "...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[omarzinho86]

a18327, disculpa la demora, muchas gracias por tu apoyo! me ayudo bastante!

saludos!