poner - modificar eje horizontal excel

Reordenando series de datos de gráficos en Excel

Question

¿Cómo se puede reordenar una serie utilizada para crear un gráfico en Excel?

Por ejemplo, voy a la tabla, haga clic con el botón derecho> Seleccionar datos. En la columna de la izquierda veo series 1, serie 2, ..., serie n. Diga, quiero mover la serie 3 después de la serie 4, ¿se puede hacer desde la vista de gráfico? No quiero mover las celdas de datos en la hoja de trabajo.

Estoy usando Excel 2011 (mac os x).

Answer 1

Esta función obtiene los nombres de las series, los pone en una matriz, ordena la matriz y en función de eso define el orden de trazado que dará el resultado deseado.

Function Increasing_Legend_Sort(mychart As Chart)


    Dim Arr()
    ReDim Arr(1 To mychart.FullSeriesCollection.Count)

        ''Assigning Series names to an array
        For i = LBound(Arr) To UBound(Arr)
        Arr(i) = mychart.FullSeriesCollection(i).Name
        Next i

        ''Bubble-Sort (Sort the array in increasing order)
        For r1 = LBound(Arr) To UBound(Arr)
            rval = Arr(r1)
                For r2 = LBound(Arr) To UBound(Arr)
                    If Arr(r2) > rval Then ''Change ">" to "<" to make it decreasing
                        Arr(r1) = Arr(r2)
                        Arr(r2) = rval
                        rval = Arr(r1)
                    End If
                Next r2
        Next r1

    ''Defining the PlotOrder
    For i = LBound(Arr) To UBound(Arr)
    mychart.FullSeriesCollection(Arr(i)).PlotOrder = i
    Next i

End Function

Answer 2

Estos son los botones ARRIBA / ABAJO

Answer 3

Excel 2010: si está buscando reordenar la serie en un gráfico dinámico :

• ve a tu tabla dinámica subyacente
• haga clic derecho en una de las etiquetas de columna para la serie que desea ajustar (Nota: debe hacer clic en uno de los encabezados de la serie (es decir, "Sábado" o "Domingo" en el ejemplo que se muestra a continuación), no en la columna El texto de las etiquetas en sí
• en el menú emergente, desplace el cursor sobre ''Mover'' y luego seleccione una opción del submenú resultante para reposicionar la variable de la serie.
• su tabla dinámica se actualizará en consecuencia

Answer 4

FYI, si usa dos ejes y, los números de orden solo harán una diferencia dentro del conjunto de series de ese eje y. Creo que el eje secundario y por defecto está en la parte superior del primario. Si desea que la serie en el eje principal esté en la parte superior, deberá hacerla secundaria.

Answer 5

Haga clic derecho en cualquier serie en el gráfico. En el cuadro de diálogo "Formato de serie de datos", hay una pestaña "Orden de serie", en la que puede mover series hacia arriba y hacia abajo. Encuentro esto mucho más fácil que jugar con el último argumento de la fórmula de la serie.

Esto está en Excel 2003 en Windows. Hay un diálogo similar en Excel 2011 para Mac:

Answer 6

Para cambiar el orden de apilamiento de series en gráficos en Excel para Mac 2011:

1. selecciona la tabla,
2. seleccione la serie (más fácil en Cinta de opciones> Diseño de tabla> Selección actual),
3. haga clic en Diseño de gráfico> Selección de formato o Menú> Formato> Serie de datos ...,
4. en el menú emergente Formato serie de datos, haga clic en Ordenar, luego haga clic en series individuales y haga clic en los botones Subir o Bajar para ajustar el orden de apilamiento en el Eje para la serie de temas. Esto cambia el orden de la trama y de la leyenda, pero no puede cambiar el número de orden en la fórmula de la serie.

Tenía una trama de tres series en el eje secundario, y la serie que quería en la parte superior estaba pegada en la parte inferior, desafiando los botones Subir y Bajar . Resultó estar formateado solo como marcadores. Inserté una línea, y listo (!), Pude cambiar su orden en la trama. Más tarde pude eliminar la línea y, a veces, todavía se puede pedir, pero a veces no.

Answer 7

Para cambiar la secuencia de una serie en Excel 2010:

• Seleccione (haga clic en) cualquier serie de datos y haga clic en la pestaña "Diseño" en el grupo "Herramientas de gráficos".
• Haga clic en "Seleccionar datos" en el grupo "Datos" y en la ventana emergente, resalte la serie que se moverá.
• Haga clic en el triángulo hacia arriba o hacia abajo en la parte superior del cuadro de la izquierda etiquetado como "Entradas de leyenda" (Series).

Answer 8

Seleccione una serie y busque en la barra de fórmulas. El último argumento es el orden de la trama de la serie. Puede editar esta fórmula como cualquier otra, directamente en la barra de fórmulas.

Por ejemplo, seleccione la serie 4, luego cambie la 4 a una 3.

Answer 9

Vea abajo

Utilice el siguiente código, si está utilizando excel 2007 o 2010 y desea reordenar las leyendas solamente. Asegúrese de que mChartName coincida con su nombre de gráfico.

Sub ReverseOrderLegends()

mChartName = "Chart 1"
Dim sSeriesCollection As SeriesCollection
Dim mSeries As Series
With ActiveSheet
    .ChartObjects(mChartName).Chart.SetElement (msoElementLegendNone)
    .ChartObjects(mChartName).Chart.SetElement (msoElementLegendRight)
    Set sSeriesCollection = .ChartObjects(mChartName).Chart.SeriesCollection
    For Each mSeries In sSeriesCollection
        If mSeries.Values(1) = 0.000000123 Or mSeries.Values(1) = Empty Then
            mSeries.Delete
        End If
    Next mSeries

    LegendCount = .ChartObjects(mChartName).Chart.SeriesCollection.Count
    For mLegend = 1 To LegendCount
        .ChartObjects(mChartName).Chart.SeriesCollection.NewSeries
        .ChartObjects(mChartName).Chart.SeriesCollection(LegendCount + mLegend).Name = .ChartObjects(mChartName).Chart.SeriesCollection(LegendCount - mLegend + 1).Name
        .ChartObjects(mChartName).Chart.SeriesCollection(LegendCount + mLegend).Values = "={0.000000123}"
        .ChartObjects(mChartName).Chart.SeriesCollection(LegendCount + mLegend).Format.Fill.ForeColor.RGB = .ChartObjects(mChartName).Chart.SeriesCollection(LegendCount - mLegend + 1).Format.Fill.ForeColor.RGB
    Next mLegend

    For mLegend = 1 To LegendCount
        .ChartObjects(mChartName).Chart.Legend.LegendEntries(1).Delete
    Next mLegend
End With
End Sub