Hola buneos dias. Tengo un archivo que uso como plantilla está dentro de un libro 1 que he llamado (LibroOrigen). en ella esta una hoja llamada "Lista" y una vez que lleno esta hoja lo copio en otro libro 2 (libro destino) ahí voy acumulándolos y cambio el nombre de estos. Con una macro he podido enviar la hoja "Lista" de libro origen a libro destino, pero este me lo guarda con el nombre de "lista". Me gustaría poder guardarlo en libro2, con el nombre puesto en una celda (A2) de la hoja lista Libro1. y así el acumulado ya tendrá nombre diferentes. Muchas gracias Mario Libro Origen.xlsm

Hola a todos. Estoy creando un buscador de datos que se encargue de extraer todas las filas que coincidan con determinada clave de identificación. Las claves tienen tres estructuras diferentes con dos dígitos (00), 5 dígitos (00000) y 9 dígitos (000000000) que corresponden a identificadores geográficos. El archivo tiene dos pestañas, una con los datos y la otra con el buscador. El tipo de búsqueda depende de la elección del usuario, que es a nivel estado (00), municipio (00000) o localidad (000000000). Con el código que llevo hasta ahora, al buscar a nivel estado (columna G) o municipio (columna J), me devuelve los resultados en la hoja del buscador, pero también m…

Hola compañeros, quisiera que me ayuden con una macro que permita "guardar como" utilizando como nombre del archivo el contenido de una celda y que me permita escoger en que carpeta la quiero guardar. Agradezco su colaboración.

Hola, saludos a todos os comento lo que quiero conseguir usando una macro. Tengo un excel con varias hojas pero he sacado las dos con las que tengo que trabajar, en la hoja "Rutado Cables" se va añadiendo información y en la hoja "Formato Llenado" se saca un resumen. En la hoja "Rutado Cables" en la fila 18 se van añadiendo las bandejas y en la columna C se van añadiendo los cables. Cuando un cable va en una bandeja en la celda donde se encuentra fila y columna se coloca un "1" , como se ve en el ejemplo. Como he dicho antes la información se coloca manualmente. En la hoja "Formato llenado" en la columna "B" se copia manualmente el nombre de la bandeja, lo qu…

Buenos días. Quiero crear una macro en la que me descargue las urls de mi columna A, con el nombre de mi columna B, a la ruta de la columna C. La descarga de la url me gustaría que fuera con estilo, imágenes, etc., es decir, como cuando das al botón derecho y clicas en "Guardar página web". Tengo esta macro, pero no descarga las urls con estilo. ¿Pueden ayudarme, en qué me equivoco? Muchas gracias Descargar urls.xlsm

