求代码

493861364 · 发表于 2023-3-19 20:37

本帖最后由 493861364 于 2023-3-19 20:42 编辑

求代码，从左边图表，运行代码后，设置效果为右侧图表
在此拜谢了！！

手工设置方法如下

vbee · 发表于 2023-3-22 16:03

ActiveChart.SeriesCollection(5).Format.Line.Weight = 9

2010版正常

493861364 · 发表于 2023-3-22 16:08

vbee 发表于 2023-3-22 16:03
ActiveChart.SeriesCollection(5).Format.Line.Weight = 9

2010版正常

365运行以后达不到想要的效果

vbee · 发表于 2023-3-22 17:43

2021版正常

493861364 · 发表于 2023-3-22 20:35

vbee 发表于 2023-3-22 17:43
2021版正常

这位老师，感谢回复，您的电脑上运行后的效果是这个样子的吗，如红色箭头所示

找了一个2016版本的运行后是这个样子的，如果可以的话，把您运行的文件发上来我试试，十分感谢！！

vbee · 发表于 2023-3-23 08:41

找到原因了
ActiveChart.SeriesCollection(2).Format.Line.Weight = 9
ActiveChart.SeriesCollection(2).Points(2).Format.Line.Weight = 2

这两句都会改变线条的粗细
所以，所有EXCEL版本都有这个BUG，VBA不能单独设置数据点的线的粗细

493861364 · 发表于 2023-3-23 11:06

vbee 发表于 2023-3-23 08:41
找到原因了
ActiveChart.SeriesCollection(2).Format.Line.Weight = 9
ActiveChart.SeriesCollection(2 ...

我就是这2行代码出问题，看来大概率就是bug了
感谢老师的回复

		自动登录	找回密码
密码			免费注册

[求助] 求代码

评分