Dante Amor

¿Quieres qué te filtre por lo que pusiste en el combo? ¿Pero no entiendo a qué te refieres con datos únicos? Puedes poner ejemplos de lo que tienes en la columna S, supongo que en la columna S tienes las provincias, entonces pon ejemplos de...

El método SaveCopyAs solamente tiene el argumento de Filename, porque te va a generar una copia del mismo libro con el mismo formato. https://msdn.microsoft.com/en-us/vba/excel-vba/articles/workbook-savecopyas-method-excel Puedes emplear lo...

En una celda no es posible, ya que el control de la celda e incluso de la aplicación está siendo ocupado, hasta que sales de la celda se puede activar algún evento para verificar cuántos caracteres has capturado. Otra opción es crear un textbox de...

Puedes poner unos ejemplos de lo que tienes en las celdas, pon una imagen con los dato antes de ordenar y otra imagen con el resultado que esperas después de ordenar.

Utiliza los siguiente para poner "Marzo" en la celda B2 de todas las hojas de tu libro, excepto en estas hojas:"Hoja1", "Resumen" Sub Cambiar_Mes() For Each h In Sheets Select Case h.Name Case "Hoja1", "Resumen" Case Else h.Range("B2").Value =...

Te anexo la macro para extraer celdas de otros libros y ponerlas en un nuevo libro. Pon la siguiente macro en un libro nuevo. Sub ExtraerDatos() 'Toma datos de varios libros y los pone en un nuevo libro 'Por.Dante Amor Application.DisplayAlerts =...

Te anexo la Función SumarSiConjunto3 para sumar hasta 3 criterios de rangos Function SumarSiConjunto3(rango_suma As Range, rango_criterios1 As Range, criterio1, _ Optional rango_criterios2 As Range, Optional criterio2, _ Optional rango_criterios3 As...

Puedes poner tu macro para ajustar la parte que copias. También indica cuál línea quieres copiar.

Necesitamos ver qué datos tienes en el listbox Y que nos expliques, con un ejemplo o varios ejemplo, si selecciono un registro de listbox, en base a qué datos determinas si se marca el option1 o el option2 o el 3 o 4 o 5. Y en base a qué datos se...

Te anexo la última macro con el cambio para el color Sub Macro_Unica() 'Por Dante Amor Application.ScreenUpdating = False Set h1 = Sheets("Resultados") Set h2 = Sheets("Resultados 2") celda = "A1" 'Aquí tienes que incidar en cuál fila comienzan los...