Buenos días a todos; -Adjunto macro que me busca la última fila y columna con datos y establece area de impresión. También he puesto un textbox donde voy marcando el zoom. El la macro planteo algunas dudas al respecto. Agradecería vuestro comentario y ayuda al respecto. Cualquier duda comenten. Gracias y buen día a todos. MImprimir.xlsm

como puedo mejorar este codigo byfejoal para que realice la condicion de resaltar las celdas azules que estan cerca a la celda de borde a una distancia de 21 celdas anterior y porterior a la celda de borde el codigo realiza ese proceso pero me gustaria que el codigo fuera un poco mas reducido y ademas tengo problema con esta linea del codigo sub color Sub color() Worksheets("hoja2").Range("b2:ac33").Interior.color = xlNone Set ha = Worksheets("hoja2").Range("b2:ac33") Set hn = Worksheets("hoja1").Range("a1:cy42") 'controlar rango For i = 1 To hn.Cells.Count 'si la columna es par se omite If hn.Cells(i).Column Mod 2 = 0 Then GoTo SALIDA …

Hola Amigos, Quiero ordenar unas cuantas columnas, en el fichero lo dejo explicado, el orden también. Creo que es algo sencillo pero soy demasiado novato y no he sido capaz. Gracias por estar siempre ayudando. un abrazo vic Ejemplo Ordenar Cumple.xls

Buenas Noches: Tengo los siguientes códigos: Esté código copia a la hoja con el nombre de la celda T2 Sub Copiar_tkt_a_Kardex() For Each Hoja In Worksheets If Hoja.Name <> "TKT" Then 'Comprobamos antes si la hoja está entre las mencionadas en la columna R Dim qRangoR As Range Set Origen = Range("T2") 'qRangoR = Application.Intersect(Columns("N:N"), Hoja1.UsedRange) For Each cell In Origen 'qRangoR If cell.Value = Hoja.Name Then 'si la hoja coincide con alguno de los nombres de la columna N, se ejecuta ' Worksheets("TKT").Range("$A$3:$n$100").AutoFilter FIELD:=14, Criteria1:=Hoja.Name uFila = Worksheets("TKT").Range("A" & Rows.Count).End(xlUp).Row Works…

Buenas expertos! Tengo un problema con una macro que estoy intentando realizar. Lo que quiero hacer es realizar una búsqueda en una hoja de un libro1 y a partir de la celda encontrada seleccionar 12 celdas a la derecha y copiarlas a otro libro en una celda variable (lo estoy intentando con i,j para poder incrementar la i y baje a la siguiente fila). Esto lo quiero integrar en un bucle que vaya bajando por filas y siga copiandolas al otro libro como he dicho antes hasta que encuentre una celda en blanco. ¿Me podrían echar una mano a partir de la búsqueda? Gracias

buenas tardes a todos, he ido pidiendo ayuda y e logrado hacer bastantes cosas con un sistemita que me regalaron pero lo que quiero esta vez es poder hacer que mas de un usuario pueda ocuparlo ya que cuento con un servidor propio y no se como hacer xq no puedo compartir el libro xq tiene tablas me dice ojala me puedan ayudar adjunto archivo personal.rar

Buenas noches. Agradezco me puedan ayudar con una macro que realice un intercambio secuencial de números para un rango excel. Para tamaños variables y secuencias variables... Por ejemplo así: 59-54-41-27-13 54-59-41-27-13 59-41-54-27-13 59-54-27-41-13 59-54-41-13-27 Gracias por su tiempo.

Hola ! bueno acabo de entrar a hacer mi practica y necesito juntar en un excel determinada informacion proveniente de dos libros Libro NEH1 , pestaña OP1, CELDA H1-H3 Libro NEH2 , Pestaña OP2, CELDA D1 Y Juntar la informacion de ciertas celdas en un libro determinado GLOBAL_NEH ... todo esto sin necesidad de abrir los libros NEH1 Y NEH2 , pero que cierta informacion de estos como las celdas mencionadas se refleje en GLOBAL_NEH Ojalá me puedan ayudar ya que es la base para todo mi trabajo por mis 2 meses de practica

