Hola, Mi nivel de programacion en VBA es medio-bajo. Aunque no soy ajeno al mundillo de la programacion quisiera realizar una consulta a los foreros. Pongamos el siguiente ejemplo. Desde una hoja Excel quiero importar datos externos (en este caso una hoja excel). Lo que yo hago normalmente es poner a grabar una macro, simulo la importacion de los datos y despues paro la macro. Asi obtengo el "esqueleto" del codigo y a partir de ahi lo modifico hasta conseguir exactamente lo que necesito. Mi duda esta en esta parte del codigo (he recortado algunas cadenas de texto porque son irrelevantes) With ActiveSheet.QueryTables.Add(Connection:=Array( _ "OLEDB;Provid…

hola, necesitaria si se puede eliminar el excel que contiene la macro en uso. Si no se introduce bien la clave y para que no generen copia Lo que pense es que se cierre el libro y se elimine, puede ser con la instruccion: ThisWookbook.close y luego kill mas el Path en donde esta? pero no me lo toma, como podria hacerlo?

Hice una macro en Excel 2007 que copia un rango de celdas, las pega y centra como metarchivo mejorado en una presentación de PowerPoint, esto lo repite varias veces y en varias presentaciones. Si ejecuto el código con F8 lo hace sin problemas, pero al momento de ejecutarlo con F5, me envía un error en la línea donde pega la selección, pero si depuro y presiono F8, sigue el código sin problemas, incluso si presiono F5 pega las tablas en todas las diapositivas. Ejecute el mismo código en Excel 2013, y se traba en la misma línea con el mensaje "se requiere un objeto", pero en esta ocasión no sigue el código incluso si depuro. En ambos casos aun con el error, siempre pega l…

hola que tal expertos tengo un problema espero me pueda apoyar mucho, verán tengo una hoja donde se insertan datos pero necesito validar los datos que se van a insertar dado antes de insertarlos debe buscarlos para compararlos si son o no iguales a los que se van a insertar mediante el form, la intensión es saber si el registro que se va a insertar existe o no, porque si existe quiero que los datos me los acumule después delos datos encontrados(al lado derecho) para que asi se vayan acumulando esos antescedentes . los criterios a comparar serán datos del tipo string donde se compara -nombre-, -fecha de nacimiento-,-nacionalidad-, -estado civil-. Les el archivo del avance…

Saludos mis expertos, con la siguiente cuestión. En una hoja tengo varios objetos lo que quiero es pasar estos objetos a un userform para que estén disponible en cualquier momento. ___de antemano muchas gracias.

Hola estoy haciendo un programa el cual me abre otro libro("libro1"), y en una parte del programa me falta: una macro que me compruebe si "libro1" ya esta abierto, si esto es verdad que lo cierre y si no esta abierto que no haga nada Saludos!!!!

Buenas tardes, Agradesco a todas las personas que colaboran en el foro para la mejora de muchas cosas, mi motivo es el siguiente, tengo unos datos filtrados, pero necesito de que el filtro zona dependa de lo que se escoja en la lista superior e igualmente con el alimentador, muchas gracias. ARCHIVO GABRIEL.xls

Buenas, un favor, tengo un problema con la ejecución de una macro donde quiero que un libro luego de rellenarlo se guarde con otro nombre y se cierre pero cuando ejecuto la macro no se ejecutan esos dos pasos Windows(Lname).Activate Range("D17:F51").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Worksheets("CARATULA").Activate ActiveWorkbook.SaveAs Filename:= KName & ".xlsm", FileFormat:= _ xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False Workbooks(KName).Close …

Buenos dias Tengo una hoja con unas condiciones en una de las celdas, y con una macro quiero que al ejecutarla, se copie las conficiones de la celda F2 al resto de celdas de la columna, pero no hasta el final si no hasta la ultima celda con datos. Tengo este codigo y funciona, pero me aplica con la condicion de la celda F2, es decir Si f2 es menor que E2 ponte rojo, y en la siguiente fila queria que si F3 es menor que E3 ponte rojo, o si es mayor ponte verde, Adjunto el codigo Sub Condicionar() Range("F2").Select Selection.FormatConditions.Add Type:=xlExpression, Formula1:="=$F$2=$E$2" Selection.FormatConditions(Sel…

Saludos: Gracias de antemano por su ayuda cada vez que me tranco. En esta ocasión tengo unos informes que se alimentan de una Tabla Master la cual reside en el mismo Workbook. Las fórmulas de estos informes están en cada celda (vlookup, countifs, sumifs, etc.). De esta manera todo funciona correctamente. Pero ahora queremos mover la Tabla Master a Access y que Excel se alimente de esa Tabla Master desde Access. Esto lo logré con este código: Private Sub Worksheet_Activate() Application.ScreenUpdating = False Dim l As ListObject Dim q As QueryTable Dim s As String hojUsr_TablaMaster.Cells.Delete 'CONEXION A LA BASE DE DATOS s = "OLEDB;Pro…

buenas tardes, mediante un MonthView envio la fecha a un label y lo que quisiera es que el formato de la fecha en el label apareciera con nombre del dia, del mes y del año, lo hice de la siguiente forma pero no me funciona Private Sub MonthView1_DateClick(ByVal DateClicked As Date) Label5 = MonthView1.Value End Sub Private Sub Label5_Change() Label5 = Format(Label5, "[$-F800]dddd, mmmm dd, yyyy") End Sub gracias por la ayuda

Buenas chicos. Estoy utilizando el código que se expuso en este tema: https://www.ayudaexcel.com/foro/macros-programacion-vba-10/correo-electronico-desde-excel-modificar-codigo-vba-17978/ para el envio de mails desde excel, que funciona perfectamente, pero ahora necesito insertar mas lineas de texto, y me dice que "demasiadas lineas" asi que estoy intentando insertar el contenido de un archivo de texto como cuerpo del mensaje, pero no doy con la tecla... He conseguido que me inserte la primera linea, pero no el resto. Alguien sabe alguna solución? Gracias.

Hola, este es mi primer tema y adecir verdad se muy poco acerca de macros, quiero crear una alerta con correo de outlook para determinadas personas siempre, por el momento tengo una alerta de colores donde aplico la funcion =DAYS360(M5,N5,1)donde me salen la resta entre dos fechas, apartir de ahi aplico conditional formatting para que me colore las celas de que estan a 20 dias y ahi voy. Quiero que cada vez que llege a los 20 dias, envie un correo a unas personas especificas, que tenga como subject Recordatorios Predios, y que digamos que se marco de color O8 entonces que como cuerpo del mensaje envie desde el rango C8 hasta AE8 pero sin el O8..... Por Favor, es que re…

Hola, Recientemente estoy en esto de las macros, y me gustaría particularmente ayuda para un trabajito que tengo por ahí, en el cual es: Crear un botón, donde al precionarlo, pueda agregar las calificaciones de una persona (permitiendo únicamente numeros cerrados del 5 al 1o) y que cuando quiera agregar las calificaciones de otra persona, automáticamente se coloque la información debajo de la anterior persona. A ver si me pueden ayudar, les dejo mi archivo del avance que llevo. Libro1.xls

cordial saludo, señores, en la empresa donde laboro tengo que enviar todos los días los lotes de producción, lo que quisiera aprender es que cada vez que se crea una hoja del día quisiera que tomara las mismas observaciones si la orden es igual del día anterior. les agradezco su acostumbrada colaboración. gracias. lotes 2016.zip

Hola Amigos de AE. Estoy usando APPLICATION.QUIT para cerrar un archivo pero se cierran todos los archivos excel que estén abiertos. Cual comando puedo sustituir la acción y que no cierre los demás archivos abiertos. Gracias

Hola buen día a todos los que hacen de este espacio una gran comunidad. Actualmente estoy trabajando con con excel y access (Set dataread = CreateObject("ADODB.Recordset")), para realizar extracciones de datos. Pero la base debe pasar por un proceso de limpieza y formato, y mi duda va encaminado a eso: ¿Es posible eliminar columnas usando un proceso similar? ¿Se puede separar texto en columnas identificando un caracter? y si fuera posible ¿Como podría hacerlo?, supongo que debe haber otras formas con otras herramientas, pero me encantaría seguir este proceso. De antemano muchas gracias por interes y el tiempo dedicado a la consulta.

buenos días. tengo un archivo donde exporto una información desde un software de la empresa donde laboro, el tema es que esta información no la exporta de manera organizada, quiero saber si con formulas o con una macro pueda organizar mejor la información. agradezco mucho el consejo para poder darle solución. adjunto archivo lotes_produccion (19).xls

Hola soy nueva en esto y necesito ayuda Tengo una tabla con estos datos en la hoja 1 [TABLE=width: 86] [TR] [TD=class: xl74, width: 31, bgcolor: transparent]1.1[/TD] [TD=class: xl74, width: 31, bgcolor: transparent]1.2[/TD] [TD=class: xl74, width: 27, bgcolor: transparent]1.3[/TD] [TD=class: xl75, width: 27, bgcolor: transparent]1.4[/TD] [/TR] [TR] [TD=class: xl72, bgcolor: white, align: right]7[/TD] [TD=class: xl72, bgcolor: white, align: right]2[/TD] [TD=class: xl72, bgcolor: white, align: right]3[/TD] [TD=class: xl72, bgcolor: white, align: right]1[/TD] [/TR] [TR] [TD=class: xl72, bgcolor: white, align: right]8[/TD] [TD=clas…

Buenas tardes, tengo 2 hojas, en la 1° tengo una tabla con 5 campos (Cod, Nom, Apell, Area, Pais), en la 2° tengo un buscador, selecciono 1 codigo y me aparecen los demas datos, tambien tiene la imagen de la bandera del pais (B7). Lo que sucede es que no aparece la bandera cuando escribo un codigo en el filtro, pero he probado escribiendo el pais aparte y si funciona. ¿Como podria hacer que al actualizarse B7 tambien se actualize la imagen de la bandera? PD: Adjunto el codigo VBA para la imagen. Actual_Pais.zip Actual_Pais.zip

tengo un formulario y este me alimenta un listbox que ademas no se como ponerle el encabezado quiero hacer que con el click de cualquiera en la lista del listbox este dato se seleccione AYUDA no recuerdo como hacer eso Libro1.xlsm

Buenas tardes estimados colegas, Podrá sonar algo sencillo, pero realmente esta complicado el tema. Mi situación es la siguiente. Tengo una macro la cual esta montada en un OneDrive y Sincroniza en Microsoft Teams, esto con el fin de que se puede visualizar la data del archivo en linea. Ahora, mi Excel es un archivo de registro de solicitudes. Analice las siguientes particularidades: 1. Cuando utilizaba el procedimiento sencillo de ActiveWorkbook.Close SaveChanges:=True el archivo se guardaba en "Mis Documentos" aún cuando el archivo se abre directamente del sitio del onedrive sincronizado en el pc directamente en el explorar de archivos. 2. …

Buenos días, En la empresa recibo un archivo Excel con muchísimos datos con los "saltos de hoja", no sé como explicarlo, de forma vertical. Quisiera ponerlos de forma horizontal. Las hojas, constan de la columna A a la L y 39 filas, y me gustaría que cortara datos, colores, etc desde la fila 40 a la 49 y lo pegara en horizontal y así sucesivamente. He estado mirando y no hay manera, todo lo que encuentro hace referencia a ordenar los datos pero yo no quiero que los datos se ordenen y cambien, solo busco un corta y pega. He buscado si existe alguna opción en Excel y no la sé encontrar y he supuesto que se tendrá que tirar de vba. Si existe llamadme **maravilloso…

Buenos dias, Quisiera modificar este diagrama de Gantt, la idea es poder añadir, ya sea con un sombreado los dias del calendario que usarémos para una tarea. En la captura indico lo que me interesa en la tarea 2. La suma de los dias sombreados seria en este ejemplo 13. Si añado mas dias pues se sumarian. Asi con todas las demas tareas. Es posible? Diagrama de Gantt.xlsx

Buena tardes, ¿me podrían ayudar a resolver este problema? - Soy nuevo en esto de las macros y esta vez san google no me ayuda :( Estoy tratando de poder copiar la unica hoja del archivo INDICADORES.xls al archivo recién abierto formado por los datos que se toman de la variable IN26, el problema es que cada mes cambia el nombre del archivo y su carpeta, el abrirlo no hay problema ya que la variable "IN26" se forma de los datos obtenidos de las celdas en la hoja y libro indicadores, pero al copiar la hoja,si no especifico el nombre del libro IN26U202106350114.xls la macro no funciona, intente en lugar de poner IN26U202106350114.xls la variable "archivo" y no funciono,…