ActiveSheet.ChartObjects("graph").Activate ActiveChart.FullSeriesCollection(1).Select 'マーカーを消す（.MarkerStyle = -4142も同じ） With Selection .MarkerStyle = xlNone End With 'マーカーの型とサイズを指定 With Selection .MarkerStyle = 8 .MarkerSize = 5 End With 'マーカーの色を指定（BackgroundColor…
