Listas Desplegables con Selección Múltiple

[@pedroparamo4652]

De los mejores y más útiles videos que he tenido la suerte de encontrar, muchas gracias.

[@RockerKnox]

Muchas gracias! Justo lo que estaba necesitando !!! Gracias por compartir el archivo y la información !

[@patricoguajardo7969]

Muchas Gracias Master.. hace un tiempo andaba buscando esta opcion, para agilizar mi trabajo.. GRACIAS:::

[@MarioEugenioExcel]

Muchas gracias! Que gusto saber que te fue de ayuda.

[@Manubrdi]

Muchas gracias! Excelente contenido y su forma de explicarlo. Muy util.

[@MarioEugenioExcel]

Que gusto saber que te fue utilidad. Muchas gracias por tu comentario!!

[@JoseVega-Trecha]

Excelente video y explicación, lo considero muy útil, gracias por compartir tus conocimientos y la macro del ejemplo. Saludos desde Asturias - España.

[@noraontiverosdavila8017]

Excelente Aporte, muchísimas gracias por compartir.

[@carlosandresardilaochoa8424]

Tu código no sirve para opciones con espacios dentro de la lista, ya que al deseleccionar parte de la cadena, el separador se coloca en los espacios. Por ejemplo, si tienes seleccionado “Santa Fé,Envigado,Medellín” y deseleccionas Medellín, el resultado será “Santa,Fé,Envigado”. Aquí les dejo una versión corregida del código, además con una condición para que no altere los encabezados: Private Sub Worksheet_Change(ByVal Target As Range) Dim valAnterior As String, valNuevo As String, separador As String Dim valoresAnteriores() As String, nuevoValorPresente As Boolean Dim i As Integer separador = "," ' Modificar aquí por el caracter de preferencia On Error GoTo Terminar If Target.Column = 2 And Target.Row > 1 Then If Target.SpecialCells(xlCellTypeAllValidation) Is Nothing Then GoTo Terminar Else Application.EnableEvents = False valNuevo = Target.Value Application.Undo valAnterior = Target.Value If valAnterior = "" Then Target.Value = valNuevo Else valoresAnteriores = Split(valAnterior, separador) nuevoValorPresente = False For i = LBound(valoresAnteriores) To UBound(valoresAnteriores) If Trim(valoresAnteriores(i)) = Trim(valNuevo) Then nuevoValorPresente = True Exit For End If Next i Dim nuevaCadena As String ' Declaración de la variable fuera de los bloques condicionales If nuevoValorPresente = False Then If valAnterior = valNuevo Then ' Deselección de un valor presente nuevaCadena = "" For i = LBound(valoresAnteriores) To UBound(valoresAnteriores) If Trim(valoresAnteriores(i)) Trim(valNuevo) Then If nuevaCadena = "" Then nuevaCadena = valoresAnteriores(i) Else nuevaCadena = nuevaCadena & separador & valoresAnteriores(i) End If End If Next i Target.Value = nuevaCadena Else ' Agregar un nuevo valor Target.Value = valAnterior & separador & valNuevo End If Else ' Deseleccionar el valor existente nuevaCadena = "" For i = LBound(valoresAnteriores) To UBound(valoresAnteriores) If Trim(valoresAnteriores(i)) Trim(valNuevo) Then If nuevaCadena = "" Then nuevaCadena = valoresAnteriores(i) Else nuevaCadena = nuevaCadena & separador & valoresAnteriores(i) End If End If Next i Target.Value = nuevaCadena End If End If End If End If Terminar: Application.EnableEvents = True End Sub

[@andresiz1]

EXCELENTE MIL GRACIAS

[@florimagenmatriz418]

Una duda, si quiero realizar este mismo código para diferentes columnas ¿Cómo lo modifico? Debo hacer la modificacion aquí al seleccionar el número de la columna, pero ya lo intente y no me lo permitió. " If Target.Column = 2 And Target.Row > 1 Then" Quiero que sea la 8 y 9

[@dhhrwzcvjht]

El código funciona pero cuando cierro y vuelvo a abrir (depués de haber guardado claro) solo me deja elegir una opción por celda, sabes por qué?

[@FranzMoscoso-u2o]

Muchas gracias por el código, no se si es posible visualizar los datos tal cual aparecen a la hora de hacer la selección múltiple, dentro de la tabla dinámica. Al querer filtrar la información dentro de la tabla dinámica solo reconoce el primer ítem de la lista de opción múltiple, más no los "valores" de toda la celda.

[@aipatrevorg]

Genial, muy útil, para generar test de evaluación autocorrectiva. Gracias por compartir.

[@sandrakeysirodriguezmoreno5547]

justo lo que buscaba.... muchas gracias

[@gonzalolopez7738]

Crack, Gracias! Se puede lista desplegable manteniendo formato de origen (De la lista)??

[@MarioEugenioExcel]

Hola Gonzalo! Escribeme a [e-mail] planteando lo que necesitas para darte una respuesta que se ajuste a tus necesidades

[@silvanagonzalez7363]

Hola Mario, excelente video. una pregunta: si de los datos seleccionados requiero que me traiga los valores asociados de cada uno para tener una suma de costos por ejemplo, existe alguna forma de hacerlo?

[@johannaleyton6935]

Muy útil el video! Gracias por compartir!

[@KelvinJuniorFerreras]

Saludos, como puedo hacer una lista desplegable que al desplegar la lista y al seleccionar un elemento de la lista dicho elemento me permita activar otra lista desplegable, y asi tener varias listas desplegables desde un solo elemento. gracias espero su ayuda

[@MarioEugenioExcel]

Hola Kelvin, es un poco complicado explicarlo por aquí, escríbeme a [e-mail] para compartirte un ejemplo de lo que necesitas.

[@eliezerhilario]

