2013-09-30 118 views
0

似乎有很多關於如何將軸添加到圖表的信息,但如果您想要從圖表中刪除/刪除軸,則沒有太多信息可用。從圖表中刪除軸

所以我有一個100%的堆棧條形圖。

我想刪除/刪除X軸(從左到右)。

我想象,這將是一些簡單的....

Chart.HasAxis(xlCategory) = False 

但我得到一個「無法分配函數調用」

不知道會變成什麼樣的代碼x軸關閉?

任何想法?

回答

0

可能發佈更多的代碼,如果這仍然不起作用 - 除非先前已宣佈Chart作爲一個變量並分配給Chart它(另一個問題是可能使用預留變量名/半保留關鍵字) ,您提供的語句至多是僞語法。

你在做什麼應該工作,從根本上說,分配一個布爾值類似ActivePresentation.Slides(1).Shapes(1).Chart.HasAxis(xlCategory) = _boolean_應該肯定工作。

例如,用一張幻燈片創建演示文稿,刪除所有形狀/佔位符,然後插入堆積欄100%圖表。然後運行該宏:

Sub Test() 
Dim cht As Chart 
Dim sld As Slide 
Dim pres As Presentation 

    Set pres = ActivePresentation 
    Set sld = pres.Slides(1) 
    Set cht = sld.Shapes(1).Chart 

    If MsgBox("Should this chart have a visible category axis?", vbYesNo) = vbYes Then 
     cht.HasAxis(xlCategory) = True 
    Else: 
     cht.HasAxis(xlCategory) = False 
    End If 
End Sub 

enter image description here

+0

謝謝你的努力,非常豐富!我設法找到了這條小線 - Chart.Axes(xlValue,1).Delete()不知道爲什麼布爾方法不適合我。 –