Hola, quería hacer una pregunta que creo que es sencilla en poder hacerse o no, pero no tengo conocimientos para saberlo. Tengo varias hojas (pongamos para el ejemplo solo Hoja1, Hoja2) y un mismo botón (btn_activar) en cada una de ellas. Quiero crear en un módulo una función que al pulsar el botón, hace una serie de acciones (el hacerlo en el módulo es para no repetir todo el código en cada una de las hojas y posteriores modificaciones). Para llamarlo desde el módulo, si pongo por ejemplo: Hoja1.btn_activar.ForeColor = RGB(0, 0, 0) [funciona correctamente] Pero si le paso el nombre de la hoja (porque variará en función de donde pulse el botón…

Hola buenas, Me ha surgido la duda y no he encontrado ningún tema al respecto, Se puede introducir código VBA para cualquier evento de hoja, por ejemplo el changes, para una hoja que no existe? Es decir, imaginaros que tengo una única hoja en el libro simulando la portada (Hoja 1), y en ella un botón para que a través de VBA, se origine una hoja nueva (Hoja 2) en la que haya una serie de datos. Hay alguna manera de poder programar para que en esa hoja nueva (Hoja 2), se desarrollé código? Que salte el código por ejemplo con el evento Changes? Un saludo y muchas gracias de antemano.

Buenos días, espero alguien pueda ayudarme, estoy perdido en esto. Tengo una tabla con 9 columnas y 200 filas. En la columna A, que es la numero 1 hay un código de informe. En la columna I, que es la numero 9, se pueden ver los siguientes elementos: UNV, AVP, UDV, PLV. Cada uno de estos conjuntos de tres letras son una Unidad de Negocio a las que reporta cada informe. El problema surge cuando un informe de la columna A reporta a más de una Unidad de Negocio, como sucede en la fila 12, por ejemplo. Necesito que en todas las celdas de la columna 9 haya solamente una Unidad de Negocio: UNV, AVP, UDV, PLV. Para ello necesito q…

Hola a todos, Existe alguna forma o código para reconocer el "#N/A" en una Macro? Gracias,

Hola buenas tardes: Necesito ingresar una formula en la columna C solo si una celda celda anterior tiene valor Columna B. Mi formula es (=SI.ERROR(EXTRAE(B3,ENCONTRAR("*",SUSTITUIR(B3,"\","*",LARGO(B3)-LARGO(SUSTITUIR(B3,"\",""))))+1,LARGO(B3)),"") Espero me puedan ayudar. Gracias Insertar formula si.xlsm

HOLA!! TENGO UN PROBLEMA CON UNA MACRO. ES LA SIGUIENTE: (lo que tengo que hacer es que me corra la macro simulaventasdia todas las veces que sean necesarias hasta que i3 y i4 sean iguales. Y luego que en la celda I15 me escriba la cantidad de veces que se simulo hasta llegar a eso. Sub hastaMismaPosicion() Dim c As Integer c = 0 Range("I4").Value = -1 While Range("I3").Value <> Range("I4").Value Call simulaVentasDia c = c + 1 Wend Range("I15").Value = c End Sub ---------------------------------------- EL PROBLEMA QUE TENGO ES QUE CUANDO LA CORRO, ME IGUALA …

Hola a todos, me gustaría saber si es posible mediante VBA , rellenar una campo imagen editable de un archivo PDF. Consigo rellenar los de tipo texto y los desplegables sin problemas, pero no puedo rellenar las imágenes desde una ruta o desde un Control Image, las rutas de las imágenes están en las celdas, C53 y B75. Sub ImprimirPDFeditable() Dim celdas() As Variant Dim i As Integer Dim nombrePDF As String, rutaPDF As String Dim HojaDatos As Worksheet, ParteTrabajo As Worksheet Dim Tabla As ListObject Application.ScreenUpdating = False Set HojaDatos = ThisWorkbook.Sheets("Registro") Set ParteTrabajo…

Hola a todos Por más vueltas que le dé al problema no logro solucionarlo. No se ocurre como corregirlo. Creo que será de lo más sencillo, pero ahí estoy sin poder solucionarlo. Gracias Rubén SumasVarias.xlsm

https://www.mediafire.com/file/dd8bpb5pmd6ay2b/LIBRO2.xlsm/file Buenos días a todos los genios, quería pedir por favor si me podrían ayudar a que al momento de darle reporte me pueda imprimir la asistencia de los empleados pero que me pueda dejar seleccionar de que fecha a que fecha quisiera que imprima para todos los meses del año 2023, 2024 etc. y poder escoger el departamento . Otra cosa es que cuando quería incluir el "DEPARTAMENTO" en el listbox lo incluyo pero no aparece y "EMPLEADO" se me corre mas para la izquierda. Por favor pido si alguien me podría echar una mano con ello, Mil gracias a todos

Hola buenos días: Dentro de una hoja de Excel tengo varias columnas con datos otras con fórmulas y otros. Pero hay celdas que tengo que borrar, ejemplo: B8 al B25 esto lo realizo de manera manual. Pero esto mismo lo necesito hacer con diferentes columnas. Existe alguna manera de hacerlo rápido y de manera que con un botón o algo pueda hacerlo automático. - Las columnas a seleccionar y borrar datos son las columnas: B,E,J,N,R,V,Z,AD. a partir de la fila 7 y que termine a la 25 Esperando que me puedan ayudar con esto. Gracias Borrar datos de columnas discontinuas.xlsx

HOLA, NECESITO AYUDA PARA ARMAR ESTE CODIGO EN EXCEL. LES ESCRIBO QUE ES LO QUE NECESITO Y SI SE LES OCURRE COMO HACERLO SE LOS AGRADEZCO DESDE YA. Lo que entiendo es que tengo primero que hacer que se ejecute la macro simulaventasdia 30 veces ya que necesito los 30 dias del mes Después tengo que de alguna manera pedir que me cuente los dias en que I8 es mayor a I7 Y cuando tenga ese valor, necesito que lo divida por la cantidad de dias del mes (30) y lo escriba en la celda I11 es decir que calcule la proprocion de dias del mes que vendi mas que la competencia. GRACIAS!!

Hola buenas noches: En una hoja donde listo mis archivos necesito mandarlos a imprimir celda x celda En la columna B tengo listado los archivos con su ruta completa. Ruta y nombre del archivo. Me gustaría poder imprimir estos sin necesidad de abrir cada uno de ellos. ya que previamente hice una revisión. Tengo una macro, que me había funcionado en otro archivo, pero no puedo aplicarlo aquí. Esperando que me puedan ayudar. Muchas gracias Mario Imprimir Rutas con archivo.xlsm

Hola buenas noches: En una hoja tengo una macro que me ayuda a pegar información en la columna E a partir de la fila 17. todo esto dependiendo de la columna C. en ella celda (C17) pongo un número que trae los datos de otra hoja y los coloca en la misma fila, pero de la columna E. terminando de pegar se recorre nuevamente a la columna C. y de ahí digito un 2 (consecutivo) y vuelve hacer el mismo proceso. Hay alguna manera de poder poner los consecutivos de manera automática, al yo poner en la celda C17 el numero 1, y donde se active la celda de la columna C, poner el consecutivo siguiente. y como limite la celda J2. en donde estará el límite ejemplo 15. es…

Tengo un userform para insertar/modificar/borrar datos en una tabla. El problema surge cuando intento editar o modificar parte de los datos, pero no me realiza ninguna accion o me da error. Sub EditCrew() Dim UltFila As Long, rango As String, FilaRegistro As Long, ans As Integer Sheet5.Visible = True Sheet5.Unprotect ("xxxx") UltFila = Range("A" & Rows.Count).End(xlUp).Row rango = "A2:A" & UltFila If Len(frmCrew.TxtPassport) = 0 Then MsgBox "Write True Passport", vbExclamation, "BALEARIA" Exit Sub End If FilaRegistro = filaexisteregistro(frmCrew.TxtPassport, rango) I…

Buenos días: Tengo el siguiente problema. Básicamente mi necesidad es de una lista datos que tengo en una hoja 1 pasarlo a la hoja 2. La lista está en la columna B, cada nombre en la columna C esta clasifica según un código de ID, esto lo hago manual, Y en hoja 2 debo poner los datos de la columna B, en diferentes columnas de la hoja 2. En la hoja 1 Puse una tabla sencilla colocando mi ID y la columna en donde deberá ir cada celda. La idea es que con una macro revise la columna C de la hoja 1 y según el Id puesto deberá poner la celda B en la columna indicada. Ejemplo: celda B3 (nombre) C3=código BN En mi tabla el ID:BN …

Hola buenas tardes, encantado de poder estar y participar en el foro. Llevo un tiempo que quiero conectarme a través de una aplicación realizada con VBA , con una base de datos con SQLite3. Lo que voy encontrando no me aporta lo sufciente o esta incompleta. ¿Me podriais ayudar, con algun ejemplo o alguna sitio donde pueda recopilar la información suficiente?. Tengo instalado SQLite3, su driver y abro las referencias, pero aun asi, cogiendo ejemplos recogidos por Youtube, me dan errores. Muchas gracias.

Hola saludos a todos espero me puedan ayudar. Necesito que este código haga el proceso de deshabilitar o quitar un comando (botón) de la barra de herramientas de acceso rápido que cree para ejecutar una macro y ya terminada la macro se quite. utilicé el siguiente código Sub EliminarComandoBarraAccesoRapido() Application.CommandBars("Quick Access Toolbar").Controls("Conectar SQL").Delete End Sub Pero me muestra el siguiente error Espero me puedan ayudar por favor. Gracias.

Hola a todos; Estoy trabajando en Access y he hecho un procedimiento para ocultar columnas de listbox en tiempo de ejecución. He añadido un listbox o cuadro de lista auxiliar donde se cargan los titulos (no tienen el mismo nombre algunos campos porque le he cambiado el nombre de los titulos) Ahora mismo lo estoy haciendo con un número fijo e columnas, pero lo interesante sería que fuese sobre un número dinámico de columnas. Entonces lo que hago es seleccionar un item y al ejecutar el procedimiento oculta la columna. Habéis visto algo similar para Excel. Sí es así me podéis indicar¿? Saludos a todos y todas.

Tengo una hoja en un excel que se llama Base de datos 2, la cual tiene una tabla que posee Equipo, Pozo, Día, Jornada, Metro Perforados en ese mismo orden y otra hoja llamada Pozo 3 en donde la celda K2 tengo escrito el Pozo, y desde la celda E10 hacia la derecha tengo escrito distintas fechas, y abajo de estas fechas distintas jornadas (Esto está hecho en macro), necesito otro macro en esta hoja que busque la coincidencia del pozo, fecha y jornada tanto en la hoja Base de datos 2 y la hoja de Pozo 3 y me coloque los metros perforados desde la celda E15 hacia la derecha, tener en cuenta que las fechas y la jornada de la Hoja Pozo 3 se encuentran hacia al lado y no hacia a…

Buenas tardes, "Tarea" a realizar: búsqueda de un número desde la celda A4 de la hoja CAMIONETAS en la hoja PLANO luego correr dos columnas a la derecha y reemplazar ese contenido con la celda G4 de la hoja CAMIONETAS. Problema a solucionar: lo remarcado en rojo debería ser el contenido de la celda A4 (CAMIONETAS) que es variable; en el caso de abajo siempre me busca 14248. El "resto del código" funciona bien. Selection.Copy Sheets("PLANO").Select Cells.Find(What:="14248", After:=ActiveCell, LookIn:=xlFormulas2, LookAt _ :=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _ False, SearchForma…