etichette esterne all'area del grafico

Question

Salve,

ho creato un grafico a barre, le cui etichette sono esterne all'area dei dati selezionati.

subito sotto l'area DATI ho un'altra area contenente le etichette da legare a ciarcuna barra.

Le opzioni di excel non mi permettono una modifica che non sia manuale: sono 140 etichette.

C'è un metodo automatico che voi sappiate?

grazie

Answer 1

Ciao Andy,

grazie per il tuo aiuto.

Tuttavia proprio non riesco a farlo funzionare.

Ho allegato un file per spiegarmi meglio:

https://skydrive.live.com/#cid=DA5FCA9CD6A20162&id=DA5FCA9CD6A20162%21217

thanks a lot

Ciao Andrea,

la macro che ti ho proposto non può funzionare, ma il tuo grafico ... caos, molto caos!

Sempre a fin di bene:

• Il grafico dovrebbe rappresentare 12 categorie x 23 serie = 276 dati diversi, mentre le etichette sono in totale 129, mi spieghi in base a quale ragionevole criterio dovrei assegnarle ai dati rappresentati? Nemmeno la loro disposizione aiuta!
• Non tutte le serie sono rappresentate nel grafico (mancano la 1/2/8/10) perché? E' una dimenticanza o piuttosto è voluto (vedi punto seguente)?
• I dati rappresentati sono costituiti da tempi, cioè valori decimali, ma alcuni di essi (guarda caso proprio le serie non rappresentate) contengono anche date, cioè numeri interi, questo, probabilmente, ti ha obbligato a eliminare quelle serie dal grafico.

A questo punto:

• correggerei i dati da rappresentare uniformandoli;
• correggerei il grafico aggiungendo le serie mancanti, sempre che debbano essere aggiunte;
• fornirei un criterio razionale di attribuzione delle etichette.

Poi ne possiamo parlare.

Andrea.

Answer 2

Ciao Andy,

grazie per il tuo aiuto.

Tuttavia proprio non riesco a farlo funzionare.

Ho allegato un file per spiegarmi meglio:

https://skydrive.live.com/#cid=DA5FCA9CD6A20162&id=DA5FCA9CD6A20162%21217

thanks a lot

Answer 3

E formato da N serie diverse.

Ciao Andrea,

prova con questa su una copi del file, dopo aver modificato le righe evidenziate.

Andrea.

---

Sub addBarChartLabels()

Dim wsA As Worksheet

Dim cht As Chart

Dim rng As Range

Dim lbl As String

Dim i As Long

'---------- adatta alle tue esigenze

Set wsA = ThisWorkbook.Worksheets("Foglio1")

Set cht = wsA.ChartObjects("Grafico 1").Chart

'---------- intervallo contenente le etichette: deve essere uguale al numero delle serie

Set rng = wsA.Range("D2:D142")

If (cht.SeriesCollection.Count <> rng.Cells.Count) Then

MsgBox "Attenzione, la serie e il range non contengono lo stesso numero di punti!"

Exit Sub

End If

For i = 1 To cht.SeriesCollection.Count

lbl = rng.Cells(i, 1)

With cht.SeriesCollection(i).Points(1)

.HasDataLabel = True

'---------- add data labels

With .DataLabel

.Text = lbl

.Position = xlLabelPositionOutsideEnd

'---------- altre formattazioni delle label a piacimento

'.Font.Bold = True

'.Font.Italic = True

'.Font.Size = 8

'.Font.Color = RGB(255, 255, 255)

'.Orientation = xlHorizontal

'.Format.Fill.BackColor.RGB = RGB(255, 0, 0)

'.Format.Fill.ForeColor.RGB = RGB(255, 0, 0)

End With

End With

Next

'---------- clean up

Set rng = Nothing

Set cht = Nothing

Set wsA = Nothing

End Sub

---

Answer 4

E formato da N serie diverse.

Answer 5

Salve,

ho creato un grafico a barre, le cui etichette sono esterne all'area dei dati selezionati.

subito sotto l'area DATI ho un'altra area contenente le etichette da legare a ciarcuna barra.

 

Le opzioni di excel non mi permettono una modifica che non sia manuale: sono 140 etichette.

C'è un metodo automatico che voi sappiate?

 

grazie

Ciao Andrea,

il tuo grafico è formato da una serie con tanti valori o da N serie diverse?

Andrea.