Hola de nuevo, Os adjunto un registro de planos para archivos pdf. Quisiera que al generarme el listado automatico de archivos pdf tambien pudiera generarme la fecha de creacion y modificacion de ese archivo pdf. Es posible? X-XXXX-1.zip

Hola, A ver si alguien me puede ayudar. ¿Esto que planteo es posible? Estoy intentando almacenar el último nombre de la hoja de un libro en una variable para que cuando cree una hoja nueva se me actualicen las fórmulas de mi hoja principal automáticamente a través de la función SUMA. Para ello: Almaceno el nombre de la última hoja en esta variable: Sub Variable() Dim Variable1 As String Variable1 = ActiveWorkbook.Worksheets(Worksheets.Count).Name ActiveWorkbook.Names.Add Name:="ultimahoja", RefersToR1C1:=Variable1 End Sub Y luego lo intento usar de esta manera: =SUMA('semana del 01-01-20:ultimahoja'!A1) Pero …

hola expertos buenas noches mi idea es como podremos distribuir 800 numeros que se encuentran en la columna A pasarlos a la columna E en grupos de 40 numeros por columna

Buenas tardes, acudo nuevamente a su ayuda, estoy intentando hacer un registro de asistencia a la Iglesia a donde asisto la asistencia esta dividida en CLASES, cada CLASE tiene un MAESTRO y cada MAESTRO tiene sus ALUMNOS las CLASES supone que es cada Hoja, dentro de la hoja esta el registro de Alumnos con su respectivo maestro Lo que intento hacer es lo siguiente: 1° combobox me muestra las CLASES (Hojas) 2° combobox me muestra los MAESTROS (de la CLASE seleccionada) 1° listbox me muestra los ALUMNOS del MAESTRO seleccionado Los errores que tengo: 1° combobox me muestra las CLASES (Hojas) - muestra todas las hojas, solo…

Hola a todos; -Llevo un rato a vueltas con la macro que adjunto y no logro avanzar. Consta de un formulario principal y un formulario diríamos auxiliar. En el principal tengo dos textBox con dos botones que a pulsar abren dicho form secundario. En este secundario hago unas operaciones de suma y resta y por medio de un botón me devuelve a los textbox el resultado, pero a los dos. Lo que quiero conseguir es que el resultado vaya para el textbox con el que haya pulsado el botón. Adjunto macro. Saludos a todos y buen finde. MacroS.xlsm

Buenas noches a todos y a todas, os escribo dado que no encuentro la forma de poder ocultar botones de Command Button en función de un valor de una celda. Me explico, si una celda determinada es diferente a 10, quiero que de forma automática los botones que ejecutan determinadas macros se oculten. Me interesaría que el lanzador del proceso estuviera delimitado al cambio del valor de esa celda en concreto, y no a cualquier modificación que pueda hacerse en la hoja. Por otro lado... ¿es posible que cuando agrupemos filas los botones que están en esas filas también se agrupen y cuando que cuando le volvamos a dar a desagrupar vuelvan a su posición inicial? …

Buenas tardes, les saludo cordialmente deseo me puedan ayudar con lo siguiente: el adjunto tiene un formulario para cambiar contraseña de usuario; estos (usuarios) se almacenan en otro libro el formulario solicita USUARIO, CODIGO (esto para validar la autenticidad), NUEVA CONTRASEÑA y CONFIRMAR NEUVA CONTRASEÑA el problema que tengo es al momento de guardar la nueva contraseña, (No guarda la información del txtnpass2) cambiar contraseña.xlsm usuariosprueba.xlsx

Buenas Tardes Señores del Foro Quisiera una mano, con lo siguiente, conforme abajo envío una lista de archivos, las cuales se encuentran en una carpeta "ORIGEN", (la cual podría ser otro Driver), que a través de una macro con un formulario, pudiera seleccionar un rango de fechas, (Ej. en un Texbox desde 31/07/2006 y en otro TextBox hasta 18/04/2007) las cuales serían copiadas a la carpeta "DESTINO".. y en caso de que ya existiera me pregunte si quiero reemplazar si o no?.. en caso que "si" reemplazar y por supuesto al darle "no", que continué con los demás.. Desde ya Agradecido