Buenos días. Necesito a ver si podéis ayudarme con una duda. Tengo un Excel que recupera datos de una multitud de archivos Excel. Lo que hace es que busca según un listado en una hoja y abre los Excel que encuentra que su nombre comience por los dígitos del listado. pero estos Excel que abre tienen macros, eso ralentiza su apertura y cuando abre por ejemplo 10 libros se queda bloqueado todo el Excel. No se si algún método para abrir un Excel desde otro pero que no ejecute las macros del libro que va a consultar para que así no haya demora y no ralentice este proceso. Por ejemplo abrirlos en modo lectura o algo así. Yo uso estas líneas con el método Open...,…

Hola a todos. Me gustaría saber si es posible que tras abrir el libro de excel, sólo se muestre la cinta de menu y el cuerpo de las hojas queden ocultas.

Hola a todos. Mi nombre es Maurizio y mi petición es esta: Hace algún tiempo le pregunté si podía ayudarme a extraer una imagen de la web para mi proyecto. Ahora usted, pero no recuerdo quién me dio un hermoso archivo que era adecuado para mí porque tomó la imagen de la web aunque la imagen cambiara a su vez. ¿Cómo podrían ser los símbolos de los pronósticos del tiempo? Pero este hilo, sinceramente hablando, ya no lo puedo encontrar en mis archivos. ¡Podrías recuperarlo de tus archivos! Si recuerdo correctamente lo había hecho yo (Antonio) I (Haplox) Pero repito no estoy seguro gracias ################################################################ Hel…

Buenas noches: En la libro que adjunto tengo una hoja con el nombre DATOS y otras hojas con nombres de la columna U, trabajo con un código (el cual esta en mi libro) y lo que hace este código es filtrar y según el valor de la columna R y copiar a la hoja que tiene el mismo nombre de la columna R, pero este código copia a todas las hojas sin importar si tiene datos para dicha hoja o no. Por favor solo quiero que copie a la hoja donde si le corresponde copiar los datos visibles que se tiene cuando se filtra según el valor de la columna R. Saludos cordiales Jesús CopiarKardexclte.rar

hola buenas tardes deseo realizar una búsqueda de datos con relación a mi archivo que dejo como ejemplo. al momento de abrir mi archivo deseo que me abra un formulario para poder realizar una búsqueda de acuerdo a apellidos y nombres porque con las teclas ctrl + b en ocasiones no encuentra el valor a buscar. gracias por su ayuda Alfabetico 98.xls

Primero que todo les doy gracias por la ayda que me han brindado en otros momentos. Ahora requiere desde una tabla que me cree en automatico hojas con la información de la tabla. en el archivo adjunto se puede ver un ejemplo de lo que se requiere. En total son mas de 1000 lineas las que tiene el archivo por eso la necesidad del macro. Casos.xlsm

AYUDA CON ESTE TEMA Hola expertos quisiera saber si hay alguna solución para este tema, ya no se que hacer no encuentro respuesta. Auxilio https://www.ayudaexcel.com/foro/threads/alimentar-bd-acces-exportando-un-excel.37638/ Gracias

Buen dia Tengo dos tablas en power pivot, en una tengo las ventas por canal de distribucion (tabla ventas) y en la otra tabla los que se gana el distribuidor por canal (flete), como hago para traerme a la tabla de ventas el valor pagado por canal (Ttal_Flete_Vrbl) de la tabla de fletes, teniendo en cuenta que el valor corresponda a la misma ruta y el mismo canal Agradezco su colaboración Fernando Trujillo Consulta PowerPivot.xlsx

Hola buenas. tengo poca experiencia con la programación en VBA y necesito ayuda mi problema es el siguiente: necesito una macro que busque por código, es decir, que busque por código la información de un producto en una hoja de excel y luego esta información me aparezca en un formulario, esta es la hoja MAESTRO DE PRODUCTO CODIGO DESCRIPCIÓN STOCK UBICACIÓN S DESPUNTE UBICACIÓN D 2003 PERFIL6 36 B1 13 A1 2004 PERFIL7 45 B2 14 A2 2005 PERFIL8 50 B3 17 A3 necesito que al escribir el código en el formulario y apreté el botón buscar me aparezca el resto de la información. agradecería mucho que me ayudaran con esto.

Buenos días, Tengo un libro donde voy registrando datos en una tabla, y quiero que cada vez que haya cambios en la tabla se realice una acción, pero solamente cuando se haya completado el registro completo del registro. En la hoja adjunta, detecto cuando hay un cambio en un rango ,pero claro, cualquier cambio. y me gustaria poder detectar cuando se hace un cambio en la fila completa de la tabla. Adjunto tambien el fichero... Gracias Registro trabajo.xlsm

