2016-03-09 49 views
-2

我是VBA的新人,我有一項任務可以找到一種方法來實現5星評論,就像在亞馬遜/易趣中使用圖形明星本身的Excel表格一樣。這可能嗎?甚至與其他技術相結合。如何在Excel中爲表格創建星級評論系統?

我只需要一些點擊,如何做,以及從哪裏開始。

+0

您使用的是哪個版本的Excel? –

+1

也許你可以建議你的客戶使用Excel內置*條件格式*?有5-grad評級套,但他們不使用明星。 –

+0

有條件格式這樣做依賴於版本壽。 –

回答

0

根據您最近的評論,我只想簡單地勾畫手動進行此類評估的基本概念。由於我無法將它放在評論框中,因此我將它作爲概念草稿放在這裏,它可能看起來像(這不是試圖成爲解決方案):

(1)獲得明星的片材是作爲

Sheet1.Shapes.AddShape Type:=msoShape5pointStar, _ 
    Left:=100, Top:=100, Width:=7.2, Height:=7.2 

(2)獲取四個分簡單旁邊它應該是足夠簡單的通過添加事先星(S)和一些額外的空間來Left的寬度。

(3)彩色你星(S)黃色或白色可預設的(辦公2010+)

.ShapeStyle = msoShapeStylePreset12 

(4)爲了定位旁邊包含該值的單元中的片材上的星星其應該被評爲可以使用以下方法,假設值在單元格A1中:

.Left = Sheets(1).Range("A1").Left + Sheets(1).Range("A1").Width 

當然,還有一點比上面的要多一些。您將必須確定要爲其創建星星的單元格的範圍。此外,如果某人添加了一列或更改了列的寬度,則所有星星可能會發生變化,並且必須再次繪製。此外,您必須確保B列寬得足以容納所有星星。但這是基本概念(正如我試圖這樣做)。

+0

還有確定要爲任何給定物品渲染多少顆星星的問題。你提出的代碼處理渲染本身,渲染任意數字可以用循環完成,但程序如何知道它正在處理的表項要創建多少顆星? – Vegard