Isaac Reyes

El conflicto que tienes con tu pareja es algo que pasa más frecuentemente de lo que uno quisiera. Lo que te puedo decir, es que por mucho que lo quieras, si no dejas de actuar como lo estás haciendo, lo único que harás será alejarlo más y más. Te...

Debes poner esta macro en cada hoja que quieres que actúe de esa forma Private Sub Worksheet_FollowHyperlink(ByVal Enlace As Hyperlink) strNuevaHoja = Left(Enlace.SubAddress, InStr(1, Enlace.SubAddress, "!") - 1) Sheets(strNuevaHoja).Visible =...

Dame un ejemplo y lo que tengas avanzado. ¿Lo qué necesitas es la consulta SQL? ¿Tienes qué concatenar los datos de más de un campo y ponerlo en un textbox? ¿Tienes qué concatenar los datos de más de un registro y lo pones en un textbox? ¿El label es...

Buen plato de tallarines me pusiste con tu pregunta, pero creo que capté lo que me quisite decir, y si no lo hice, me corriges. Creo que esto lo que querías lograr Sub Makro1() Dim myRow As Integer Range("a65536").End(xlUp).Offset(0, 2).Select myRow...

¿Qué error te aparece? Si el el 7004 es porque debes setear el Connection con .CursorLocation = adUseClient

Emviame el ejemplo de como lo estás asignando.

Para insertar un botón "Ver>Barras de Herramientas>Formularios" Para que el botón borre una celda le asocias una macro Sub Botón1_AlHacerClic() 'Para la celda A1 Range("A1"). Clear End Sub Si quieres que el botón borre un rango Sub...

Lo que conozco de Ado es gracias a vuestras preguntas, así que me he llevado unos minutos investigando sobre tu duda y he encontrado que tienes un error en esta línea rst.CursorLocation = adUseClient No es el recordset el que tienes que setear, sino...

Lo más probable es que el tipo de dato que estás usando no logre contener la longitud del código de barras. Lo más seguro es que estés usando Número - Entero Largo. Prueba a utilizar Número - Double y me dices qué tal te funciona.

Eso me suena al error 91 y normalmente ocurre cuando no has inicializado un objeto. Asegúrate de que has inicializado todos los objetos de forma correcta. Te dejo un ejemplo: Dim apli As Excel.Application Dim libro As Excel.Workbook Dim hoja As...