2010-10-21 77 views

回答

1

嘗試使用UserPicture方法代替:似乎工作(Excel 2003,未在其他版本中測試)。

從Excel的VBA幫助

UserPicture方法 見AlsoApplies ToExampleSpecificsUserPicture方法,因爲它適用於FillFormat對象。

用圖像填充指定的形狀。

expression.UserPicture(PictureFile) expression必需。返回上述對象之一的表達式。

PictureFile必填字符串。圖片文件的名稱。

UserPicture方法,因爲它適用於ChartFillFormat對象。

用圖像填充指定的形狀。

expression.UserPicture(PictureFile,PictureFormat,PictureStackUnit,PicturePlacement) expression必需。返回上述對象之一的表達式。

PictureFile可選Variant。

PictureFormat必需XlChartPictureType。 XlChartPictureType可以是這些XlChartPictureType常量之一。 xlStack xlStackScale xlStretch

XlChartPictureType可以是這些XlChartPictureType常數之一。 xlStack xlStackScale xlStretch

PictureStackUnit必龍。圖片堆棧或縮放單元(取決於PictureFormat參數)。

PicturePlacement必需XlChartPicturePlacement。

XlChartPicturePlacement可以是這些XlChartPicturePlacement常量之一。 xlAllFaces xlEnd xlEndSides

xlFront

xlFrontEnd

xlFrontSides

xlSides

例 本示例爲圖2的填充格式。

圖表(2).ChartArea.Fill.UserPicture「brick.gif」

+0

你好,威廉斯先生這個作品!首先,我必須使填充可見,Sheets.Item ['Chart1']。ChartArea.Fill.Visible = True非常感謝您 – addelichtman 2010-10-21 14:41:21