Que tal amigos de Ayuda Excel tengo un archivo y requiero de su ayuda en lo siguiente: - Paso 1 En la Hoja Base a partir de la columna "A6" los ordene de la A la Z y seleccione el primer registro lo copie en la Hoja reporte, en la columna "C1" ponga el nombre del cliente y se imprima la hoja, que el proceso se repita hasta que seleccione todos los registros. - Paso 2 En la Hoja Base a partir de la columna "A6" los ordene de la A la Z para que seleccione todos los clientes que coincidan con la misma inicial y los copie en la Hoja reporte, en la columna "C1" ponga el nombre del cliente y se imprima la hoja, que el proceso se repita hasta que seleccione a todos los cliente…

Esto lo hice con un macro con referencia relativa, son cifras en la misma fila (196) , solo se debe ir avanzando hacia la derecha cada cuatro columnas. Creo que debería definir una variable que vaya acumulando los valores de cada celda, un bucle en donde se vaya avanzando. Pero no se cómo hacerlo. Muchas gracias.. ActiveCell.FormulaR1C1 = _ "='Flujo ingreso'!R[196]C[-3]+'Flujo ingreso'!R[196]C[1]+'Flujo ingreso'!R[196]C[5]" ActiveCell.Select Muchas gracias!!!

Buenas tardes, Os comento, he creado un formulario para introducir unos datos en una hoja "INFORME" del libro excel en el que trabajo. Esas incidencias se escribirán a partir de la línea 36 que es donde está ese apartado, bien esto con el siguiente código bien. Worksheets("INFORME").Range("A36").Value = Me.TextBox1.Value Worksheets("INFORME").Range("B36").Value = Me.TextBox2.Value Worksheets("INFORME").Range("C36").Value = Me.TextBox3.Value [/CODE] El problema es que necesito que siga escribiendo en la siguiente fila vacía si tengo más de una incidencia y no consigo hacerlo. Gracias de antemano

Hola!! Conformo que soy nueva en esto de macros. He hecho un formulario investigando aqui y alla, el cual agrega y modifica datos y los almacena en otra hoja del mismo libro. Hasta ahi mi formulario funciona como lo deseo, pero al querer modificar o agregar un dato faltante aun registrom quiero que la celda anterior a la celda a la cual agrego el nuevo dato, cambie el color de fondo. Investigando di con el evento worksheet_change(ByVal Target As range) el caso es que si hace el cambio de color de fondo, pero no queda permanente. Dejo el codigo que use y les suplico ayuda rivate Sub Worksheet_Change(ByVal Target As Range) …

Buenas tardes, Estoy realizando un macro donde me consolida toda la información o todos lo valores en una hoja , el mismo que me alimenta un grafico, este grafico siempre tiene que mostrarme los 3 ultimos meses. A B C D E 1 MESES TIENDA1 TIENDA2 TIENDA 3 2 OCTUBRE 1000 2000 3000 3 NOVIEMBRE 1800 2500 3200 4 DICIEMBRE 2500 5000 6000 5 ENERO 6 Para ser mas explícito, cada vez que ejecuto mi macro me agrega el nuevo con sus valores respectivos per mi grafico que siempre me debe mostrar la inf. de los 3 ultimos meses lo realizo manualmente, Este caso mi problema es actualizar el rango automaticamente, actualmente esta (b1:e1,b2:e4), cada vez q ejecuto la macro debe …

He estado trabajando en una base de datos de un pequeño sistema de mantenimiento el cual tome un archivo de esta pagina y la he estado adaptando a mis necesidades, hice un pestaña en la parte de maestro de fallas etc, llamado cerrar trabajos pero requiero que en el combobox solo me muestre los numero de ot el cual no tengan fecha de finalizacion con el fin de que no me muestre todos, y por consiguiente no engorde la base de datos, el usuario de mi archivo es jesus y la contraseña es martha, anexo vinculo del archivo... Nueva carpeta

Ola estoy tratando de enviar la Imagen del Userform/Imagen a una carpeta destinada en C:\Imagen dodne llegue con el nombre normal de la imagen. trato con algunos codigos pero me sale error, alguna falla que estare realizando a espera de sus comentarios y apooyo gracias. enviar imagen a carpeta.xls