Tengo una salida donde la cantidad se filtra descendente desde la más alta.
Solo quiero saber si hay manera de mostrar filas con valores de 100K y superiores, excluyendo los datos inferiores a 100K.
Mis datos de ejemplo:
Name | Amount
Person 1 | 500,000
Person 2 | 400,000
Person 3 | 350,000
Person 4 | 200,000
Person 5 | 150,000
Person 6 | 90,000
Person 7 | 80,000
...
Salida deseada:
Name | Amount
Person 1 | 500,000
Person 2 | 400,000
Person 3 | 350,000
Person 4 | 200,000
Person 5 | 150,000
No sé cómo codificar ni agregar una condición para esto.
Respuesta1
Respuesta2
Lo que usted describe se puede lograr activando el Autofiltro o convirtiendo los datos en un objeto de tabla de Excel, seleccionando la configuración de filtro respectiva y luego ordenando los datos. Si se agregan más datos a la lista, entonces se debe repetir el filtro y la clasificación.
Si desea que el filtro y la clasificación se apliquen automáticamente, puede usar Power Query para cargar los datos, realizar el filtro y ordenar en Power Query y cargar el resultado en una hoja diferente. Si se agregan más datos a la lista original, simplemente puede actualizar Power Query. Esto no requiere VBA y no es necesario que el libro esté habilitado para macros.
Power Query está disponible como complemento gratuito para Excel 2010 y 2013 y está integrado en la cinta Datos de versiones posteriores como "Obtener y transformar".
Respuesta3
Sub FilterAndCopy()
Dim xStr As String
Dim xAddress As String
Dim xRg As Range
Dim xCRg As Range
Dim xSRg As Range
On Error Resume Next
xAddress = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Select Range To Filter:", "Filter Range", xAddress, , , , , 8)
If xRg Is Nothing Then Exit Sub
Set xCRg = Application.InputBox("Select Criteria range:", "Filter Range", "", , , , , 8)
If xCRg Is Nothing Then Exit Sub
Set xSRg = Application.InputBox("Select Output Range:", "Filter Range", "", , , , , 8)
If xSRg Is Nothing Then Exit Sub
xRg.AdvancedFilter xlFilterCopy, xCRg, xSRg, False
xSRg.Worksheet.Activate
xSRg.Worksheet.Columns.AutoFit
End Sub
Cómo funciona:
- Copiar&Pegareste código como módulo estándar.
- Escriba criterios (para filtrar datos) en una celda (como se muestra en la captura de pantalla).
Nota:
Mientras seleccionaCriteriosseleccione Ambos, Encabezado de columna (en la captura de pantalla esDatos) y la celda a continuación (>100000).
- CORRERla Macro.
- ResponderCuadro de entraday terminar conDe acuerdo.
Respuesta4
Otro enfoque sencillo, además de los ya mencionados, es utilizar una fórmula rápida en una columna auxiliar. Esto no requiere ningún código ni la instalación de complementos adicionales. Coloque la siguiente fórmula en la celda C2 para aislar los valores superiores a 100k, luego haga doble clic en el controlador en la esquina inferior derecha de la celda para autocompletar el resto de la columna.
=IF(B2>100000,"Yes","No")
Luego puede usar el filtro de Excel y desmarcar "No" en la columna C, ¡dejándolo solo con los datos que desea!