I think this will work. If you set up a variable, my_graph, and
initalise it to "xlLine", then you can toggle this between pie chart
and bar chart within your code and change the bottom line to:

ActiveChart.ChartType = my_graph

Pete