0 Replies Latest reply: Nov 29, 2011 5:55 AM by At titude RSS

    Adding all the fields of table to table box object dynamically!

      Hi All,

       

      Instead of adding the field manually. I would like to add all the fields from its respective table and create the table box. Can someone help me out to achieve this please.

      sub create_chart()


      set Sheet=ActiveDocument.ActiveSheet

       

      set chart = Sheet.CreateStraightTable
      chart.AddDimension "Product"
      chart.AddExpression "sum(Amount)"

       

      end sub

       

      Thanks,
      Attitude