vba做箱线图，chartstyle的问题

dim chartObj as chartObject

dim chart as chart

set charObj=ws.ChartObjects.add(left:=100,width:=400,top:=50,HeightL=300)

set chart=chartObj.chart

chartObj.chart.ChartStyle=322 ‘这里的322是指箱线图，录了个代码得出的结果

with ws

chart.setsourceData Source:=.Range("a1:b5") '这里放了最大最小，q1,q3的数据

end with

结果怎么出来的都是柱形图，这个箱线图怎么搞出来呢？

请各位拨冗指点一下