我怎样才能给excel的所有图表分配一个随机的名字？

我有很多图表在Excel中看起来相似，但具有不同的数据范围，但他们也有相同的图表名称。 当我将这些图表链接到Powerpoint时，这成为一个问题！

有没有办法为我的工作簿中的所有图表分配一个随机名称？

Answer 1

这将适用于图表types图表：

 Sub dural() For Each Chart In ActiveWorkbook.Charts Chart.Name = "Chart" & CStr(Rnd()) Next End Sub