Jump to content
Sign in to follow this  
Leonardo Briceño

ANSWERED BUSCAR UN DATO ESPECIFICO EN UNA HOJA Y ASIGNAR UN VALOR EN OTRA CELDA Y SE ACTUALICE AUTOMÁTICO

Recommended Posts

Hola buenos días amigos de Ayuda Excel, acudo nuevamente a ustedes para que me ayuden con esta macro. Muchas gracias

La macro debe buscar los datos o valores indicados en la columna C de la hoja COLORES en la columna A de la hoja LISTADO GENERAL y una vez localizado, asignar el valor del precio ubicado en la columna F de la hoja COLORES en la columna I del respectivo dato y muy importante, que se actualice automáticamente cuando el valor del precio de la hoja COLORES varie.

NOTA: En esta hoja COLORES se van añadiendo constantemente nuevos datos.

EN CASO QUE NO ENCUENTRE EL PRODUCTO, DEBE ADVERTIRLO MEDIANTE UN MENSAJE

BUSCAR DATO EN OTRA HOJA.xlsm

Share this post


Link to post
Share on other sites

@Leonardo Briceño , te dejo una solución. El código está en el evento de la hoja colores, así que solo tienes que cambiar el dato del precio y se ejecuta automáticamente.

Para la próxima no subas tu archivo con columnas (o cualquier otra cosa) ocultas, es un jaleo.

Copia de BUSCAR DATO EN OTRA HOJA.xlsm

Share this post


Link to post
Share on other sites

Hola @Haplox como estás. Muchas gracias por tu respuesta. La macro funciona perfectamente, sin embargo, al trasladar la macro al archivo real, no lo hace. Te comento, en la hoja COLORES, en la columna F correspondiente a precios en el real contiene la siguiente fórmula =SI.ERROR(SUMA(INDIRECTO("'"&A5&"'!K4")),"") y creo que es por eso que no actualiza el precio en la segunda hoja. Pero si le escribo manualmente el valor numérico del precio, entonces si actualiza la otra hoja. Me imagino que el problema radica allí. Que opinas?

Share this post


Link to post
Share on other sites
Hace 4 horas, Leonardo Briceño dijo:

te envío el archivo con la formula

A ver, ¿Entonces cuásl es elvalor que realmente PONES A MANO y dónde? Porque entonces puede que cambie toda la filosofía de la macro 🤕

Share this post


Link to post
Share on other sites

Hola @Haplox la celdas que la columna F de la hoja COLORES (PRECIO) contiene la formula =SI.ERROR(SUMA(INDIRECTO("'"&A5&"'!K4")),"") 

Esta formula revisa el dato de cada hoja del libro señaladas en la hoja COLORES en la columna A (que corresponden a los nombres de cada hoja del libro). Los nombres de las hojas están indicadas en la columna A de colores. En este ejemplo con colores (AMARILLO, ROJO BLANCO, etc) y cada una de ellas tiene en K4 un valor precio que se va a reflejar en la columna F de COLORES. Estos precios están sujetos a variación en el tiempo. Por eso eso es necesario que la información de los datos que están en LISTADO GENERAL con el SUB agregado (por ejemplo SUB AMARILLO) se actualice automáticamente.  Pues a su vez estos datos van a alimentar otras hojas. Todo lo demás ya está contemplado. solo faltaría este paso para que todo esté conectado

Share this post


Link to post
Share on other sites

@Haplox a mano no coloco nada en cuanto a la columna F se refiere.

Por ejemplo una linea A5

DATO 1 AMARILLO lo coloca una macro
DATO 2 SUB es un dato fijo
DATO 3 SUB AMARILLO resultado de concatenar B y A
DATO 4 Es una valor que se coloca manual
DATO 5 Se elige un valor de una lista desplegable
DATO 6 es la formula =SI.ERROR(SUMA(INDIRECTO("'"&A5&"'!K4")),"")

Share this post


Link to post
Share on other sites