Buenas tardes a todos; -Adjunto una macro con un simple formulario que contiene dos textbox un listbox y un botón. Al poner un dato en el listbox y pulsando el botón pasa el valor al listbox y devuelve el foco al textbox1 Quería conseguir hacer esto mismo pero al pulsar el botón "INTRO" sin tener que recurrir al botón ya que es un incordio estar pulsando cada vez que introduzco datos. Gracias como siempre por su tiempo. Macro.xlsm

Buenos días. Me gustaría saber cómo puedo hacer para que una macro que tengo se ejecute todos los días a las 06:00, 14:00 y 22:00. Siempre va a estar abierto. Muchas gracias.

Hola a todos los que me puedan ayudar a resolver este problema. Buscando encontré este un código que lee archivos xml de un directorio seleccionado para luego pasarlo a una hoja de excel, el problema surgió cuando quise copiar todo el código en un archivo nuevo y proceder a testear, ya he revisado que tenga estén habilitadas las mismas referencias de las librerías, pero nada que encuentro el detalle. Una parte del código me daba interrupción en esta línea "ruta = LCase(CreateObject([explorador]).BrowseForFolder(0, "selecciona la carpeta a procesar", 0, "").items.Item.Path)" y luego consultando hice este cambio "ruta = LCase(CreateObject("shell.application").…

Buenas noches!Amig@s del foro espero se encuentren muy bien! quisiera solicitarles el apoyo con lo siguiente, tengo un problema con el siguiente código (adjunto) con este lo que se pretende es insertar la formula buscarv en las celdas de las columnas(A,B,C,D,F) en base al valor de la lectura de código de barras (TxtCodigodeBarras_) del formulario (fmrfact) y este valor es colocado a partir del rango G16 hacía abajo. El ingreso de lector del código de barras parece trabajar bien, pero al querer insertar las formulas para traer los datos de este código solamente lo hace con la fila 16, los valores de la búsqueda se obtienen de la hoja BD.Código vba: Sub convertir() On E…

Hola buenas tardes, para solicitar de su valioso apoyo, encontré un ejemplo en el que se hace una búsqueda de información y el resultado se muestra en un listbox, posterior acople el código a mi macro y la fui delimitando para que funcionara como yo lo necesito, sin embargo después del ultimo cambio y que funcionaba al 100% el código y me sacaba el reporte impreso en PDF de los resultados encontrados, ahora solo crea una hoja en PDF con los encabezados de las columnas pero sin información dentro de estas, no sé porque lo hace, comparto el código: Private Sub ExportaPDF_Click() Application.ScreenUpdating = False Application.DisplayAlerts = False On Error Resume …

Estimados, Primero que todo muy buenas tardes a todos y les expongo mi duda: Tengo un libro en el que tengo una macro (libro origen), esta macro debe verificar si existe un libro con un nombre definido en una celda del libro origen en la misma ruta que este, en el caso de que exista, debe verificar si existe una hoja con un nombre definido por una celda del libro origen, En el Caso de no existir el libro, debe crearlo con el nombre de la celda, en el caso de existir el libro y la hoja debe crear una nueva hoja llamada "copia" y dar un mensaje de alerta. El caso es que no logro hacer para que valide la existencia del libro o la hoja con mi código: Muchas graci…

Buenos días. Tengo una macro programada para que ejecute una actualización de los datos. El problema es que, dependiendo de los datos, a veces salta un mensaje de error y hasta que no se pulsa aceptar en el mensaje de rror, no continua calculando. Hay alguna forma de hacer que "pulse" el aceptar de forma automática? Gracias.

