Доброго времени суток. Имеется Макрос для автоматического построения графиков, но в нем есть БОЛЬШАЯ неточность в размере диапазона построения планок погрешностей.
Код
ActiveSheet.Shapes.AddChart.Select
ActiveChart.ApplyChartTemplate ( _
"C:\Users\User\AppData\Roaming\Microsoft\Шаблоны\Charts\график_фон.crtx")
Dim ДиапазонГрафика As Excel.Range
Set ДиапазонГрафика = Application.InputBox("введите диапазон ячеек", Type:=8)
Dim ДиапазонОШИБКИ As Excel.Range
Set ДиапазонОШИБКИ = ДиапазонГрафика.Offset(1, 0)
ActiveChart.SetSourceData Source:=ДиапазонГрафика
ActiveChart.SetElement (msoElementErrorBarStandardError)
ActiveChart.SeriesCollection(1).ErrorBar Direction:=xlX, _
Include:=xlErrorBarIncludeBoth, Type:=xlErrorBarTypeCustom, _
Amount:=ДиапазонОШИБКИ, MinusValues:=ДиапазонОШИБКИ
Mean
0,406688
0,46077
0,531198
0,765095
0,801366
0,965106
1
1,023604
0,925188
1,000149
1,408565
1,285898
1,422531
Std. error
0,096505
0,056107
0,066881
0,137588
0,045134
0,114324
0
0,095905
0,059347
0,107198
0,200233
0,283108
0,200811
то есть ДиапазонГрафика имеет вид, например A1:N1 ДиапазонОШИБКИ в таком случае будет А2:N2 выделение имеет первое значение Std. error, его надо бы убрать. то есть что бы был диапазон B2:N2
Простите, только сейчас понял что написал чушь. У меня значение не в столбцах а в стоках.
Mean
0,406688
0,46077
0,531198
0,765095
0,801366
0,965106
1
1,023604
0,925188
1,000149
1,408565
1,285898
1,422531
Std. error
0,096505
0,056107
0,066881
0,137588
0,045134
0,114324
0
0,095905
0,059347
0,107198
0,200233
0,283108
0,200811
то есть ДиапазонГрафика имеет вид, например A1:N1 ДиапазонОШИБКИ в таком случае будет А2:N2 выделение имеет первое значение Std. error, его надо бы убрать. то есть что бы был диапазон B2:N2 Еще раз приношу извинения за невнимательное написание задачи