Új hozzászólás Aktív témák

• #36071 butch3r senior tag

  Új Válasz 2017-09-01 11:23:13 #36071

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  butch3r

  senior tag

  Sziasztok

  Van egy iylen makrom ami kiválóan kicserélte sok sok chart alatt az adatok forrását.

  Sub ChangeAllCharts()
  Dim sht As Worksheet
  Dim cht As ChartObject
  Dim ser As Series

  For Each sht In ActiveWorkbook.Worksheets
  For Each cht In sht.ChartObjects
  For Each ser In cht.Chart.SeriesCollection
  ser.Formula = Replace(ser.Formula, "'[2016.xlsx]Shower'", "SHOWER")
  Next ser
  Next cht
  Next sht
  End Sub

  Mit kelene módosítanom benne, hogy a chartokhoz tartozo data labelek alatt is kciserélje aza datok forrását?
  Most cellákból kapja az adatokat:

  

  elég sok chart van, egy charton meg 3 data label set, szóval tök jó lenne ha nem egyesével kéne kicserélni

  köszi
  

Új hozzászólás Aktív témák