Hola a tod@s. Gracias por su tiempo para con esta breve consulta. Tengo una macro personal que esta protegida. Sin embargo, averiguando por la web hay programas que pueden quitar la contraseña. Hasta el momento ese programa puede hacerlo en versiones de excel 2007-2013. Ya que en la versión 2016 no es factible. Ahora, seguramente se desarrollaran o ya están en la web más programas para desbloquear la contraseña en macro personal. Por lo tanto, obviamente, hay que insertar una clave que contenga mayúsculas, minúsculas, números y símbolos. Entonces, necesito saber si será suficiente, aunque sé que no al 100%, pero me gustaría leer de sus recomendaciones de parte d…

saludos cordiales como indica el titulo deseo hacer una condicional if que me compare si una variable esta dentro de un array de esta forma if tipo=array(1,2,3) then "la condicion dada" es decir si el tipo va del 1-3 que se ejecute la condicion, pero no me sale .agradezco su amable ayuda al respecto de esta duda.gracias

Hola amigos de AE. Buenas tardes. Tengo un inconveniente con una macro a ver si pueden ayudarme. Les explico 1. La macro del botón insertar fila, copia y pega la fila 5 en la primera celda disponible de la columna A, se van agregando los datos solicitados y se van insertando filas según sea requerido. 2. La macro funciona a la perfección si la fila 5 está en modo MOSTRAR. 3. Pero como la macro justamente va a copiar la fila 5, esta debe estar oculta para que no sea manipulada y se copie tal como está definida. 4. Aquí es donde está el problema. Luego de OCULTAR la fila 5 y ejecutar la macro, NO se copia la fila. Agrad…

Buenos días a todos; -Tengo una macro empezada que no se terminar porque desconozco que función debo usar. Explico: En una hoja hay una macro que al pulsar sobre la celda activa llama a un condicional que según su valor pues cambia de valor e incluso de color. Lo que no sé conseguir es como recuperar el estado inicial. Adjunto macro para mayor comprensión- Saludos y buenos días a todos. MCeldaActiva.xlsm

Por favor alguien me pude ayuda con una macro para la siguiente rutina adjunto una imagen y les voy agradecer

Buenas tardes; Por favor, ayuda...... Hasta este año no he tenido problemas con el número de semana en las macros que tengo hechas, digo hasta este año porque hoy al actualizar y meter los datos del año que viene .....? No sale el número de semana que tendría que salir. El número de semana le estoy sacando de la siguiente forma: día="01/01/2021" Numero_semana=format(format(día,"ww"),"0#") El número de semana resultante debería de ser 53 pero me está dando 01. Como puedo solucionarlo. Estoy con el móvil, si necesitais el Excel con el ejemplo enciendo el ordenador y lo subo. Muchísimas gracias.

Tengo un listbox que tiene como opciones diferentes paises, y necesito que al seleccionar 1 o mas paises de ese listbox me aplique el filtro de esas selecciones en una tabla. la tabla la tengo en la hoja 4 y la columna 7 es la correspondiente a ciudades. lo que necesito es que, si yo selecciono, Argentina, Argelia y Angola, me aplique dicho filtro en la tabla que tengo en mi hoja4 Private Sub GenerarInforme_Click() Dim elementoLista As Long Dim arreglo As Variant With ListBox1 For elementoLista = 0 To .ListCount - 1 If .Selected(elementoLista) Then If ListBox1.Selected(elementoLista) = True Then seleccionados = s…

Buenos dias. Un libro excel con macros que corre bien en un Office 2016 Pro de 64 bits, cuando lo abro desde un Office 2013 de 32 bits me da el error que envio en un pantallazo. ¿podría ser por el tema de la diferencia de 64 y 32 bits las macros no funcionaran bien?. Si es asi... ¿existe alguna forma de poder arreglarlo?. Gracias. MJ

Alguien me podría apoyar con el código para que en un textbox de un userform no se repitan caracteres repetidos. Ejemplo si al empezar a escirbrir la primer letra es una L al escribir la segunda ya no me permita usar dicha letra, y al escribir la tercera me impida usar las dos anteriores Cabe mencionar que solo serán máximo 3 caracteres los que se usaran en el textbox. De antemano gracias

Hola amigos de AyudaExcel Requiero de su ayuda para corregir una macro que he intentado de solucionar para no logro conseguirlo. Les explico. Tengo la hoja UNO la cual tiene un botón para insertar una nueva hoja (que es una copia de la hoja HOJA PARA COPIAR), la macro del botón llama a otra macro para renombrar la hoja nueva pero lo que hace es agregar una nueva hoja en blanco y esa es la que renombra. No logro vincular con la hoja que realmente debería renombrar. Gracias de antemano EJEMPLO PARA RENOMBRAR HOJA.xlsm

Buenas tardes o días a todos; -He creado una macro Vba Excel que por medio de un Userform me hace una consulta a una base de datos Access. Al frm le he puesto un comboBox para elegir la consulta que quiero hacer. Lo he hecho por medio de un condicional "IF" de ahí mi pregunta. ¿Está bien así o hay otro método mejor?. El código del UserForm comento lo que he hecho con '<<< >>> Adjunto macro para mayor comprensión. Gracias y saludos a todos. ConsultaBD.zip

Buenas foro,a ver si me podeis echar una mano. En un userform con 4 checkbox con sus correspondientes textbox, lo que pretendo es que los checkboxs que sean verdaderos, por ejemplo el 2 y el 4, me copie los valores del textbox2 en B2 y el textbox4 en C2, es decir que según los checkbox marcados vaya rellenando en la misma fila sin dejar hueco. Ejemplo.xlsm

Que tal a todos ante todos y muchas gracias por el tiempo dispensado. tengo un formulario creado en userform por mi para ingresar datos en una planilla. ahora lo que estoy tratando de lograr y no puedo es lo siguiente : tengo un combobox con el nombre NIVEL Y PRO el cual al situarte en el te da lo que seria el id de identificador de datos me gustaría que al colocar el id me trajera automáticamente el resto de los datos a la planilla . puse solo un botón de ingreso por que me parece mas simple y fácil la idea es que si meto un dato nuevo lo ingresa y si traigo un dato que ya existe lo modifique en la misma linea …

