Hola, soy nuevo en el foro y he creado un libro en excel con codigo que he recogido de aqui y de haya, pero me he atorado al querer hacer el codigo para Buscar, Borrar, Editar y Actualizar informacion ("SIN USERFORM") o formularios. Adjunto el archivo. Espero les agrade lo que tengo hecho, aun le faltan cosas, quiero que muestre cada vez que busque los datos requeridos y este se encuentre en la condicion de cuarentena me muestre la foto de acuerdo a la direccion de la foto que le dimos al modificar la condicion del archivo "CUARENTENA". El libro al abrir reproduce un sonido de bienvenida como si fuera sofware de paga o una aplicacion profesional, pero hay que redirecci…

Hola! Tengo un problema tengo un docuemnto de excel en el cual quiero hacer un metodo de busqueda el cual encuntre todas las filas que contengas en dato a buscar en cualquiera de las columnas, ya que tengo varias columnas que contienen un valor similar , con lo cual ya he intentado buscar por columno y saco las coincidencias , pero tengo k hacerlo con cada columno que tenga ese mismo estatus que deseo y quiero algo que me busque entre columnas y filas todos los datos que contengas la coincidencia con la busqueda que quiero!!! Y no se como hacer eso ojala me puedan ayudar soy nuevo en esto..gracias

Hola, tengo un juego de Poker que funciona perfectamente. Pero lo copio a un Mac y el juego lo puedo modificar a mi gusto pero las imágenes del cubilete (como si se moviera) no funciona, solo las imágenes, que parte del código debería modificar ? envío parte del programa, la macro en cuestión. Sub Tirar() Dim COLUMNAS As String Dim DADOS As String, DADO As Integer Dim y As Integer, d As Integer '-- Randomize Range("A1").Select COLUMNAS = "FGHGHGI" 'Columna de la imagen del cubilete DADOS = "JKLMNO" 'Columna de la imagen de los dados Visualizar False For y = 1 To Len(COLUMNAS) ActiveSheet.Shapes.Range("CUBI…

Hola buenos días amigos del foro, Actualmente manejo una bitácora de actividades en mi trabajo que se maneja diariamente, pero me encargaron automatizarla un poco, entonces estoy creando una pequeña ventana para poder filtrar rápidamente los campos que son de uso diario, ahí es donde no sé como puedo crear una macro para poder agrupar los días en semana (Ej.: Semana 1: 1,2,3,... / Semana 2: 7,8,9,...) ya que por ahora solo se hace manualmente, también en la columna "Turno" como crear un combobox que seleccione varias opciones (como si fueran checkbox) la verdad entiendo algo de macros pero no soy experto, agradecería mucho cualquier ayuda o sugerencia para reestructurar …

Estimados(as) Junto con saludar y esperando estén todos bien, paso a exponer mi duda: como puedo copiar un rango de celdas, que conozco numericamente su fila y columna en otra hoja donde conozco el destino lo conozco tambien en forma numerica tambien Intento hacer esto ------>>>> worksheets(3).range(cells(valor1,valor2), cells(valor3,valor4)).Copy Destination:=Worksheets(2).range(valorx,valory) ?????? gracias

