Excel VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Excel
  4. To fill the bars of a data series with a picture
Sub FormatWithPicture()
    Dim myChart As Chart
    Dim ser As Series
    Set myChart = ActiveChart
    Set ser = myChart.SeriesCollection(1)
    MyPic = "C:\Title.jpg"
    ser.Format.Fill.UserPicture (MyPic)
End Sub