Buen día!! Vuelvo a consultar con los que más experiencia y conocimientos tienen. En esta ocasión tengo 4 Libros, los cuales deben contener 7 hojas con los nombres de cada día de la semana (En los libros adjuntos coloco lunes y martes para ejemplo). En cada hoja se asientan valores iniciales y finales, pero los finales de un día son los iniciales del siguiente, es decir, del lunes pasan al martes...del sábado al domingo y del domingo al lunes del otro libro. El problema es: Cuando se cambia un equipo, el equipo nuevo posee contadores distintos al equipo que sustituyeron, por lo que debe tomar su lugar en la lista del día siguiente. Cómo se pasan los datos de un libro…

Saludos Masters con la siguiente cuestión en el adjunto hay una serie de marcas las cuales, lo que quisiera es poner todas las marcas en un userform para poder pegar directamente el objeto desde el userform. Lo que hago es que cuando nececito una marca me tengo que regresar hasta la hoja de marcas y una vez ahi copio la marca que nececito y la pego en la hoja donde estoy trabajando, esto me lleva mucho tiempo ya que trabajo con archivos de muchas hojas, entonces me lleva mucho tiempo estar localizando la hoja de marcas para copiar la que nececito gracias marcas de auditoria.rar

Lo primero saludaros a todxs y desearos un feliz anio (perdon pero no tengo enies en el teclado). Lo segundo presentarme ... soy nuevo en el foro y lo he encontrado cuando estaba buscando una macro para que se me abriera el cuadro de dialogo de "Guardar como" y que me pusiera como nombre del archivo el valor de la celda I11. La cuestion es que encontre esto que parecia funcionar a la perfeccion: ... se abre el cuadro de dialogo, aparece el valor de esa celda como nombre del archivo, me permite elegir la carpeta de destino, peeeero cuando le doy a guardar ... NO GUARDA NADA!!! :upset: Si me pudierais echar una mano, seguro que es una tonteria, pero tampoco es que sea m…

Copia de tabla con diseño Hola: Soy nuevo en el foro y no sé si alguien me pude ayudar. Necesitaría poder copiar todos los datos de una hoja llamada BaseDatos con más o menos 2000 filas y que tiene un "Diseño inicial", a otra Hoja llamada Informe y que necesito que los datos estén según el "Diseño Final". Les adjunto el fichero por si me pueden ayudar. Muchas gracias de antemano. Pregunta.xls

Saludos. tengo el siguiente problema espero me puedan ayudar tengo una pivot el cual con un combo quiero cambiarle los datos de la pivot, pero no se como hacer una macro que haga esos cambios me podran ayudar gracias

Necesito macro para eliminar celdas de una tabla segun mes . Adjunto archivo Gracias de antemano ejemplo.rar

