Сообщество IT-специалистов
Ответы на любые вопросы об IT
Профессиональное развитие в IT
Удаленная работа для IT-специалистов
Dim series As Series For Each series In chartObj.Chart.SeriesCollection series.MarkerStyle = 8 ' Круглый маркер Next series
Set chartObj = Sheets(1).ChartObjects(1)