Hola, buenos días. Realmente he buscado en varios foros, antes de hacer la pregunta. Quisiera saber si me podrían ayudar con un problema que he tenido estos días de la nada... Digo de la nada, por que al parecer, se han hecho unos cambios de versiones de servidores, que en teoría no iban a generar problemas. Tengo un script en Excel, donde hago una consulta SQL Server, y extraigo información en base a fechas de entrada... Sin embargo, de la nada ha dejado de funcionar cuando lo ejecuto desde Excel, pero si lo hago desde un IDE de SQL Server se ejecuta perfectamente. Mi VBA es el siguiente: With Me CFechaI = Format(CDate(.ComboBox1.Value & "/"…

Buenos dias, No soy capaz que funcione la macro, os explicco: Mi objetvo es: Macro 1: Conseguir que inserte una fila nueva cada cambio de celda de la columna a sea diferente. Despues de muchos dias y copiando ejemplos de la web conseguido Macro 2: Paso 1: que realice sumatorio de la columna J hasta espacio blanco y mantenga formula en la celda,( le llamare en este post obj1 y al range para su obtencion Range1). Despues de muchos dias y copiando ejemplos de la web conseguido Paso 2:que realice sumaproducto de la columna J * la columna K hasta espacio blanco y mantenga …

Algún formulario Excel que permita explorar y abrir archivos de windows?

Les comparto este ultimo proyecto en que estado jugando espero que les sea de utilidad.

Buen día, tengo la siguiente pregunta, tengo un shape en la hoja y al hacer click en este, quiero insertar otro shape, la cosa es que este segundo shp quiero que aparezca dentro del área visible de la hoja, el segundo shape debería aparecer debajo del primero, pero si el primero esta muy abajo el segundo debería mostrarse por enzima del primero para que quede en el área visible de la hoja. pongo una imagen a continuación en el primer cuadro se muestra bien en el segundo es como no quisiera que salga, y el tercero la solución para el segundo cuadro ahora bien a la hora de insertar tendría que preguntar if shape1.top + shape1.height + shape2.height - hoja…

buenas noches, tengo una macro para navegar por paginas web, la cual siempre me ha funcionado bien, pero siempre me ha costado dar con los objetos web he intentado con las siguientes sentencias sin éxito para el color: c.Value = htmlDeRespuesta.getElementsByName("_ngcontent-hhw-c116")(0).innerText y para el valor 1,99 c.Value = htmlDeRespuesta.getElementsByName("_ngcontent-xsn-c116")(5).innerText c.Value = htmlDeRespuesta.getElementsByClassName("col-xs-2 price")(0).innerText c.Offset(0, 3).Value = htmlDeRespuesta.getElementsByClassName("tableHere")(0).innerText pero no he podido dar con el valor de ninguna form…

Buenas noches, estaba intentando adaptar una solución que me dio @Haplox, hace bastante tiempo, junto con otra de @Antonipara una pequeña base de inventario, pero me da error en esta parte Set encontrado = wsDestino.Range("b2:b" & uFd).Find(Celda) y llevo un par de días y no doy con ello, imagino que es un problema del Rango definido, pero me pierdo. Cuando le doy a depurar, observo que "encontrado" es = a nada, también que uFd = a 1048577, no se si esta recorriendo toda la columna hasta el final del libro. También querría ignorar, ocultar o que no me cargara ciertas filas en mi listbox, del formulario inventario.…

Hola buenas tardes, solicito de su ayuda, ya que estoy programando una macro que genera referencia de depósitos bancarios concatenando varios valores guardados en las celdas de una hoja en especifico de mi libro de Excel y posterior proporcionarla al cliente, específicamente mi problema es: Al buscar un cliente en mi BD el resultado me lo arroja en un listbox que llamé "LISTA" y cuando selecciono el valor que encontré después de la búsqueda para capturarlo en las celdas que le indico a la macro, antes cabe mencionar que para seleccionar ese resultado de mi búsqueda lo hago con una acción "DBLCLICK" , y de las 5 columnas que tiene mi BD, solo me selecciona la columna y fi…

Buenas Tardes Señores del ForoNecesito una mano con una planilla, para la cual desearía que una macro me realice lo siguienteEn la columna "A" fila "1" podría tener datos hasta la "A" fila 460000" por decir asi, contiene la ruta de donde están ubicados mis archivos y,En la columna "B" fila "1" podría tener datos hasta la "B" fila 460000" por decir asi, contiene mis archivos propiamenteLa idea es seleccionar la matriz completa y que me las combine en la columna "A" fila por fila, o en otra columna, que podría ser la columna "C"Desde ya agradecido..Adjunto Planilla Ejemplo LISTADO-CONCAT-2.xlsm

tengo unos datos en la hoja2 y me gustaria extraerlos como se muestra el ejemplo en la hoja proyecto2.xlsm