Hola que tal He realizado una macro que hace un vlookup normal y me funcionaba a la perfección. lr = Range("L" & Rows.Count).End(xlUp).row Range("O2").Formula = "=IFERROR(VLOOKUP(j2,Sheet2!$A:$B,2,FALSE),"""")" Range("P2").Formula = "=IFERROR(VLOOKUP(D2,Sheet2!$D:$F,2,FALSE),"""")" Range("Q2").Formula = "=IFERROR(VLOOKUP(D2,Sheet2!$D:$F,3,FALSE),"""")" Range("O2:Q2").Select Selection.AutoFill Destination:=Range("O2" & ":Q" & lr), Type:=xlFillDefault[/CODE] El problema se me ha complicado porque solo necesito que ese vlookup funcione solo en los modelos que contengan WG038 o WG165. De manera directa, es decir en la formula lo he…

Estimados amigos del foro, aquí nuevamente haciéndoles una consulta en relación a poder identificar el genero y especie según se cumplen las caracteristicas alli puestas. Solo le he atinado a que me resulte una, el poco conocimiento no me da mas, por eso acudo a ustedes para saber como se podría resolver este tema. Agradezco su gentil apoyo Subo un archivo para que lo vean Clasificar.xlsm

Buenas amigos foristas Tengo una macro la cual toma los datos de una hoja y con eso se llena una base de datos de una aplicacion que tenemos, en la actualidad coloco For i = 4 To 8 session.findById("wnd[1]/usr/cmbRF02D-KTOKD").Key = objSheet.Cells(i, 35) session.findById("wnd[1]/usr/ctxtRF02D-BUKRS").Text = objSheet.Cells(i, 36) Next i Lo que deseo es que en la macro si existe informacion en la fila siguiente ejecuta el proceso sino pare Agrdezco su colaboracion Fernando Trujillo

Buenas, Hay alguna razon por la cual cuando se ejecuta una Macro, se genere un archvio de solo lectura alterno al original? El codigo que uso es este: Sub TrapasarTrimestre2() 'Leyendo cadena de texto Dim Anio%, Trimes As Variant Dim Conn As Object, rst As Object, SQL$ Dim Ruta$, Datos As Worksheet, RELACION As Worksheet, Rubro$, Tabla$, Campos$, RutaTriAnt$ Dim LibroDestino As Workbook, Z As Long, Condicion$, Cm%, Columnas As Variant, CamposRecord As Variant Dim FIni As Date, FFinal As Date ', UltFila As Double Dim HojaActual As Worksheet, Uf As Double, x As Long, y As Long Dim LibroTriAnt As Workbook With Application .ScreenUpdating = False .EnableEve…

Mi compañera y yo solo hemos hecho hasta la descomposicion factorial que nos muestra los exponentes. Nos sería de gran ayuda la resolución del resto. Introducción La teoría de los números es la disciplina matemática que se ocupa del estudio de las características de los números. Según esta disciplina, un número de gran alcance es un número natural en cuya descomposición factorial no contiene factores que no aparezcan más de una vez (todos los factores tienen exponente mayor o igual a 2). Problema 1. Elabore una función que indique si un número pasado como argumento es de gran alcance. 2. Diseñe y programe un programa que liste los números de gran a…

Que tal a todos, Nuevamente necesitando del expertis de alguien para finalizar mi proyecto. Se trata que somos un grupo de 10 personas en una oficina que necesitamos realizar encuestas a los clientes. Lo que necesito es que cada quien, tenga el archivo que yo hice,y que los resultados de cada uno sean enviados a mi maquina a otro libro que lo consolidara todo. Investigando un poco y estudiando logre hacer un archivo pero el problema que tengo es que no me guarda los resultados en el libro que tengo en mi maquina. Se los comparto. La contraseña del VB es "123". Gracias por su ayuda. Aseguramiento de Calidad_Nuevo - copia.zip

Este simple problema, al parecer, me ha vuelto loco jajaja la cosa es esta tengo en excel una hoja con 4 columnas A -------- B -------- C -------- D MOTOR -- BOMBA -- INYECTOR MOTOR --CARTER FRENOS --BANDAS FRENOS --VALVULA --RACOR --TORNILLO FRENOS --VALVULA -- SIS. T CAJA --CONJ. VAL CAJA -- DISCOS tengo un userform con 4 combobox Combobox1 Combobox2 Combobox3 Combobox4 Lo que necesito es que al elegir, por ejemplo, en el combobox1 FRENOS, en el combobox2 muestre "BANDAS Y VALVULA" y si elijo "VALVULA" del combobox2 muestre en el combobox3 "RACOR Y SIS. T" y el mismo proceso para el combobox4 No he dado aun con la form…

Hola mi duda es sobre selección de rangos. ¿Para poder seleccionar un rango la hoja donde se encuentra debe estar seleccionada/activada? Lo he intentado mientras estaba seleccionada otra hoja de esta forma: Sheets(«Datos»).Range(«A1:A5»).Select Pero da error, para evitarlo solo se me ocurre, seleccionar la hoja previamente: Sheets(«Datos»).Select Range(«A1:A5»).Select No se si hay alguna forma de hacerlo sin seleccionar previamente la hoja, para que sea un proceso mas rápido. ¿Seria lo mismo si pongo .Select ó . Activate; cual es la diferencia entre ambas? Por otro lado; ¿Todo lo anterior es extrepolable a otros procedimientos?, por…

Buenas tardes Cómo puedo hacer para que al utilizar la función buscarv, me reconozca los datos que introduzco en una celda como el nombre de un archivo .xls???? Quiero hacer una plantilla para hacer presupuestos. Cuando meta el número de cliente de una empresa, quiero que me busque su tarifa para hacer la cotización. Si introduzco esta fórmula =BUSCARV(B11;'C:\PEDIDOS\[$L$4]$L$6'!$1:$65536;8;FALSO) L4: será el número del cliente seguido de .xls L6: será el número de la Hoja donde está ubicada la BBDD. Al introducir los datos y la fórmula me pide que le indique donde está ubicado el archivo, al pinchar y mostrárselo ya reconoce las tarifas y me da los datos que quier…

Ya no estoy realizando un archivo con macro incluida. Como no estoy atascado, no solicito vuestra ayuda. Gracias por la ayuda. Mode ironic off. Saludos.

Hola Quisiera si es posible que algunos de vosotros me echara un cable sobre este tema yo lo e intentado pero no soy capaz de realizarlo. Estoy creando un calendario para poder llevar el control de los días de permiso, vacaciones etc. Quisiera poder hacer que mediante una macro o de alguna otra manera, marcar todos los sábados y domingos automáticamente, y si en ese mes tuviera un día de fiesta poderlo marcar en el día y desmarcar cuando no lo sea, sin modificar los colores. Gracias Un saludo prueba.rar

Buen dia, Estoy en el desarrollo de una especie de buscador dinámico en la cual yo dígito un código de producto y automáticamente me trae toda la información, esto lo tengo programado por formulas y macros pero ahora quiero llevarlo a mas con la posibilidad de traer imágenes para que al momento de hacer la consulta conozca el producto en físico. He buscado en ingles y español una solución pero solo me permiten hacerlo si las imágenes están en el mismo libro, o si la celda esta como lista desplegable y formulaciones "SI". y yo no quiero que funcione de esa manera. Mi objetivo es que automáticamente me traiga la imagen cuando yo digite el código en una celda y si cambi…

antes que nada saludos todos, me gustaria saber como puedo pasar datos de una hoja cualquiera de un libro cualquiera a un formulario en especifico, la intension es hacer que otra persona llegue con su usb y su informacion previamente capturada para evitar copiar y pegar en el nuevo libro, tambien me gustaria saber los pros y contras que generaria, para ello se me ocurre la propiedad showmodal del formulario pero como no me ha funcionado, ¿alguien puede optimizar esta idea? o alguien sabe alguna otra? de antemano muchas gracias del libro al formulario.rar

Amigos, su ayuda por favor, quiero que aparezca al lado derecho en la hoja de Excel el PDF seleccionado. como verán en el archivo hay una base, la idea es que cuando uno selecciona un archivo aparezca el PDF asociado. si tienen una mejor idea de como hacerlo se los agradecería mucho. a la espera de su ayuda. gracias Celest3 PRUEBA.rar

uenas tardes una consulta y disculpen la molestia: pretendo que a la hora de abrir el libro de Excel me solicite introducir la clave de tres usuarios ya establecidos, los cuales seria: 1) YORDIN 2) YHOAN 3) OMARILYN Cuya clave de acceso sea “123” para luego yo modificarla en la macro. gracias. FILTRO.rar

Hola a todos La cuestión que os presento es la siguiente: Por una parte, tengo unos códigos en la columna A y en la columna B sus datos correspondientes. Por otra parte tengo, en la misma Hoja, dos celdas la E2 con un nuevo código y la F2 con su correspondiente valor. La pregunta es cómo se puede hacer para que si éste nuevo código es distinto a los contenidos en la columna A , se añada dicho código y su valor en las primeraS celdas vacías de las columnas A y B respectivamente. Libro.zip

Control de Existencias Prueba.rar

Hola Expertos. En un libro compartido tengo una macro que realiza un autofiltro por nombre de usuario. Necesito que ese filtro permanezca durante el tiempo en que trabajan en el libro. Para esto necesito deshabilitarles todas las opciones de filtro, las del tab Datos y las del Tab Inicio para que no quiten el filtro activo. Esto es en Excel 2007. Cómo puedo hacer esto mediante VBA? Muchas gracias por sus respuestas. He probado el código siguiente pero solo me funciona con Excel 2003: [/b] [color=#0000ff]Private[/color] [color=#0000ff]Sub[/color] Workbook_Activate() Application.CommandBars.FindControl(ID:=899).Enabled = [color=#0000ff]False[/color] [color=#0000ff…

Buenas tardes a los integrantes de este foro, recurro a uds para que me brinde su apoyo en como hacer que en la Barra de estado de Excel, muestre el tiempo de ejecucion que se describe en la macro que se adjunta, ya que he visto ejemplo donde mencionada por "Porcentaje", desde ya agradezco su apoyo y colaboración. Sub Reloj() Application.ScreenUpdating = False ActiveWorkbook.Save Application.OnTime Now + TimeValue("00:00:30"), "reloj" Application.ScreenUpdating = True End Sub Saludos.