Abraham Valencia

[Hola No hay métodos "cortos" para insertar en múltiples tablas a la vez, una forma usual usada en MySQL es "encapsular" todo en un sólo "Stored Procedures", pero en realidad dentro de ellos sigue habiendo varas inserciones diferentes. ¿Qué hacer...

[Hola Comparte la estructura de los datos y la macro en la que ocurre el dilema para poder ayudarte, así sin ver nada es complicado saber qué pasa. Saludos] Abraham Valencia

[Hola Cuando se desea usar valores dentro de un rango, se hace necesario usar los operadores "Or" y/O "And", de lo contrario, no obtendremos los resultados deseados. Además, creo que te sería mucho más fácil usar "Select - Case". Sugiero enviar una...

[Hola Mira como debería ser: Selection.AutoFill Destination:=Range(celda & ":C" & finrgo) Las variables nunca van entre comillas ya que para el VBA eso es una cadena de texto, no una variable Saludos] Abraham Valencia PD: He respetado tu forma de...

[Hola Como para comenzar, dale una miradita a esto: Saludos] Abraham Valencia

[Hola En realidad no es que exista "la forma" de interactuar de ese modo con otros programas pero puedes intentar con SendKeys y AppActivate, de ese modo activas la aplicaición que mencionas y envías pulsaciones (del SendKyes) para intentar con "Tab"...

[Hola Es una mala costumbre usar "On Error Resume Next" de no ser estrictamente necesario, por si acaso. Sobre tu problema puntual prueba así: InfoPath = Application.GetOpenFilename If InfoPath = False Then MsgBox "Cancelaste" Exit Sub End If...

[Hola Trabajar sobre celdas con formato condicional siempre requiere un poco más de ingenio y/o programación que cuando se trabaja sobre formatos "comunes" por lo que lo recomendado es trabajar sobre la misma condición que hace que se active dicho...

[Hola Siempre es más fácil ayudar en estos casos viendo/accediendo al código y/o a los archivos de la consulta, igual sugiero mirar por aquí: https://sateliteguayana.wordpress.com/2016/04/20/leer-archivos-xml-desde-una-macro-de-excel/ Saludos]...

[Hola Intenta con algo así: Sheets(Array("Hoja1", "Hoja45", "Hoja46")).Select Selection.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "D:\Carpeta\xxxxxx.pdf", _ Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _...