Hola gente, tengo una consulta sobre un libro que estoy creando. Tengo un indice con todas las hojas del libro, y lo que busco es que al presionar el link con el nombre de la hoja solo muestre la hoja de destino por unos segundos. También podría ser la posibilidad de poner un botón en cada hoja para que vuelva al menú principal y este se ejecute automáticamente cada "x" segundos. En el archivo que adjunto puse el indice en cada hoja, pero ahora el indice que necesito es mucho mas grande y no entra para poner en cada hoja, y que se vea completo en un monitor de 28", por eso quiero poner el indice en una sola pagina, y luego de accionar algún botón regrese a es…

buenas noches, soy sonia y tengo una gran duda necesito vuestra ayuda. estoy haciendo una calculadora de primas, y he hecho una macro para que vacie las celdas y a su vez devuelva el valor 0 a las celdas borradas. hasta ahi bien, pero cuando pongo un nº en dos celdas determinadas (C20 y C21) la formula que esta en la celda N4 no calcula, para que haga el calculo tengo que poner yo misma en las celdas C20 y/o C21 un 0. no se si me he explicado bien..... adjunto fichero. Gracias! calcu_precartera.xlsm

Buenas noches a los integrantes de este prestigioso foro, en esta ocasion recurro a Uds, para que brinde su ayuda con una macro, el cual me permita copiar o mover los archivos con un nombre particular MN PIA, el cual detallo a continuacion. *La informacion (archivos) se encuentra en una carpeta especifica (en este caso esta en la unidad "D:\PLANILLAJE PTO ILO\AÑO 2020\PLANILLAJE" AFPNET PTO ILO MN PIA 10-10-2020 20-10-17 HRS.txt CONSOLIDADO CONTAB. 01 GENERAL MN PIA 10-10-20_20-10-30 HRS.xlsx CONSOLIDADO PTO ILO MN PIA 10-10-2020 20-10-30 HRS.xlsm DATA DE JORNADAS_BACKUP MN PIA 10-10-2020 19-9-29 HRS.xlsx PLLA MN PIA PTO ILO MN SETIEMBRE DEL 2020 10-10-20_20-10-3…

Estimados adjunto un archivo el cual tiene un listbox y un textbox de busqueda donde localizo el numero de un equipo pero quisiera para no ponerle otro textbox que solo me cargue en el listbox las ordenes de trabajos que se encuentran con la palabra abierto cualquier ayuda que me puedan ofrecerme les estare agradecido. Para cargar el listbox presionar el boton 1 que aparece en la hoja 1 Libro1.xlsm

GRUPO AYUDA EXCEL DIOS LOS BENDIGA Y TENGAN USTEDES UN EXCENTE DIA TENGO EL SIGUIENTE CODIGO Y EN RANGO DONDE DESEO COPIAR ES HASTA LA COLUMNA N =CopyToRange:=Range("A5:J2000") CAMBIO EL RANGO A "A5:N2000" Y ME SALE ERROR QUE NO ME PERMITE EJECUTAR LA MACRO SI ALGUIEN PODRIA AYUDAR A MEJORAR EL CODIGO O TALVEZ ESTOY OMITIENDO ALGO DE ANTE MANO GRACIAS Sub CONSULTA_DOC() ' ' CONSULTA_DOC Macro ' ' Acceso directo: Ctrl+Mayús+F ' Sheets("DIARIO").Range("A5:N10000").AdvancedFilter Action:=xlFilterCopy, _ CriteriaRange:=Range("Z5:AA6"), CopyToRange:=Range("A5:J2000"), _ Unique:=False Range("A6").Selec…

Buenas amigos, les traigo otra duda que me está volviendo loco para ver si alguien me puede ayudar. Estoy intentando copiar todas las hojas de un libro a otro libro que ya tengo con varias formulas. Estoy utilizando este código Sub Macro5() ThisWorkbook.Sheets.Copy Before:=Workbooks(“Listado_de_Fondos”).Sheets(1) End Sub pero no consigo que me copie las hojas, me tira un error. El tema es que las hojas que necesito copiar, cada día cambian de nombre y de numero, y necesito seleccionar todas para poder copiarlas de golpe al libro existente y no encuentro la forma de hacerlo. Si selecciono este código: Sub Macro5() ThisWorkbook.Sheets.Cop…

Hola a todos Espero estén todos bien, junto a sus seres amados Les escribo solicitando vuestra ayuda, adjunto un libro con una pagina en internet, desde donde necesito extraer información. La pagina es la siguiente: Busqueda Desde ahí necesito sacar la información como se menciona en el adjunto, hay ocasiones en que devuelve mas de un resultado al generar la búsqueda. El dato a buscar es el nombre, en columna a. Un abrazo fraterno a la distancia Pedro Prueba datos.xlsm

Buenas!! Muchas gracias por la ayuda que siempre daís. Adjunto archivo para explicar mi busqueda de una solucion. Mediante un userform introduzco y borro nombres a dos tablas. Después las fechas la introduzco manualmante. Cuando introduzco el nombre, todo va bien. Ya que lo introduce en la tabla y por un código puesto en la hoja me lo ordena automáticamente. De esta forma me sale ordenado en el userform. El problema es cuando elimino el nombre, me elimina solo el nombre y me lo ordena de nuevo automaticamente, que está bien. Pero, me deja al final de la columna las fechas y por ende cuando introduzco un nuevo nombre le asigna esa fecha. Lo que deseo co…

Buenas tardes amigos, espero que estén todos bien Después de revisar el foro a fondo no encontré nada parecido a ver si me pueden ayudar con esta problematica que tengo. Tengo un listado de fondos y quiero mediante una macro crear una hoja por cada fondo distinto que tenga en el listado. He visto propuestas por internet como esta: [CODIGO]Sub CreateSheets() Dim rng As Range Dim cell As Range On Error GoTo Errorhandling Set rng = Application.InputBox(Prompt:="Select cell range:", _ Title:="Create sheets", _ Default:=Selection.Address, Type:=8) For Each cell In rng If cell <> "" Then …

Hola buen día a todos Quisiera pedir de su apoyo para lo siguiente, he hecho el siguiente archivo a través de varias consultas y poco a poco lo he ido creando y pues ya casi lo tengo listo, pero, por más que intento solucionar lo siguiente no mas no me da. 1.-Al Abrir Excel aparece un formulario y ese tiene la finalidad de decirme el nombre de la persona, así como los días que faltan para la fecha de su vencimiento de contrato, sin embargo, por alguna razón que no logro entender, me toma todos y lo que necesito es de que si es el mes de Octubre me digan cuales vencen solamente en ese mes, cuando llegue Noviembre, me diga cuales son nada más los de noviem…

Buen día a todos, soy Victor, soy alguien que no sabe nada de macros, pero se que se puede crear las macros para automatizar algunas cosas y con esto ahorrar tiempo de trabajo, lo que yo hago es recibir un archivo muy grande de pacientes atendidos en una clínica dental, luego de esto el primer paso es ordenar alfabeticamente por el nombre que eso si lo se hacer, después de esto empieza lo que necesito que me ayuden, adjunto un archivo con indicaciones sobre lo que necesito, espero lo entiendan y comprendan que necesito hacer, vuelvo y repito no se absolutamente EJEMPLO.xlsxnada de macros.

hola expertos mi idea es , si existe algun codigo que elimine los numeros primos en un rango en mi caso "a1:sx42" les agradezco mucho

Hola a tod@s. El siguiente código me permite trabajar con Excel 2007 y Access 2007 extrayendo información mediante una consulta SQL. Sub ImportarDesdeAccess() Dim conexion As Object Dim consulta As String Dim cadenaConexion As String Dim cadenaConexionSHM As String Dim contador As Integer Set conexion = CreateObject("ADODB.connection") Sheets.Add.Name = "MULTIEM" Range("A1").Select 'Set cnna = CurrentProject.Connection cadenaConexion = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=\\Srvmultiem\mgalpon\BODEGA-DSK\A2020\INGRESOS2020.mdb" consulta = "SELECT a.FOLIO, a.[ESTADO DATOS],e.[CODIGO REL], MAX(b.ITEM) AS [NRO DE ITEM], SUM(b.CANTIDAD) AS C…

Buen día amigos, Estoy intentando insertar un N° determinado de filas según las cantidades del ítem.Ejemplo.xlsx Es como pasar de una tabla dinámica a la base original. Lo importante es que tiene que haber 1 ítem por cada fila. Por ejemplo, en la fila 4, tengo 5 unidades del producto que se menciona y lo que yo debo hacer, es desglosar esas 5 unidades para que queden 5 filas con 1 unidad de ese ítem. En el archivo se puede apreciar el desglose que necesito. Favor de su ayuda. Saludos

Hola, Tabla con dos columnas, en la columna A está el valor que deseo buscar y que coge de un formulario Para la búsqueda del valor utilizo Vlookup, pero necesito decirle que cuando encuentre ese valor, seleccione la fila y la borre. Eso es lo que me falla Gracias

Hola a todos Tengo tres libros protegidos y cifrados. Los tres libros tienen la misma contraseña. Mi pregunta se refiere, a que cuando se carga el imputbox de petición de contraseña al abrir el primer libro, sería posible, copiar esa contraseña introducida de alguna menera haciendo que se abra el segundo libro y se pegue en el imputbox correspondiente, haciendo lo mismo con el tercer libro. He mirado y en vba no queda constancia de ese imputbox de apertura que usa el excel 365 al proteger con contraseña y cifrar el fichero. Un saludo y muchas gracias

Buenas por favor necesito de su ayuda. Tengo una hoaj en la cual estan mis datos, quiero crear con macros nuevas hojas que contengan las quince primeras filas en una hoja nueva, y las siguientes quince en otra hoja, y asi sucesivamente hasta terminar con el listado, aun asi la ultima hoja creada no tenga los las quince filas. Se podria hacer tambien para una cantidad variable de filas es decir 20 o 30 Gracias por su apoyo Medicos.xlsm

Que tal buenas tardes a todos!!! Para consultar y pedir apoyo si alguien me puede ayudar en este documento tengo una macro que se ejecuta con convinacion de teclas Ctrl+T dicha macro quiero eliminar la después de un cierto tiempo para que ya no se pueda ejecutar espero alguien me pueda ayudar y darme una propuesta Existencias_productos.xls.xlsm

He revisado los temas con el buscador y aunque he encontrado algunos que pudieran valerme no he sido capaz de adaptarlos a mi necesidad obteniendo por ello toda clases de errores. Mi petición es la siguiente: Llevo el control de uso de una serie de edificios y salas donde se realizan diferentes presentaciones y actos y necesito destacar el final o inicio de cada Orden coloreando la fila correspondiente con un color suave (gris, violeta, ..). Agradeceré las ayudas que me podáis prestar.Control de actividades.xlsx Un saludo

Buenos dias a tos, Espero y deseo que todos esteis bien en los tiempos que corremos. Una vez más recurro a vuestra ayuda, gracias por anticipado Haber si soy capaz de explicarme Necesitaria cubrir las celdas de la hoja BBDD O98:Q122, con las celdas K9:N9 de la hoja Datos, aplicando todas las opciones posibles de las celdas B2:E2 que son lista despegables dependientes Es decir, necesito rellenar las celdas de la hoja BBDD O98:Q122, con las celdas K9:N9 de la hoja Datos, el como lo dejo a la imagibacion vuestra Esta vez creo que esta duda es algo mas compleja y no se si tiene solucion Gracias de todos los modos EJEMPLO.xlsx

como puedo agregarle al codigo para que realice la busqueda de derecha a izquierda y igualmente en diagonal hacia la izquierda sopa de letras.xlsm

Buenas tardes a todos, Con el permiso de @JSDJSD subo la hoja que creó él para ayudarme en otro tema ya resuelto y añado mis nuevas preguntas sobre el mismo archivo. Al abrir el archivo veréis que he intentado numerar y explicar mis consultas en el mismo excel. Resumen.... Aplicar condición de Mínimo y Máximo de caracteres en TextBox de formulario. Copiar y pegar en otra hoja el resultado obtenido con el buscador del formulario y ordenar columna sin "romper" las formulas de la columna B. Subo archivo para que lo podáis entender mejor. Un saludo y mil gracias como siempre y por adelantado. GenCv4.xlsm

Expertos, disculpe tengo un archivo que cuando valido me debe copiar ese dato a otra hoja, e intentado grabando macros y solo me funciona para uno me debe hacer con todo. Tengo un video que e preparado para que me puedan entender mejor, por favor me ayuden como lo puedo hacer muchas gracias. https://drive.google.com/file/d/1VN18MGHOUM3nZwgJH6TxnMgi7kgt74cC/view?usp=sharing Adjunto el archivo. Rodillos.xlsm

BUENAS TARDESA TODOSY OJALA ME PUEDAN AYUDAR, TENGO ESTA MACRO QUE ME LA FACILITARON OJO NO ES DE MI AUTORIA MUCHO NIVEL PARA PODER HACERLO YO: Sub Copia_recetas() Dim Rng$, x# Dim rept As Range Dim celda With Sheets("BD_Recetas") Rng = .Range("D1") Range("C9:C48").ClearContents x = 9 For Each celda In Sheets("Proy.-Comer").Range(Rng) If celda <> "" Then Set rept = .Range("C9:C48").Find(celda, , , xlWhole) If rept Is Nothing Then _ .Cells(x, "C") = celda: x = x + 1 End If Next End With Sheet…

Hola!! Desarrollé un libro de excel con algunas formulas de uso común para mi y lo grabe en mi computadora como "COMPLEMENTO DE EXCEL" dejé que excel lo colocara en la carpeta por default que utiliza. Para trabajar ocupo el equipo de mi oficina, un equipo de escritorio en casa y una laptop, los tres con Excel 2016 MSO. Actualmente estoy desarrollando una solución utilizando VBA y dentro del código hago referencia a un par de formulas de las que contiene mi complemento utilizando la función Application.Run llamando al archivo mediante la ruta completa hasta la carpeta donde Excel guardó el complemento, en la computadora. El archivo de trabajo que estoy des…