Ciao tutti,
I che prova a convincere codice di qualche VBA programmatically per aggiornare le gamme di serie nelle tabelle (ci sono lotti di loro da fare).
However, sta ottenendo ha attaccato su alcuno (non avendo effetto). il codice del
My è come segue:
Dim MySht del
Option Explicit
Sub ChartDataFixup () come Worksheet
Dim MyCht come ChartObject
Dim MySeries come Series
sul riassunto Next
di errore per ogni MySht nel
di ThisWorkbook.Worksheets
se andato (MySht.Name, 3) =
Debug.Print “++++++ "
“di Cht„ Then
del
Debug.Print MySht.Name
per ogni MyCht nel
di MySht.ChartObjects
per ogni MySeries nel
Debug.Print di MyCht.Chart.SeriesCollection
“PRIMA: „ & MySeries.Name & ““&
di MySeries.Formula
MySeries.Formula = sostituiscono (MySeries.Formula, “$42,„, “$999,
Debug.Print del ")
“DOPO: „ & MySeries.Name & ““& uscita del
End Sub
The del
Next
Debug.Print “++++++ " di If
di conclusione del
del
Next
del
Next
di MySeries.Formula
nella finestra immediata è come questo (ho incollato soltanto i primi tre, ma ci sono dozzine):
++++++
Cht - reddito - Month
BEFORE: Un =SERIES (dati! $E$5, “SPS Projection.xls„! Chart_Period, dati! $E$7: $E$999, 1)
AFTER: Un =SERIES (dati! $E$5, “SPS Projection.xls„! Chart_Period, dati! $E$7: $E$999, 1)
BEFORE: =SERIES di B (dati! $F$5, “SPS Projection.xls„! Chart_Period, dati! $F$7: $F$999, 2)
AFTER: =SERIES di B (dati! $F$5, “SPS Projection.xls„! Chart_Period, dati! $F$7: $F$999, 2)
BEFORE: =SERIES di C (dati! $G$5, “SPS Projection.xls„! Chart_Period, dati! $G$7: $G$999, 3)
AFTER: =SERIES di C (dati! $G$5, “SPS Projection.xls„! Chart_Period, dati! $G$7: $G$999, 3)
BEFORE: =SERIES di D (dati! $H$5, “SPS Projection.xls„! Chart_Period, dati! $H$7: $H$999, 4)
AFTER: =SERIES di D (dati! $H$5, “SPS Projection.xls„! Chart_Period, dati! $H$7: $H$999, 4)
BEFORE: =SERIES di E (dati! $I$5, “SPS Projection.xls„! Chart_Period, dati! $I$7: $I$999, 5)
AFTER: =SERIES di E (dati! $I$5, “SPS Projection.xls„! Chart_Period, dati! $I$7: $I$999, 5)
BEFORE: =SERIES di F (dati! $J$5, “SPS Projection.xls„! Chart_Period, dati! $J$7: $J$999, 6)
AFTER: =SERIES di F (dati! $J$5, “SPS Projection.xls„! Chart_Period, dati! $J$7: $J$999, 6)
BEFORE: =SERIES di G (dati! $K$5, “SPS Projection.xls„! Chart_Period, dati! $K$7: $K$999, 7)
AFTER: =SERIES di G (dati! $K$5, “SPS Projection.xls„! Chart_Period, dati! $K$7: $K$999, 7)
BEFORE: =SERIES di totale (RHS) (dati! $N$5, dati! $N$7: $N$999, 8)
AFTER: =SERIES di totale (RHS) (dati! $N$5, dati! $N$7: $N$999, 8)
++++++
Cht - profitto lordo Month
BEFORE: Un =SERIES (dati! $A5, “SPS Projection.xls„! Chart_Period, dati! $A7:
AFTER di $A999,1): Un =SERIES (dati! $A5, “SPS Projection.xls„! Chart_Period, dati! $A7:
BEFORE di $A999,1): =SERIES di B (dati! $AD$5, “SPS Projection.xls„! Chart_Period, dati! $AD$7:
AFTER di $AD$999,2): =SERIES di B (dati! $AD$5, “SPS Projection.xls„! Chart_Period, dati! $AD$7:
BEFORE di $AD$999,2): =SERIES di C (dati! $AE$5, “SPS Projection.xls„! Chart_Period, dati! $AE$7:
AFTER di $AE$999,3): =SERIES di C (dati! $AE$5, “SPS Projection.xls„! Chart_Period, dati! $AE$7:
BEFORE di $AE$999,3): =SERIES di D (dati! $AF$5, “SPS Projection.xls„! Chart_Period, dati! $AF$7:
AFTER di $AF$999,4): =SERIES di D (dati! $AF$5, “SPS Projection.xls„! Chart_Period, dati! $AF$7:
BEFORE di $AF$999,4): =SERIES di E (dati! $AG$5, “SPS Projection.xls„! Chart_Period, dati! $AG$7:
AFTER di $AG$999,5): =SERIES di E (dati! $AG$5, “SPS Projection.xls„! Chart_Period, dati! $AG$7:
BEFORE di $AG$999,5): =SERIES di totale (RHS) (dati! $AL$5, dati! $AL$7:
AFTER di $AL$999,6): =SERIES di totale (RHS) (dati! $AL$5, dati! $AL$7:
BEFORE di $AL$999,6): =SERIES di F (dati! $AH$5, “SPS Projection.xls„! Chart_Period, dati! $AH$7:
AFTER di $AH$999,7): =SERIES di F (dati! $AH$5, “SPS Projection.xls„! Chart_Period, dati! $AH$7:
BEFORE di $AH$999,7): =SERIES di G (dati! $AI$5, “SPS Projection.xls„! Chart_Period, dati! $AI$7:
AFTER di $AI$999,8): =SERIES di G (dati! $AI$5, “SPS Projection.xls„! Chart_Period, dati! $AI$7:
++++++
Cht - GP% di $AI$999,8) - Month
BEFORE: Un =SERIES (dati! $BA$5, “SPS Projection.xls„! Chart_Period, dati! $BA$7: $BA$42, 1)
AFTER: Un =SERIES (dati! $BA$5, “SPS Projection.xls„! Chart_Period, dati! $BA$7: $BA$42, 1)
BEFORE: =SERIES di B (dati! $BB$5, “SPS Projection.xls„! Chart_Period, dati! $BB$7: $BB$42, 2)
AFTER: =SERIES di B (dati! $BB$5, “SPS Projection.xls„! Chart_Period, dati! $BB$7: $BB$42, 2)
BEFORE: =SERIES di D (dati! $BD$5, “SPS Projection.xls„! Chart_Period, dati! $BD$7: $BD$42, 3)
AFTER: =SERIES di D (dati! $BD$5, “SPS Projection.xls„! Chart_Period, dati! $BD$7: $BD$42, 3)
BEFORE: =SERIES di E (dati! $BE$5, “SPS Projection.xls„! Chart_Period, dati! $BE$7: $BE$42, 4)
AFTER: =SERIES di E (dati! $BE$5, “SPS Projection.xls„! Chart_Period, dati! $BE$7: $BE$42, 4)
BEFORE: =SERIES di F (dati! $BF$5, “SPS Projection.xls„! Chart_Period, dati! $BF$7: $BF$42, 5)
AFTER: =SERIES di F (dati! $BF$5, “SPS Projection.xls„! Chart_Period, dati! $BF$7: $BF$42, 5)
BEFORE: =SERIES di G (dati! $BG$5, “SPS Projection.xls„! Chart_Period, dati! $BG$7: $BG$42, 6)
AFTER: =SERIES di G (dati! $BG$5, “SPS Projection.xls„! Chart_Period, dati! $BG$7: $BG$42, 6)
++++++
As che potete vedere, funzionamento (precedente) di codice ha riparato le prime due tabelle, ma è venuto a mancare sul terzo chart.
What sono io che manco qui?
Thanks,
Alan.
class= del
|