Buenos días, Antes que nada, muchas gracias a todo aquel que me pueda ayudar, a ver si me explico bien, en la celda L5 tengo un numero de pedido, otras celdas estan relacionadas con esta por BUSCAR EN V, cuando un textbox me vuelve a poner en la celda L5 el número de pedido, las otras celdas relacionadas con L5 por BUSCAR EN V, no reconocen el número de pedido (#N/A) y tengo que clicar 2 veces en L5 para que las otras celdas la reconozcan. Todos los Buscar en V son iguales. De nuevo muchas gracias Saludos, Drosofila

Por favor, necesito ayuda para saber si es posible, buscar datos en un listado y copiar y pegar en otra hoja, es decir buscar vertical y pegar horizontal, pareceria una pregunta muy comun, ...pero la diferencia y que es complicado (al menos para mi) es que el criterio de busqueda, está por ej. en la columna G, y los datos que deseo copiar y pegar en otra hoja estan en la columna B, adjunto un archivo , esperando me haya explicado bien y que alguien me pueda ayudar a resolverlo o que me digan si no se puede...... Gracias de antemano Buscar.xls

Estimados amigos: Vuelvo a abusar de los conocimientos de este foro para ver si alguien puede echarme una mano con una macro que me permita importar los datos de un archivo TXT tabulado a una hoja de Excel, pero con desplazamiento de referencias. Es decir, los datos importados no se copiarán en celdas contiguas, sino que lo harán en filas y columnas distintas (aunque con un patrón determinado). Adjunto un archivo que espero aclare lo que necesito. Agradezco de antemano cualquier ayuda que puedan prestarme. Cordialmente. Macro TXT2XLS.zip

Buen día. Estimados miembros del foro. Solicitando su ayuda para desbloquear el proyecto de VBA de una macro de excel de la cual no conozco el password. Conozco el password de los libros contenidos en ella pero al querer desplegar los libros ya que se encuentran ocultos desde VBA el password que tengo no funciona. El password de los libros es Fluids_Scorecard Trate de adjuntar el archivo pero no me lo permite por el tamaño. Mi correo es par_meno en live.com De antemano agradezco su apoyo.

Buenas noches a todos; Necesito hacer funcionar varios combobox dependientes en un userform, (lo tengo hecho ya mediente validación de datos), pero no me sirve, necesito que sea en un userform. No se como se puede hacer mediante VBA, pero es que además, los datos de la hoja que están repetidos se han de mostrar además en el userform como únicos. He subido un ejemplo y una captura de pantalla de como debería funcionar. A ver si me podéis echar una mano, compañeros. Saludos!!! COMBOBOX DEPENDIENTES.xls

Hola, Lo primero, desde aquí, agradecer y pedir perdón a Gerson Pineda por su atención y mi falta de consideración. Tiene su explicación. De nuevo, perdón. La pregunta es: De una tabla general debo hacer subtablas (por decirlo de alguna manera) Tengo que eliminar en bloque registros concretos. Lo hago utilizando los filtros pero es muy tedioso. He intentado crear una macro utilizando la grabadora de macros. Aquí me ha dado el primer error, ¿alguna solución? Si tiene arreglo, espero que sí, ¿puedo copiar ese código en otro módulo y cambiarle los criterios del filtro para crear otra macro distinta sin tener que volver a usar la grabadora? Un saludo, codigo filtrar y e…

Hola colegas, buenas tardes, buenos días o buenas noches según el caso de ustedes y espero se encuentren bien de salud. Hoy necesito una ayuda más de ustedes. Hace más de un año hice un Proyecto (Conciliación y Disponibilidad Bancaria) con ayuda de algunos de ustedes que me es muy útil en mi trabajo diario y que funciona perfectamente, pero hubo en mi empresa un cambio de mando y el Jefe nuevo que entró quiere que le envíe por e-mail diariamente el reporte. Mis conocimientos no llegan hasta ahí, pero sé qué se puede hacer porque en algún momento recuerdo haber oído a Sergio Alejandro Campos hablar del tema. Ahora, ¿qué necesito? Este Proyecto trabaja con tres …

Hola, tengo un userform con 2 combobox en el primero cargo un turno y el segundo se llena con los nombres y rut según el turno, lo que quiero ahora es que al seleccionar el nombre se llene un listbox con los datos de la hoja “Materiales” según el rut , el rut se puede repetir muchas veces en el listado y en el listbox debieran aparecer todos los registros Adjunto lo que tengo hasta ahora Slds.- Macros.rar

Buenas, necesito ayuda con esta macro. La vengo usando hace ya años, pero de repente sale este error: "Error '1004' en tiempo de ejecución", pero no consigo saber a qué se debe. Además sólo pasa de vez en cuando. ¿Alquien podría echarme una mano? Sería en la hoja de presupuesto: creando capítulos y añadiendo partidas (es al crear nuevas partidas cuando falla). Muchas gracias por adelantado!! Estoy intentando subir el archivo en zip pero no me deja, ¿cómo lo podría subir?

Hola a todos. Me llamo Fajardo y soy nuevo en este foro por lo que aprovecho para saludaros. He intentado crear un formulario para rellenar una ficha y cuando llego al cuadro combinado 3º para rellenar las celdas consecutivas con direrentes conceptos (desde la celda B10 en adelante) se me duplican éstos y si busco algún otro se van seleccionando y escribiendo solos otros conceptos en las celdas. El código de este cuadro es: Private Sub ComboBox3_Change() fila = 10 col = "B" Do While True If IsEmpty(Cells(fila, col)) Then Exit Do fila = fila + 1 Loop Cells(fila, "B").Value = ComboBox3.Text End Sub Intentaré añadir el fichero para que se pueda entender mejor to…

Buenos expertos necesito ayuda por favor, tengo la siguiente macro a medias y necesito un detalle. El archivo Buscador tiene la macro que busca según Rut y producto, en un 2do archivo donde trae datos del rut buscado y los copia y pega en el buscador, lo que necesito es que esta macro dentro de esta misma búsqueda que acabo de describir me traiga valores desde un 3er archivo (columna D y G del 3er Archivo (archivo: CG_20210308.CSV )) la macro: busca datos Rut en columna A y producto en columna BSegundoArchivo.xlsx tiene la data en las columnas de este archivo en color naranjo: D, S, V, W, AG, AQ y el 3er archivo CSV = CG_20210308.CS: Tiene la data en las c…

Hola Buenas tardes. Solicito nuevamente su orientacion y ayuda. Tengo un formulario (Formulario1) desde el cual puedo abrir el formulario2. Estoy usando esta macro en Formulario1: Formulario2.Show[/PHP] Estoy suando esta macro en el formulario 2: [PHP]Private Sub UserForm_Initialize() If FURMULARIO1.Visible = True Then Unload FROMULARIO1 End Sub[/PHP] Para que al abrir el formulario 2 se cierre el formulario 1, pero al hacerlo en viceversa me bota el error. Parcticamente lo que deseo hacer es, del formulario 1 abrir el formulario 2 y se cierre el formulario 1, y del formulario 2 poder abrir el formulario 1 y que se cierre el formulario 2. De antemano m…

Tengo una tabla dinamica que contiene dos columnas A=Ciudad B=Cantidades. Quiero que al dar doble click a cualquiera de estas celdas (B4:B30) de despliegue normalmente el showdetail de la tabla, pero que a partir de ahi se ejecute el siguiente macro. que no es nada mas que quitar columnas innecesarias. espero me puedan ayudar ub Macro5() ' ' Macro5 Macro ' ' ActiveCell.Offset(0, 50).Columns("A:F").EntireColumn.Select Selection.Delete Shift:=xlToLeft ActiveCell.Offset(0, -16).Columns("A:O").EntireColumn.Select Selection.Delete Shift:=xlToLeft ActiveCell.Offset(0, -6).Columns("A:E").EntireColumn.Select Selection.Delete Shi…

Buenas. Noches Adjunto.Archivo que estoy intentando copiar datos de Excel a Acces espero me digan donde estoy cometiendo el error de antemano muchas gracias Exportar .zip

Hola, buscando a través del foro encontré una macro que hacía lo que estoy buscando. Sin embargo, no consigo adaptarla exactamente a mi hoja. Mi problema es el siguiente: Tengo un userform con tres combobox. La idea es que cuando el se inicie el userform, se cargue el combobox48 con los datos de la columna1 (hoja1). Cuando seleccione un dato del combobox48, se debería cargar el combobox49 con los datos de celda de la columna2 que están justo al lado de la celda donde se encuentra el dato del combobox48. Y a continuación cuando seleccione un dato del combobox49, el combobox50 debería cargarse de igual modo con los datos de la columna3 Ejemplo: Si en combobox48 seleccio…

Buenos Días Necesito ayuda con una macro que utiliza un Userform y necesito crear un combox dependiente de otro. Es decir que si en uno selecciono Mercadeo en el otro me indiquen las opciones de Mercadeo Gracias No me deja subir el archivo con la extensiòn .xlsm

Hola de nuevo, seguimos con formateos. En la macro que adjunto al añadir un numero a la columna "E" de mi tabla "Tabla" a través del evento "Worksheet_Change" de la hoja me lo transforma en formato hora es decir, si pongo 0.5 el formato devuelto es 00:30:00. Lo que me gustaría saber si el código es del todo correcto o se puede mejorar ¿? Saludos. Horas.xlsm

Hola buenas tardes a todos. Por ahí encontré un código que realiza búsqueda y regresa múltiples resultados, sin embargo, no logro identificar como sería para que me repita los datos de acuerdo a un rango de fechas, adjunto archivo en donde muestro de como actualmente me devuelve el resultado y como debe de quedar, Ojala alguien me puede orientar, de antemano gracias... Saludos, Diego Busqueda con multiples resultados.xlsm

Buenos dias, amigos espero me puedan ayudar con este problema que encontre. Tengo abierto un formulario1 donde hay un listview, llamo al formulario2 donde ingreso los datos para el listview del formulario1, el problema es que al cerrar el formulario2, quisiera que el foco pase al listview, pero no lo consigo: Private Sub btnAceptar_Click() Call Agregar_Asientos_Voucher Unload Me UFVouchers.ListView1.SetFocus ''AQUI Mando el foco pero no lo reconoce End Sub Sub Agregar_Asientos_Voucher() Dim i As Integer With UFVouchers.ListView1 i = .ListItems.Count + 1 Rem MsgBox .ListItems.Count .ListItems.Add(i).Text = UFSubVouchers.txtCtaCbl…

Hola a todos, Necesito crear una macro que me me copie un rango si la suma es el 80%. El rango que tiene que evaluar es la columna O, si la suma de esta columna es el 80% debe copiar las columnas B y O en S y T. Envío archivo para que sea más claro. Saludos, libro1.rar