Hola José  @Haplox, verificando mejoró. Incorporé el resto de las hojas para verificar cálculo pero en el resto no lo hace, solo en la fila correspondiente a AMARILLO. Recuerda que en el tiempo se van a estar agregando nuevas hojas, es decir, en el ejemplo hay 12 hojas involucradas, pero paulatinamente se van a estar agregando nuevas hojas. Por lo que la macro debe prever la incorporación de nuevas hojas

Copia de BUSCAR DATO EN OTRA HOJA (2).xlsm

Share this post


Link to post
Share on other sites
En 2/8/2020 at 20:40 , Leonardo Briceño dijo:

Incorporé el resto de las hojas para verificar cálculo pero en el resto no lo hace, solo en la fila correspondiente a AMARILLO

Esto pasa cuando dáis cosas por hecho al explicar el problema o subir los archivos... Que no tienen nada que ver lo que se hace con lo que necesitáis :( . En fin... Te dejo la solución, que espero que ahora sí

Copia de BUSCAR DATO EN OTRA HOJA-1.xlsm

Share this post


Link to post
Share on other sites

Hola @Haplox como estás. Muchas gracias por tu respuesta..

He comprobado el funcionamiento de la macro y hace exactamente lo que te pedí. Pero tiene un detalle, recuerda que te comenté que en el tiempo se van agregando nuevas hojas. La macro funciona perfectamente, es decir, actualiza la información en la hoja LISTADO GENERAL pero de la información que hay en hoja COLORES hasta la fila 16. A partir de la fila 17  que serian las nuevas hojas que se van agregando no actualiza la información en LISTADO GENERAL. Me imagino que no lo hace por lo indicado en la primera y ultima linea de parte del código que me enviaste. Que opinas?

If Not Intersect(Target, Range("F5:F16")) Is Nothing Then
    Application.EnableEvents = False
    On Error GoTo salir
    Dim t As Range
    Dim color$
       
       color = Intersect(Target, Range("F5:F160")).Address(0, 0)

Share this post


Link to post
Share on other sites
Hace 13 minutos , Leonardo Briceño dijo:

A partir de la fila 17  que serian las nuevas hojas que se van agregando no actualiza la información en LISTADO GENERAL

Juraría que lo dejé para que funcionara al agregar más hojas. Mañana le echo un vistazo

Share this post


Link to post
Share on other sites

Hola @Haplox buenos días. Tengo una consulta. Si bien la macro funciona perfectamente. Ahora cada vez que abro un archivo excel, teniendo abierto el archivo donde está la última macro que enviaste, sale en mensaje que dice "Se ha producido el erro '9' en tiempo de ejecución. Subindice fuera del intervalo" Que será???

Edited by Leonardo Briceño

Share this post


Link to post
Share on other sites
Hace 1 hora, Leonardo Briceño dijo:

Ahora cada vez que abro un archivo excel, teniendo abierto el archivo donde está la última macro que enviaste, sale en mensaje que dice "Se ha producido el erro '9' en tiempo de ejecución. Subindice fuera del intervalo"

Pues esto no me lo esperaba... :huh:. Investigando parece una especie de bug de Excel y el evento Calculate. La verdad es que cada vez que he lidiado con este evento me ha dado más quebraderos de cabeza que otra cosa.

Te dejo otra solución. Prueba y me dices

BUSCAR DATO EN OTRA HOJA-1.xlsm

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

INFORMACIÓN BÁSICA SOBRE PROTECCIÓN DE DATOS

Responsable: Sergio Andrés Celemín

Finalidad: Moderar y responder comentarios de usuarios. Recuerda que la información que facilites es pública, y los datos que incluyas los leerá cualquier visitante de esta web, así como el avatar que poseas.

Legitimación: Consentimiento del interesado.

Destinatarios: Hetzner Online GmbH.

Derechos: Puedes ejercitar en cualquier momento tus derechos de acceso,
rectificación, supresión, oposición y demás derechos legalmente establecidos a
través del email sergio@ayudaexcel.com.

Información adicional: Encontrarás más información en la política de privacidad.

Sign in to follow this  



  • Posts

    • Estimado bigpetroman, antes que nada muchas gracias por responder. Explico un poco de que va el sunto de los seriales tanto en la Salida como en la Entrada, la condicion de estos equipos es algo peculiar, ya que pueden salir varias veces y entrar la misma cantidad de veces, salvo algunas excepciones que no importan para la aplicacion de este archivo. Por tal motivo, no he restringido el ingreso de los seriales a una sola vez. Para decirlo mas claro, salen en calidad de prestamo y deben regresar en un perodo X, el cual esta definido por variables de tiempo no fijas en la mayoria de los casos. Por otro lado, los equipos tienen dos seriales, uno del fabricante, y otro de Inventario, y, este ultimo, necesito capturarlo tanto en la salida como en la entrada. He de acotar, que en la salida no hay problemas con la captura o funcionamiento de la aplicacion, en cambio, en la entrada de estos equipos es donde viene mi dilema. Siendo asi, lo que necesito lograr, con vuestra ayuda claro esta: 1- Hacer que la aplicacion al ingresar el serial en la hoja " Reg. Entrada" me busque en la tabla de salida (que esta en la hoja "Salidas"), el serial que ingresé, si lo encuentra, me traiga la informacion que contiene esa linea. Y, dicha informacion, la coloque o pegue, en la tabla Entradas, que obviamente esta en la hoja "Entradas". 2- Si, no llegara a encontrar dicho serial (porque salio antes de que estubiera operativa esta aplicacion), me pida ingresar el serial de inventario, el cual esta bajo la denominacion de Bienes Nacionales. Y, al ingresar este segundo serial, me coloque la informacion (los dos seriales) en la tabla Entradas, ubicada en la hoja "Entradas". Dicho esto, lo que necesito es basicamente lo que describo arriba, ya que el mensaje que me arrojaria la aplicacion es informativo (solamente para cuando haya encontrado el serial),  para saber su ubicacion y numero de Baul, y asi poder colocar el equipo en su lugar. Con respecto a la pregunta de que si quiero agregar o no una nota, creo, deberia ser pan comido despues de lograr los puntos 1 y 2. No se si he logrado explicarme, o he enrredado mas las cosas. Por favor indicame y tratare de ser mas explicito. O si lo prefieres hacer un paso a paso. De verdad muchas gracias de antemano por vuestra atencion, esfuerzo y paciencia. Atento a vuestros comentarios... Saludos.
    • amigo @MauriciodeAbreu, yo intente ayudar, pero de verdad que no logré entender de todo, por favor sube un detalla un ejemplo concreto que tengas en tu archivo. 1. coloco el serial X en la celda E5 de la hoja Reg. Entradas 2. se debe mostrar el valor Y en la celda Z (no se, no logro entender, pues en la hoja de salida por lo que veo el serial se puede repetir) y así vas explicando hasta el paso final, para poder entender suerte
    • Lamento decirte que no utilizo esa herramienta, por lo que no puedo valorar dicha compatibilidad   Saludos 
    • Te adjunto una alternativa mas con funciones genéricas de Excel, es automático para ambas columnas    Saludos Libro1.xlsm
    • Saludos expertos, por favor necesito de sus ayudas a alguien que disponga de tiempo, necesito guarda en PDF en un carpeta que se encuentra en descarga Que se busca agregar -Que cuando se corra la macro para generar el PDF se guarde estos datos en la base de datos. -Si un usuario(Nombre) le vuelvan a generar un PDF en un rango de = 7 días atrás mande un mensaje: usuario ya fue generado copia y fecha cuando fué creado y todo. Ajunto el archivo por favor muchísimas gracias a cada uno de ustedes. Feedback Formal-MACRO-PDF-1.xlsm
  • Recently Browsing

    No registered users viewing this page.

×
×
  • Create New...

Important Information

Privacy Policy