Hola a todos. Perdonar con este asunto, creo que debe ser una tontería, pero no logro ver el error. Con esta sentencia me da error: Worksheets("KM_iniciales").Range(Cells(1, 1), Cells(maxrow, maxcolumn)).ClearContents Y sin embargo así funciona. Worksheets("KM_iniciales").Range("A1:K" & maxrow).ClearContents Quisiera que la columna a eliminar no fuera siempre la K porque podría ser otra, por eso quiero hacerlo con cells, pero no logro que funcione. ¿Qué estoy poniendo mal? Teniendo en cuenta que busca la última fila y columna así. maxcolumn = Worksheets("KM_iniciales").Cells.SpecialCells(xlLastCell).Column maxrow = Worksheets("KM_inic…

buenos días, tengo una macro que me donde necesito pasar datos de la hoja listado a la hoja A.Listado y no me esta funcionando y todo el código fuente esta en el modulo Transferir, no se que mal estoy haciendo cuando pulso el botón archivar de la hoja listado me sale los mensajes correspondiente como si transferiría los datos. Adjunto el archivo muchas gracias por su ayuda. PROPUESTA FORMT2020.xlsm

Hola, un saludo a tod@s. Mi consulta es muy sencilla (o no) pero no he visto nada relacionado con esto por Google, quizás desconozco las palabras exactas. Me explico, quiero eliminar una fila entera de una array de varias columnas de forma similar a como lo hace nativamente Excel, que seleccionas unas celdas, botón derecho, Eliminar, y el te desplaza todas las de debajo arriba. He probado con un bucle y subir todo lo de debajo arriba una fila copiando datos, pero lo veo demasiado, y puede que haya algún comando o algún método que lo haga y yo lo desconozca. Espero haberme explicado con claridad. No subo ejemplo porque mi pregunta es más bien teóri…

Buenas tardes, necesito vuestra ayuda. Tengo una columna donde hay valores numericos y ceros (de o3 a o100). Necesito que empezando de la celda o3, se copie ese valor a la celda A1, despues la o4 se copie a la A1 de nuevo,asi sucesivamente hasta la o100.Lo unico que debe saltarse los ceros. He intentado con la grabadora de macros, pero se hace muy largo.Supongo que sera con un bucle, pero no se hacerlo. Adjunto el codigo de ejemplo. Gracias Range("A1").Select Application.CutCopyMode = False ActiveCell.FormulaR1C1 = "=R[2]C[14]" 'copio valor o3 Range("A1").Select Application.CutCopyMode = False ActiveCell.FormulaR1C1 = "=R…

Hola a todos. Os pido ayuda con este proyecto que estoy haciendo. Tal y como lo tengo ya me funciona, pero veo que tarda en recorrer demasiado las filas, creo que porque estoy usando FOR NEXT. No se si hay manera de hacerlo correr más rápido, con WHILE por ejemplo o de otra manera. Os envío el proyecto y os agradezco si me podéis ayudar porque no veo capaz. El problema viene en la hoja Plantilla_Parte_KM, cuando uso los botones para recorrer las matrículas, la busca en una hoja con este bucle. Si la encuentra pronto no hay problema, pero si no la encuentra o está lejos en el contador del bucle se hace lento. Como siempre gracias de antemano. Moisés. …

Hola a todos, por favor si alguien me puede ayudar con esta macro para que los datos que copia se peguen como valores,ya que actualmente copia con todo y formula el contenido de la celda F7. Sub completa() 'Rellena la columna F hasta la ultima fila con datos de la columna E 'Se detecta la última fila con uf = Range("E10").End(xlDown).Row 'desde donde inicia 'Se detecta el rango a rellenar rango = Range(Cells(10, 6), Cells(uf, 6)).Address 'Luego se Rellena el rango con el contenido de la celda F7 Range("F7").Copy Range(rango) 'es desde donde se autocompletara End Sub Grac…

Buenas tardes, agradeceria vuestra ayuda. Utilizo hasta ahora una macro que envia un rango de excel en pdf por outlook, la cual, enviaba el mismo pdf a todos los emails de una columna. Ahora lo que necesito es mandar el pdf pero a cada email, modificando cada vez la celda A1 por cada Id de la columna, para que asi se genere un pdf para cada id. La idea es que antes se mandaba un cuadrante a todo el mundo (1 pdf a todos los emails), y ahora quiero enviar el que corresponde a cada uno.(1 pdf a cada email) Imagino que se hara por un bucle, pero no se como insertarlo en la macro. Muchas gracias Calendario1.xlsm

Hola buenas noches a tod@s Estoy realizando un excel con macros para la entrada de paquetes de mi empresa. El funcionamiento es el siguiente: En la hoja "Entradas_Palau" , fila 7, introduzco los datos de entrada del paquete nuevo, en la celda "J7" una vez he introducido todos los datos, se ejecuta la macro y me copia los datos en la fila 10 automáticamente. Lo que quiero conseguir es que si por ejemplo escribo (Hangar) en la celda "H7", al finalizar al entrada del producto, aparte de copiarme la entrada en la fila 10, me la copie en la hoja "Arrastre_Hangar" y me inserte una fila nueva para que no se solapen nuevas entradas con la palabra "Hangar". …

Buenas tardes o días a todos; -Hoy traigo un nuevo reto que me gustaría que me ayudasen a resolver si es posible. Se trata de los siguiente: -Tengo un programa de trabajo del cual copio de una tabla de consulta unos valores y después los pego en otra. Hasta ahí todo bien, siempre y cuando en la tabla de origen todas la columnas tengan datos. El problema viene cuando hay una columna que tiene datos en unas filas y en otras no, entonces al hacer el pegado me aumenta una columna. Dejo un video para mejor comprensión del tema. Video: Copiar y pegar datos de origen Buen finde a todos CExcel.xlsm

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…

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

Buenas tardes, tengo una planilla en donde voy trayendo datos de otras planillas (copio y pego) una vez que ya tengo toda la información, necesito que mediante una macro/formula se eliminen todas las filas en donde el primer dato (ubicado en la columna A) tiene el siguiente texto: QHP Standard 1,QHP Standard 2, QHP Standard 3, QHP Standard 4 y QHP Standard 5. He aplicado la siguiente Macro, pero no se como unificar que evalúe las 5 variables, por lo que he tenido que hacer 5 macros, y después hacer una para unirlas a todas. Quisiera saber si existe la posibilidad de hacer solo una y que tome las 5 variables de texto posible Sub Eliminar_Filas_1() She…