2012-06-12 68 views
1

嘿傢伙我試圖將數據序列的名稱設置爲包含Unicode字符的東西,而且我有一段時間。舉例來說,我想該系列名稱是這樣的:在Excel中使用Unicode字符使用VBA的系列名稱

ε= N 2 - K²

我看帖子了一把,但沒有(我看到的)也有類似的情況。我剛接觸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") 

調試器說,下面一行是錯誤的原因:

ActiveChart.SeriesCollection(1).Name = chart1 

回答

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" 

快照

兩種方法的快照。

enter image description here

+0

修好了!圖表的其餘部分不起作用(每個圖表上的所有系列),但我有一種感覺,我只需要查看如何在一個圖形上使用多個系列來修復該問題。我把''=「'放在裏面,因爲那是錄製的宏所做的,這就是我學習這個的基本原理。 –

+0

@that_physics_guy如果這個答案幫助你,然後考慮接受它,以便其他人可以看到你的問題已經解決。 – JimmyPena