È soltanto un Pokémon con le armi o è un qualcosa di più? Vieni a parlarne su Award & Oscar!
 
Pagina precedente | 1 | Pagina successiva
Vota | Stampa | Notifica email    
Autore

Grafico Classifica serieA

Ultimo Aggiornamento: 03/09/2018 13:23
Post: 604
Registrato il: 24/06/2015
Città: CATANIA
Età: 80
Utente Senior
Excel2019
ONLINE
28/08/2018 17:33

Buon pomeriggio a tutti
Credo che bisogna ricorrere a VBA
Questa macro prima mette l'etichetta (il nome della squadra) e quindi elimina tutte le etichette di ogni serie tranne l'ultima.
Non ho provato ma per quanto concerne l'indicatore (il logo della squadra) penso si possa agire con lo stesso sistema.
Ovvio che talune etichette sono sovrapposte, ma tu hai detto che sai come fare per metterle ... a posto.

Tieni presente che io ho creato un Grafico sullo stesso Foglio della Classifica (e la macro a questo si riferisce).

Ecco la macro:
Sub Solo_Ultima_Etichetta()
Dim i As Long, j As Long
Sheets("Dati").ChartObjects("Grafico 1").Select
ActiveChart.ChartArea.Select
For i = 1 To 20
  On Error Resume Next
  ActiveChart.SeriesCollecti0n(i).DataLabels.Select
  Selection.ShowSeriesName = True
  For j = 1 To ActiveChart.SeriesCollecti0n(i).Points.Count - 1
    ActiveChart.SeriesCollecti0n(i).Points(j).DataLabel.Select
    Selection.Delete
    On Error GoTo 0
  Next j
  On Error GoTo 0
Next i
End Sub


Fai sapere. Ciao,
Mario
Vota:
Amministra Discussione: | Chiudi | Sposta | Cancella | Modifica | Notifica email Pagina precedente | 1 | Pagina successiva
Nuova Discussione
 | 
Rispondi
Cerca nel forum
Tag discussione
Discussioni Simili   [vedi tutte]
Feed | Forum | Bacheca | Album | Utenti | Cerca | Login | Registrati | Amministra
Tutti gli orari sono GMT+01:00. Adesso sono le 12:25. Versione: Stampabile | Mobile | Regolamento | Privacy
FreeForumZone [v.6.1] - Copyright © 2000-2024 FFZ srl - www.freeforumzone.com