使用VBA在Excel系列名称中使用Unicode字符

嘿家伙我试图设置一个数据序列的名称，以包含Unicode字符，我有一个时间。 例如，我想让系列名称为：

ε= n 2 -k 2

我看了几个post，但没有一个（我看到）有类似的情况。 我是新的Excel VBA脚本的事实意味着我可能忽略了一些简单的东西。 我知道特定的图表是存在的，因为这些代码只是我之前使用过的，在这里和那里增加了一些额外的位。 我不断收到错误“运行时错误（1004）：应用程序定义或对象定义的错误”。 这是我目前所拥有的：

ActiveSheet.ChartObjects(1).Activate Dim chart1 As String chart1 = "= " & ChrW(&H3B5) & " = n" & ChrW(&HB2) & " - k" & ChrW(&HB2) & " 6-5-2012" ActiveChart.SeriesCollection.NewSeries ActiveChart.SeriesCollection(1).Name = chart1 ActiveChart.SeriesCollection(1).XValues = ActiveSheet.Range("F2:F602") ActiveChart.SeriesCollection(1).Values = ActiveSheet.Range("N2:N602") 

debugging器说，以下行是错误的原因：

 ActiveChart.SeriesCollection(1).Name = chart1 

Answer 1

这是你正在尝试？

 chart1 = ChrW(&H3B5) & " = n" & ChrW(&HB2) & " - k" & ChrW(&HB2) & " 6-5-2012" 

你会得到这个错误，因为它是以“=”符号开始的，所以将它作为公式引用

如果你想显示“=”符号，那么在它之前包含一个空格。 例如

 chart1 = " = " & ChrW(&H3B5) & " = n" & ChrW(&HB2) & " - k" & _ ChrW(&HB2) & " 6-5-2012" 

快照

两种方法的快照。