Excelente video. Muy util. Gracias

[@MarioEugenioExcel]

Muchas gracias por tu comentario Eliezar, qué gusto saber que la información te fue de utilidad!

[@elvavalle205]

Muchas gracias por el aporte, ha sido de mucho valor. Las dudas que tenía las resolví con tus respuestas a consultas.

[@iodigitalbit6229]

Hola! Mario, Excelente video. Es muy practico & legible y sumando las respuestas dadas en tus comentarios, queda mucho mejor y con mejores aplicaciones. Gracias por ese aporte, me has dado la posibilidad de mejorar mi código. Éxitos en tus actividades Mario.

[@anayteesquivel7397]

Excelente explicación[on, GRACIAS!

[@GiulianaGuerra-i7q]

Me pone que el argumento Replace no es opcional. Alguien sabe que pudo haber sucedido?

[@rubencho5379]

Excelente, buen aporte. Gracias

[@MiguelAngelNaranjoMoreno]

Mil gracias, justo lo que necesitaba, eres excelente, nuevo sub y like.

[@ignaciogomez9492]

Muchas gracias por el aporte, con CHapGpt no lo conseguí "abajo los logaritmos y arriba las personas" gracais

[@sergioayala9897]

no puedo descargar el archivo desde el link! alguien puede colocar el codigo en los comentarios?

Hola, muchas gracias por compartir tu conocimiento tan útil, me ha funcionado bastante bien. El único detalle que yo tengo es que si tengo dos elementos con nombres que contienen los mismos nombres, al borrar uno borra parte del otro. Por ejemplo: si tengo: blue y el otro lightblue y borro blue me lo borra también de lightblue dejándome solo light.

[@MarioEugenioExcel]

Hola Snyders! He revisado lo que indicas y efectivamente se está generando un resultado que no es el adecuado. Por favor intenta reemplazando las siguientes líneas de código: If InStr(valAnterior, valNuevo) = 0 Then Target.Value = valAnterior & separador & valNuevo Else Target.Value = Replace(Trim(Replace(Replace(Replace(valAnterior, valNuevo, ""), separador, " "), " ", " ")), " ", separador) End If Por estas otras: If InStr(separador & valAnterior & separador, separador & valNuevo & separador) = 0 Then Target.Value = valAnterior & separador & valNuevo Else Dim temp As String temp = Replace(separador & valAnterior & separador, separador & valNuevo & separador, separador) temp = Replace(Replace(Replace(temp, separador, ".-"), ".-.-", ".-"), ".-", separador) If Right(temp, Len(separador)) = separador Then temp = Left(temp, Len(temp) - Len(separador)) If Left(temp, Len(separador)) = separador Then temp = Right(temp, Len(temp) - Len(separador)) Target.Value = temp End If Espero que esto solucione el inconveniente. Saludos y éxitos en tus proyectos de Excel!

@@MarioEugenioExcel ¡Funciona perfecto! Muchísimas gracias. Vi muchos vídeos y leí varios tutoriales, pero nada ¡Sos el mejor! Gracias.

[@rodrigoidol77]

Estimado Mario, el linkde dcescarga no funciona no me deja descargar

[@NewOrden12]

Perfecto, mil gracias!!!

[@cosasdeasia]

Hola, si deseo que más de una columna tenga esta opción en la misma hoja es posible?

[@joang217]

Es excelente la explicación pero ya copié y pegue el código tal cual y habilite las macros desde centro de confianza pero sigue sin correr la macro, igual si like y me suscri tienes vídeo muy buenos

[@ibethdelafuente5484]

Excelente explicación!!

[@danilosantarossa1416]

Hola, como hago para aplicar esta macro a dos o más columnas? gracias!

[@danilosantarossa1416]

listo, solucionado, gracias!

[@joma86]

@danilosantarossa1416 como hiciste

[@florenciaferrando4112]

Hola! Como tendría que hacer si los datos de origen estan en otra hoja del mismo libro? Me podrías ayudar? Gracias

[@melissarodriguez9757]

Hola, como hago para que los elementos de la lista no sean los que se muestran en la columna A sino digamos que tome elementos de la E13:E20 y la lista desplegable multiple aparezca en F14 gracias

[@mariaweylerbenitezdelugo7013]

Igual lo que pregunto es una locura, pero habría forma de hacer esto y que luego a la hora de filtrar puedas filtrar de forma independiente por cada categoría seleccionada de la lista desplegable y te siga apareciendo en el filtro aunque haya más de una selección? Me explico siguiendo tu ejemplo. Si en una celda tengo CC,FF,GG y en otra tengo CC,EE y yo aplico filtro a la columna, ¿Habría algún código para poder filtrar por CC y que aparezcan esas dos celdas a pesar de tener más selección?

[@hansparodi]

Buenos dias mario, quisiera saber que debo modificar para aplicar el codigo, no en toda la columna, si no en algunas celdas de la misma columna. eje: C5, C10, C11, C20, etc.. gracias

[@yolandarociovasquezelias7707]

Holaa, lograste resolver, tengo la misma duda

[@ArielaCesa]

hola, muy interesante... la ayuda de la pagina oficial de office plantea otras cosas. Lamentablemente no he podido descargar el archivo donde estan los macros.

[@Andrealuscky]

hola! en mi version de Excel no tengo la pestaña programador , estoy haciendo algo mal?

[@MarioEugenioExcel]

Hola Andrea! Sólo debes activar la pestaña programador siguiendo estos pasos: 1. En la pestaña Archivo , ve a Opciones > Personalizar cinta de opciones 2. En Personalizar la cinta de opciones y Pestañas principales, active la casilla Programador

[@Andrealuscky]

@@MarioEugenioExcel mil gracias Mario

[@SandraMorales-k2w]

Buenas tardes Mario Javier, Gracias por el fabuloso video. Segui todas las instrucciones para crear mi lista despegable con seleccion multiple y logre hacerlo. Mi lista desplegable contiene opciones de una sola palabra y algunas mas opciones de frases. Cuando selecciono 2 o mas de mis opciones que contengan frases y trato de des-seleccionarlas nuevamente, en lugar de borrarsen, se duplican. Por favor me puede indicar coomo puedo arreglarlo? Gracias.

[@fabianesquivelcastillo-hb6lo]

Podría ayudarme porfavor? He intentado hacerlo pero para columnas salteadas 10, 13, 16, 19, aplicando "If tarjet.Column = 10 or tarjet.colum = 13 then" Y así sucesivamente pero no funciona

[@MarioEugenioExcel]

Hola Fabián! Lo correcto es "Target" y no "Tarjet", pruebalo con esa consideración.

[@lidiawang7003]

La primera vez utilizo programador, me ha salido un mensaje "El argumento no es opcional", supongo que habra algun fallo, pero he comparado las lineas de codigo, y al parecer son correctos. Le agradezco mucho si me podrias explicar porque me sale eso? Muchas gracias de antemano.

[@TheCar1097]

Muchas gracias por el tutorial! Será posible aplicar una lista desplegable con selección múltiple y que también sea dependiente? Por ejemplo si tenemos AA y sus dependientes son AA1, AA2, BB con dependientes BB1, BB2, y CC con dependientes CC1, CC2, si seleccionamos solo AA y CC, en la otra columna pueden aparecer solo las opciones de ambas? En este caso AA1,AA2,CC1 y CC2? Y ya no BB1 y BB2

[@MarioEugenioExcel]

Es posible pero sólo a través de macros. Es complicado explicarlo por aquí, si aún necesitas el soporte puedes escribirme a [e-mail] para darte una solución.

[@estefaniaperez4357]

Buenas tardes, en mi caso necesito seleccionar varias opciones y despues traer el nombre de esas opciones en otra columna se puede?

[@MarioEugenioExcel]

Hola Estefania, si aún necesitas ayuda, por favor escríbeme a [e-mail]

[@ROSASIERRA-n6t]

Como obtengo el código

[@wilfredpalacio4984]

Mario muy buena explicación, si quisiera que se generara la lista desplegable con casillas de verificación para no tener que abrirla y estar seleccionando , como sería

[@marydelarosa9465]

Hola, muchas gracias por tu video me ha servido de mucho, solo tengo un pregunta si el lugar de que las columanas fueran contiguas fueran especificas, como puedo indicar eso en el codigo?

[@jackv9632]

Buenos dias, copie el codigo con las correcciones que hizo en los comentarios para cuando cada elemento de la lista tiene mas de 2 palabras, y para el separador puse lo siguiente: separador=", " (con un espacio despues de la coma). Todo funciona normal, lo que sucede es que al seleccionar nuevamente un elemento para que se borre, cuando borro todos, queda una coma, en lugar de borrarse todo completamente, queda una coma como resultado final. Espero se me comprenda y se pueda hallar una solucion.

[@bismarck9602]

Que buen video. Pero me gustaría saber cómo obtuviste el código.

[@adrianvillarreal6742]

Estoy presentando el mismo problema, ojala nos puedan ayudar

[@JosLuisOfficial]

Se puede seleccionar toda la lista con control o Shift?

[@MarioEugenioExcel]

Para seleccionar toda la lista debes presionar Ctrl + Shift + tecla hacia abajo

[@JosLuisOfficial]

Muchas gracias por tu respuesta. Intente hacerlo pero por alguna razón la macro no me lo permite, debo agregar algo al código o una combinación diferente de teclas?

[@MaríaJoséGilBlasco]

Muchas gracias Mario. Explicas muy bien los pasos para todo pero he tenido el problema de que me he descargado tu hoja excel de tu ejemplo y no me funciona: sólo me permite una entrada. Naturalmente , también he puesto tu código en mi hoja excel y tampoco funciona. Me puedes ayudar????

[@feliperincontorres2268]

Hola disculpa sabes como lo puedo hacer en Office Scripts Gracias

[@aranda2186]

Funciona perfectamente pero cuando le doy bloquear a la hoja deja de funcionar, ¿sabes que puede ser? Necesito la hoja bloqueada para que no eliminen las formulas de otras partes de las tablas que tengo creadas

[@miligarzone8699]

Buen dia Mario, necesito tu ayuda por favor, pude incorporar la lista desplegable de seleccion multiple, y despues le hice la correcion que pusiste en un comentario para que el macro funcione con la Hoja protegida, la cual tambien funciono, pero con un problema, si algun campo de esa columna que tiene la lisa desplegable de seleccion multiple se borra con delete o backspace , se me desprotege la hoja automaticamente, como puedo arreglarlo?

[@MarioEugenioExcel]

Hola Mili! Escríbeme a [e-mail] para darte una solución que se ajuste a tus necesidades.

[@arantzagissellevillasanaag5119]

Hola, muchas gracias por el video. Tengo una duda, estoy haciendo una tabla con 3 listas desplegables de nivel y en la última tabla quiero aplicar esto. Aparte de este código inserte otro donde si cambio la opción de las otras dos celdas, se borra la información. Logre que hubiera selección múltiple pero a la hora de querer de deseleccionar no me deja y el texto se empieza a poner el separador por cada palabra. Me puede ayudar?

[@MarioEugenioExcel]

Hola Arantza, por favor compárteme un archivo de ejemplo (que incluya tu código modificado) a [e-mail] para poder revisarlo y darte una solución que se ajuste a tus necesidades.

[@renzomamino]

Hola @Mario quisiera agradecerle y consultarle como hago para que no me reemplace los valores? Solamente los deje a medida que se van seleccionando. Tengo que hacer esto con descuentos y tengo clientes con = descuentos entonces borra el anterior. Gracias

[@MarioEugenioExcel]

Hola Renzo, disculpa la demora en la respuesta. Qué debería suceder si se presiona por segunda vez la misma opción? debería registrarse por duplicado o mantenerse un registro único (no eliminarse como funciona actualmente el archivo)?

[@nilocajoflores8877]

Hola esta excelente, buen aporte. Consulta, como puedo hacer para que el separador no sea por comas, si no se pase a otra fila pero en la misma celda.

[@lilianamendoza5935]

Hola, disculpa... y si quiero hacerlo para más de una columna en el mismo archivo, cómo debo de escribirlo en el script?

[@MarioEugenioExcel]

Hola Liliana! Es super sencillo, intenta modificar la línea de código If Target.Address = "$C$2" Then por esta otra (en este ejemplo estamos aplicando las listas desplegables desde la columna 3 hasta la columna 5): If (Target.Column >= 3 And Target.Column

[@julianahernandez179]

Hice todo el proceso, como se indica y no funciona, siempre me saca un error en la misma parte; dice: "Error de compilación, el argumento no es opcional"

[@oscarramos5657]

Buenos días, Mario si necesito incluir más de una lista desplegable con opción múltiple pero de otra lista diferente a la usada en el primer código es posible ?

[@MarioEugenioExcel]

Hola Oscar, no habría ningún problema, sólo debes asegurarte de que se incluya en el código el rango en donde estén las listas desplegables (de diferentes orígenes de datos si se requiere) que deseas que funcionen con selección múltiple.

[@mariaantonellapannocchia8303]

conuslta como puedo hacer esto mismo si no tengo la pestaña de programador?

[@MarioEugenioExcel]

Hola María, sólo debes activar la pestaña programador. Para hacerlo debes seguir los siguientes pasos: 1. Ve a la pestaña "Archivo", luego a "Opciones" y dar clic en "Personalizar cinta de opciones" 2. En "Personalizar la cinta de opciones", activa la casilla "Programador" que está al lado derecho y finalmente darle clic en Aceptar.

[@joserra30a]

Hola JAvier, quiero que eso me lo haga en varias columnas (teniendo en cuenta que las primeras filas de las columnas son nombres de personas... Como pudo solucionarlo?

[@joserra30a]

Solventado

[@anaortega3400]

Hola. Tengo una duda que no he encontrado en los comentarios. Necesito hacer la selección múltiple en columnas que no son seguidas, ejemplo en columna 8, 10 y 15 pero por ejemplo no quiero que lo tengan el resto. ¿Me podría ayudar porfavor?

[@anaortega3400]

Y también me gustaría saber si se puede elegir un separador por ejemplo “,” en una columna y otro por ejemplo “&” en otra. Gracias

[@MarioEugenioExcel]

Hola Ana, respecto a tu primera preguna, hay muchas opciones para conseguirlo, te comparto un par de mis favoritas. Lo que debes hacer es reemplazar la siguiente línea de código: If Target.Address = "$C$2" Then por cualquiera de estas: Opción 1 If Target.Column = 8 Or Target.Column = 10 Or Target.Column = 15 Then Opción 2 If Not Intersect(Target, Range("H:H,J:J,O:O")) Is Nothing Then Espero te sea de utilidad!

[@MarioEugenioExcel]

Respecto a tu segunda pregunta, lo más sencillo sería reemplazar la siguiente línea de código: separador = "," Por estas otras (cada número luego de Case hace referencia a cada columna): Select Case Target.Column Case 8 separador = "," Case 10 separador = "-" Case 15 separador = "&" End Select Espero que esto te permita solucionar tu inconveniente. Saludos y éxitos en tus proyectos de Excel!

[@kontra0074]

Hola mario Como estas? Hay alguna forma que dentro de una lista despegable este un signo que represente una unidad de medicion de algo y a ese se le pueda agregar un numero. por ejemplo /Ul ----> 10^3/Ul /uL -----> 10^3/uL g/dl -----> 2.5g/dl /uL -----> 7^3/uL para asi colocarles valores numericos a cada seleccion dentro de la lista, o no es posible? Muchas gracias

[@MarioEugenioExcel]

Hola! No entiendo muy bien la solicitud, ¿cómo debería quedar la celda de selección múltiple? Si me compartes algún ejemplo más detallado puedo brindarte una solución que se ajuste a lo que necesitas.

[@enriqueandresdelcastillo5394]

Hola Mario que tal, una consulta sabes como se puede aplicar ello dentro de un Formulario VBA

[@MarioEugenioExcel]

Hola Enrique! Envíame un ejemplo a [e-mail] de como has configurado tu formulario para darte una solución que se ajuste a tus necesidades.

[@victorespejo2729]

Buen día, disculpe copio todo tal cual como usted lo hizo y me marca error en la parte donde dice 3 veces reemplazar, podría ayudarme o si tiene la transcripción solo para copiarla y pegarla, se lo agradecería

[@MarioEugenioExcel]

Hola Victor, en la descripción del video está el link para la descripción del archivo con el código.

[@victorespejo2729]

@@MarioEugenioExcel es que no podía pero ya pude muchas gracias

[@estephanyserrano6328]

Hola, buenos dias, tengo una duda, como podría realizar una tabla dinamica con esas columnas que tienen más de una respuesta?, es que al momento de realizar la tabla dinamica me toma esas opciones como una sola opcion y no por separado

[@MarioEugenioExcel]

Hola Estephany! Me ayudaría que puedas enviarme un ejemplo a [e-mail] para poder revisarlo y darte la respuesta que se ajuste a tus necesidades.

[@amidefgarcia5891]

tengo el mismo problema, encontraste solución?

[@lissethkarinagonzaleziller4096]

Hola, Excelente información. Tengo una duda a la hora de hacer las tablas dinamica por opción no tendría ningún inconveniente?

[@arcalimon4361]

En un formulario Google deseo aplicar la selección múltiple para que cada niño tenga necesariamente que escoger 3 deportes favoritos para entrenar, que al escoger el primero, en su segunda escogencia no aparezca la primera escogida, así mismo en su tercera escogencia no le aparezca ni la primera ni la segunda escogida. Me puedes compartir el código?

[@MarioEugenioExcel]

Hola! Puedes probar este código, considerando que la lista de validación está en la celda "C2" de la "Hoja 1". function onEdit(e) { var valAnterior; var valNuevo; var separador; separador = "," var ss=SpreadsheetApp.getActiveSpreadsheet(); var activeCell = ss.getActiveCell(); if(activeCell.getColumn() == 3 && activeCell.getRow() == 2 && ss.getActiveSheet().getName()=="Hoja 1") { valNuevo=e.value; valAnterior=e.oldValue; if(!e.value) { activeCell.setValue(""); } else { if (!e.oldValue) { activeCell.setValue(valNuevo); } else { activeCell.setValue(valAnterior + separador + valNuevo); } } } }

[@gabrielignacio6563]

BUENISIMO... ME AYUDO MUCHO

[@andrylorannyencarnacion5638]

Hola, lo intento en la columna 6,7 de mi documento pero luego deja de funcionar, ayuda por favor

[@MarioEugenioExcel]

Hola! Que error te sale o cuál es el. Inconveniente quense te presenta?

[@andrylorannyencarnacion5638]

@@MarioEugenioExceldecía error en. La sintaxis en una ,luego dejo de funcionar la hoja y tuve que cerrar el Excel

[@MarioEugenioExcel]

@@andrylorannyencarnacion5638 Hola Andry, si es posible envíame tu archivo a [e-mail] para revisarlo y darte una solución.

[@pizzeria4202]

Hola, como estas? De la nada buscando una solución llegue a tu video, te puedo consultar algo que no logro encontrar la solución? Solo respóndeme si o no, se puede guardar de manera histórica datos de un check List? Gracias :(

[@MarioEugenioExcel]

Hola! Es totalmente posible a través de macros, si deseas compárteme tu avance a [e-mail] para ayudarte a resolverlo

[@adrianvillarreal6742]

Hola Javier, muchas gracias por tu trabajo, me funcionó, solo tengo un problema con la lista ya que agregué elementos con espacios; es decir, entre el listado hay opciones que contienen varias palabras, el detallé esta cuando quiero quitar una opcion previamente elegida ya que me pone una coma entre los espacios de otras opciones, me pondrías ayudar a corregir esto?

[@danielgonzalosilva5537]

en ves de poner solo una columna, como hago para poner varias columnas completas?

[@MarioEugenioExcel]

Hola Daniel! Lo que debes hacer es reemplazar la siguiente línea de código: If Target.Address = "$C$2" Then por cualquiera de estas: Opción 1 If Target.Column = 8 Or Target.Column = 10 Or Target.Column = 15 Then Opción 2 If Not Intersect(Target, Range("H:H,J:J,O:O")) Is Nothing Then Espero que te sea de utilidad. Saludos y éxitos en tus proyectos de Excel!

[@danielgonzalosilva5537]

@@MarioEugenioExcel grax

[@adrifrias5884]

Una duda, target no me reconoce ningún valor y siempre se termina mi programa

[@MarioEugenioExcel]

Hola Adri, tendría que ver tu archivo para identificar cuál es problema, si es posible envíamelo a [e-mail] para revisarlo.

[@anabravo8329]

Hola, muy buena explicación, pero se puede crear gráficos a partir de la información seleccionada, si esta separada de esa forma por comas?? Gracias

[@MarioEugenioExcel]

Hola Ana, eso sería un poco complicado, lo que se podría hacer sería generar una columna auxiliar para preparar la data y que se puedan generar los gráficos.

[@juandavidrojaspardo3172]

Si lo requiero en dos filas de la misma columna. No en toda la columna. Como debería ir la fórmula??

[@hansparodi]

tengo la misma duda

[@hansparodi]

si ya la sabes, podrias compartirme la respuesta, por favor..

[@ingenieromauroalejandrozap9766]

hola buenos días, muchas gracias, si quisiéramos que los elementos seleccionados, se vayan apilando en la misma celda de forma vertical y no horizontal como se podría hacer

[@MarioEugenioExcel]

Hola! Reemplaza la linea de código separador = "," por separador = Chr(10) Espero que con eso quede resuelto. Saludos y éxitos en tus proyectos de Excel!

[@ingenieromauroalejandrozap9766]

@@MarioEugenioExcel Mario excelente, pero y si quiero que la macro me aplique a todo el libro incluidas todas las hojas, sin restricción a un rango de columnas ni únicamente a ciertas hojas, se podría ?

[@MarioEugenioExcel]

@@ingenieromauroalejandrozap9766 es totalmente posible, en este caso la macro actúa sobre el evento change de la Hoja 1, para lograr lo que necesitas tendrías que utilizar el evento sheetChange de la hoja ThisWorkbook y hacer referencia al objeto sh para que se aplique la macro en cualquiera de las hojas. Estoy sin la laptop en este momento, pero si deseas escribeme un correo a [e-mail] y te envío un ejemplo en unas 7 u 8 horas aproximadamente.

[@ingenieromauroalejandrozap9766]

@@MarioEugenioExcel muy agradecido, me saco de una grande, perfecto te voy a enviar un mail. muchas por tus respuestas tan efectivas y prontas.

[@yzero952]

Buenas muchas gracias por compartir el codigo, pero tengo un problema, resulta que cuando selecciono una opción que quiero eliminar de mi casilla donde estoy seleccionando mis datos, la cosa es que elimina este dato, pero los demas datos se llenan de coma, puesto que no son numeros, son textos es decir: ---celda--- (hola soy un dato 1, hola seré el dato eliminado, Hola soy un dato 2) selecciono el dato que deseo eliminar para que no aparezca en la celda (hola,soy,un,dato,1,Hola,soy,un,dato,2) sé que tiene que ver con la parte del código correspondiente a: "Target.Value = Replace(Trim(Replace(Replace(Replace(valAnterior, valNuevo, ""), separador, " "), " ", " ")), " ", separador)" pero no encuentro una forma en la que deje de hacer eso Espero me puedas ayudar 😃

[@MarioEugenioExcel]

Hola! Para que funcione como necesitas debes reemplazar esta línea de codigo: Target.Value = Replace(Trim(Replace(Replace(Replace(valAnterior, valNuevo, ""), separador, " "), " ", " ")), " ", separador) Por estas otras: Dim temp As String temp = Replace(Replace(Replace(Replace(valAnterior, valNuevo, ""), separador, ".-"), ".-.-", ".-"), ".-", separador) If Right(temp, 1) = separador Then temp = Left(temp, Len(temp) - 1) If Left(temp, 1) = separador Then temp = Right(temp, Len(temp) - 1) Target.Value = temp Espero te sea de ayuda. Saludos!

[@yzero952]

@@MarioEugenioExcel Bueno resulta que ahora me tira un error en la linea de codigo: Replace(Replace(Replace(Replace(valAnterior, valNuevo, ""), separador, ".-"), ".-.-", ".-"), ".-", separador) este error dice se espera un "="

[@MarioEugenioExcel]

@@yzero952 pusiste el target.value= antes de ese código? Revisa el código que te puse en mi anteriro respuesta

[@MarioEugenioExcel]

@@yzero952 si no lo puedes solicionar, enviame tu archivo a [e-mail] para poder revisarlo!

[@yzero952]

@@MarioEugenioExcel pues el error era ese que me faltaba el temp =, 😅😅😅😅😅😅 lo siento mucho jaja

[@oromerov]

Buenas, cuando quiero ejecutar me sale "Error de compilación: El argumento no es opcional" y marca "Replace", cual seria el error?? le agradecería su respuesta, muchas gracias

[@MarioEugenioExcel]

Hola Oscar! Por favor asegúrate que en el último "Else" el código sea el siguiente: Target.Value = Replace(Trim(Replace(Replace(Replace(valAnterior, valNuevo, ""), separador, " "), " ", " ")), " ", separador) Lo más probable es que te esté faltando incluir un argumento en la función replace.

[@oromerov]

@@MarioEugenioExcel sii, falto agregar las ultimas comillas y la palabra separador, salió perfecto!!!, muchas gracias!!!, excelente sus tutoriales!!!, muchísimas gracias por su pronta respuesta, justo es para un trabajo para mañana lunes, muchas gracias!!!

[@lourdesgonzalezbernal7869]

Gracias @mario pero no puedo descargar el archivo, me podrías ayudar?

[@MarioEugenioExcel]

Hola Lourdes, enviame un mensaje a [e-mail] indicandome el archivo que necesitas.

[@ajalexmx]

Excelente! Una pregunta , y en caso de querer un máximo se selecciones? Digamos de la lista quiero que máximo elijan 3?

[@MarioEugenioExcel]

Hola Alex, es un poco complejo de explicar por aquí asi que te dejo un ejemplo: fumacrom.com/2tpo9 Espeto te sea de utilidad. Saludos

[@vanessatamara724]

Hola, esto se puede hacer en word? Ayudaaaa

[@cuitlahuacortiz1474]

Hola, me eencantan tus videos. Tengo una duda, si quisera seleccionar el mismo concepto pero que este no se borre al hacerlo?

[@MarioEugenioExcel]

Hola! ¿Te refieres a que el mismo concepto aparezca más de una vez dentro de la lista?

[@cuitlahuacortiz1474]

@@MarioEugenioExcel por ejemplo, si quisiera seleccionar azul varias veces y que estas aparezcan. Ya que si selecciono azul y luego vuelvo a seleccionar esta selección se borra

[@MarioEugenioExcel]

@@cuitlahuacortiz1474 es muy sencillo, sólo reemplaza estás líneas de código: If InStr(valAnterior, valNuevo) = 0 Then Target.Value = valAnterior & separador & valNuevo Else Target.Value = Replace(Trim(Replace(Replace(Replace(valAnterior, valNuevo, ""), separador, " "), " ", " ")), " ", separador) End If Por esta única línea: Target.Value = valAnterior & separador & valNuevo Espero te sea de utilidad. Saludos y éxitos en tus proyectos de Excel!

[@isabelzapata8700]

excelente Mario, me funciono muy bien, solo tengo dos dudas, al proteger la hoja deja de funcionar el macro y como podria contar los valores de la celda de validacion cuando son dos o mas, creo que el contar.si no funciona aqui, se podra hacer algo al respecto ?

[@MarioEugenioExcel]

Hola Isabel! Para resolver el inconveniente con tu primera pregunta, debes hacer lo siguiente: - Seleccionar todas las celdas con listas desplegables en las que requieres que funcione la selección múltiple (con la hoja desprotegida), dar clic derecho, seleccionar "Formato de celdas", ir a la pestaña "Proteger" y desactivar el check en la opción "Bloqueada". - Luego, considerando que la hoja protegida es la Hoja 1, debes añadir luego de esta línea de código If Target.Address = "$C$2" Then, lo siguiente: Sheets(1).Unprotect Password:="EditarConTuPassword" - el 1 hace referencia a la hoja protegida y entre comillas debes colocar el password de tu hoja. - Posteriormente, luego del penúltimo "End If", debes añadir esta línea de código: Sheets(1).Protect Password:="EditarConTuPassword" - Finalmente protege la hoja con el mismo password incluido en el código. Con esto debería funcionar. Nota: Sugiero proteger también el proyecto con una contraseña para que no se tenga acceso al password de protección de las hojas a través del código Respecto a tu segunda pregunta: - Puede utilizar la siguiente fórmula matricial: =SUMA(--ESNUMERO(ENCONTRAR("Celda con el valor que se desea contar";"Rango de celdas para realizar el conteo"))) - No olvides que es una fórmula matricial y para que funcione correctamente debes presionar la combinación de teclas "Ctrl + Shift + Enter" Espero que esta información te sea de utilidad. Saludos y éxitos en tus proyectos de Excel!

[@miligarzone8699]

@@MarioEugenioExcel Hola Mario, no me funciono la protección de la hoja, se me sigue deshabilitando la lista múltiple. Habra otra opcion?

[@andreapereyrabarreyro3443]

¡Hola! Quisiera hacer otra consulta. Al sacar opciones ya seleccionadas, los separadores quedan. Dependiendo la ubicación de la opción antes de ser borrada, puede quedar adelante, o entre opciones, o al final. ¿Es posible modificar esto y que al "destildar" una opción se borre también su separador? Muchas gracias.

[@MarioEugenioExcel]

Hola Andrea! Me hicieron una consulta similar en un comentario anterior y revisando mi código me percaté que esto sucede cuando los valores de la lista desplegable tienen más de 1 palabra, en ese caso intenta reemplazando la línea de código: Target.Value = Replace(Trim(Replace(Replace(Replace(valAnterior, valNuevo, ""), separador, " "), " ", " ")), " ", separador) Por estas: Dim temp As String temp = Replace(Replace(Replace(Replace(valAnterior, valNuevo, ""), separador, ".-"), ".-.-", ".-"), ".-", separador) If Right(temp, 1) = separador Then temp = Left(temp, Len(temp) - 1) If Left(temp, 1) = separador Then temp = Right(temp, Len(temp) - 1) Target.Value = temp Con este cambio debe quedar solucionado, de no ser así, si deseas puedes enviarme tu archivo a [e-mail] para poder revisarlo.

[@MiguelCastelanLeyva]

Cual es la contraseña, al entrar a Visual Basic me pide contraseña

[@edgardaniel220]

Está buenísimo, lo único que noté es que las opciones de la lista no deben de llevar espacios en blanco porque empieza a fallar, y para el separador no se como decirle al código que en vez de "," utilice un espacio con Alt+ Enter para que queden en forma de lista dentro de la celda. Saludos

[@MarioEugenioExcel]

Hola Edgar, el problema que mencionas lo solucioné en un comentario anterior, para que funcione correctamente debes reemplazar esta línea de codigo: Target.Value = Replace(Trim(Replace(Replace(Replace(valAnterior, valNuevo, ""), separador, " "), " ", " ")), " ", separador) Por estas: Dim temp As String temp = Replace(Replace(Replace(Replace(valAnterior, valNuevo, ""), separador, ".-"), ".-.-", ".-"), ".-", separador) If Right(temp, 1) = separador Then temp = Left(temp, Len(temp) - 1) If Left(temp, 1) = separador Then temp = Right(temp, Len(temp) - 1) Target.Value = temp Por otro lado, para aplicar el salto de línea, debes usar este codigo: separador = chr(10) Espero te sea de ayuda. Saludos!

[@adrifrias5884]

@@MarioEugenioExcel Hola, si uso el separador de renglón tendría que cambiar el right y left por otra cosa?

[@MarioEugenioExcel]

@@adrifrias5884 Hola! No es necesario, con la modificación que menciono líneas arriba funciona perfectamente si utilizar el salto de línea como separador.

[@andreapereyrabarreyro3443]

Muchas gracias! Me sirvió mucho, pero tengo una consulta: el código sirve para un conjunto de columnas consecutivas, pero ¿es posible hacerlo de forma que luego de dicho conjunto de columnas, deje de aplicarse y luego nuevamente aplicarlo para otras? Por ejemplo, entre columnas 11 a 17, 22 a 25 y 33. Gracias!

[@MarioEugenioExcel]

Hola Andrea! Es totalmente posible, intenta modificar la línea de código If Target.Address = "$C$2" Then por esta otra: If (Target.Column >= 11 And Target.Column = 22 And Target.Column

[@andreapereyrabarreyro3443]

@@MarioEugenioExcel ¡Funcionó perfecto! Te agradezco muchísimo la ayuda y la rapidez de tu respuesta.

[@yulingersinainunez3771]

@@MarioEugenioExcel Hola Mario!! a mi no me lee ese código

[@yulingersinainunez3771]

yo quiero q las listas estén en columnas separadas por ejemplo B, J, I

[@mariaangelicalopezlicona8508]

HOLA, NO PUEDO DESCARGAR TU ARCHIVO, ME PODRIAS AYUDAR?

[@MarioEugenioExcel]

Hola Maria! Déjame tu correo para enviártelo por ese medio. Saludos!

[@mariaangelicalopezlicona8508]

@@MarioEugenioExcel SI PODRAS AYUDARME?

[@intercambiocatolico812]

He visto mucho la palabra Target.address u con tras terminaciones y sigo sin entender su sintaxis o manejo ...como se diga para entender sus diferentes posibilidades al usarla. Nos podría explicar en un video? Gracias de antemano!

[@sherilfarfan6562]

Hola me funciona perfecto, pero al querer editar la celda me sale este error "Este valor no coincide con las restricciones de validación de datos definidas para esta celda" que se podría hacer? :c

[@MarioEugenioExcel]

Hola Sheril, para entenderlo mejor por favor respóndeme lo siguiente: 1. ¿Cómo estás editando la celda? ¿De forma manual? 2. ¿Cuál es la necesidad de editar la celda si el código ya permite seleccionar múltiples opciones? Me comentas para ver que solución se le puede dar a tu problema.

[@gustavoleon658]

Me da el mismo error :S

[@raquelmb9521]

Cómo puedo acceder al código VBA? Nos lo puedes facilitar?

[@MarioEugenioExcel]

Hola Raquel, hay un link de descarga del archivo en la descripción del video. Si deseas escribeme a [e-mail] y te envío el archivo directamente.

[@raquelmb9521]

Gracias Mario! Ya he podido descargar el documento. Me hacia un lio con la publicidad de la página, y no encontraba como llegar al doc. Muchas gracias por subir el vídeo y ayudarnos con las dudas. Muy agradecida, saludos!

[@sinnombreespecifico3217]

Hola un favor donde puedo copiar el código?

[@MarioEugenioExcel]

Hola Ohover, hay un link de descarga del archivo en la descripción del video.

[@albertoestrella11]

Hola me gustó tu video Me gustaría saber como hago una desplegable (requisitos) qué dependa de otra lista desplegable (cargos) y que cuando estén todos los requisitos me diga completado Gracias

[@diegovenegas8588]

Hola Mario, buenas tardes. muy buena explicación en el video. Tengo una consulta. en mi caso yo necesito que la función de selección múltiple se solo desde C10 hasta C20 y desde D10 hasta D20. ¿Cuáles son los cambios que debo realizar en el código?. Esto se debe a que todo lo que escribo en las celdas anteriores a las C10 y D10 se borra ya que toda la columna esta condicionada por el código.

[@MarioEugenioExcel]

Hola Diego! Para lograr lo que necesitas solo debes modificar la línea de código: If Target.Address = "$C$2" Then por esta línea: If Not Intersect(Target, Range("C10:C20,D10:D20")) Is Nothing Then Espero te sea de utilidad. Saludos y éxitos en tus proyectos de Exel.

[@jivfzg]

Brutal! gracias Mario! una pregunta, luego quiero hacer una busqueda de cada uno de los valores de la lista, cuantos se repiten dentro del un listado, que porsupuseto es multiple. ¿COmo puedo hacerlo?

[@MarioEugenioExcel]

Hola José! Te refieres a un contador a través de una fórmula o que necesitas exactamente? Si deseas escríbeme a [e-mail] y compárteme un ejemplo de lo requieres para entenderlo mejor y darte una respuesta que se ajuste a lo que necesitas.

[@appkrew]

como hacer una lista desplegable con selección múltiple y que también sea dependiente?

[@MarioEugenioExcel]

Hola Katherina, es posible pero sólo a través de macros. Es complicado explicarlo por aquí, si aún necesitas el soporte puedes escribirme a [e-mail] para darte una solución.

[@dakadila]

Hola Mario, he puesto el código sin embargo no funciona, sigue igual y ya me he frustrado. No sé si es porque los elementos de mi lista tienen espacios. Quedo atenta a tu apoyo, saludos

[@MarioEugenioExcel]

Hola! SI es posible envíame un archivo de ejemplo con los datos que estás utilizando para compartirte una solución que se ajuste a tus necesidades. Mi correo es: [e-mail]

[@pinodesireereyescardenes5155]

Buenas noches: Muchas gracias por el video pero ¿dónde puede copiar el código de la hoja 1 de Ejemplo? Gracias de antemano.

[@MarioEugenioExcel]

Hola! En la descripción de video dejé un link de descarga que incluye el archivo de trabajo.

[@lucica1212]

Buenas noches ....saludos desde Venezuela........me uno a los agradecimientos del resto .......en verdad muchas gracias por compartir y enseñar....... También tengo la misma consulta que Nydia Massiel : una consulta si quiero usar diferentes listas desplegables en una misma hoja, puedo usar el mismo código? Muchas gracias nuevamente .......

[@MarioEugenioExcel]

Hola! Es totalmente posible, sólo habría que extender el rango de aplicación del código a toda una columna o a varias columnas como explico desde el minuto 04:45 De igual manera, aquí te dejo un ejemplo: fumacrom.com/3QN6Q Saludos y éxitos en tus proyectos de excel!

[@cristinaromera7483]

No tengo acceso al archivo descargable, podrías indicar el texto del código. Muchas gracias!! :)

[@MarioEugenioExcel]

Hola Cristina! Déjame tu correo para enviarte el archivo por ese medio

[@nicolezapata9615]

Hola! muchas gracias por tu video sin embargo me salió un error y no me funciona la programación, me podrías enviar el codigo por favor?

[@nicolezapata9615]

me sale Compite error: Argument not optional y me resalta el ¨Replace¨

[@MarioEugenioExcel]

Hola Nicole, enviame un mensaje a [e-mail] pata ayudarte.

[@marisaraimundo7942]

Muchas gracias Mario, me funcionó perfecto. Si quiero generar otras listas desplegables en otras columnas de la misma tabla, podrías indicarme que parte del código tengo que replicar y modificar?

[@MarioEugenioExcel]

Hola Marisa! Sólo habría que extender el rango de aplicación del código a toda una columna o a varias columnas como explico desde el minuto 04:45 y hacer referencia a la columna de la tabla desde la que se quiere extraer los datos para la nueva lista desplegable Aquí te dejo un ejemplo: fumacrom.com/3QN6Q Saludos y éxitos en tus proyectos de excel!

[@marisaraimundo7942]

Perdón ahí vi que estaba en la respuesta que le diste a Andrea. Me sirvió mucho su trabajo. Muchas gracias.