Sub AddShapes () Dim MyShape As Shape 'Add a rectangle in the sheet1 Set MyShape = Sheets ("sheet1"). In the example my charts are called Chart 1 and chart ...
確定! 回上一頁