เรียนอาจารย์ ทุกท่าน
จากโค้ดตัวอย่างด้านล่างเป็นการสร้างกราฟ ด้วย vba ซึ่งสามารถใช้งานได้ปกติ
แต่ผมต้องการเพิ่มการแสดง Data Labels ในกราฟแท่ง
ผมรบกวนอาจารย์ แนะนำด้วยนะครับ

ตัวอย่างโค้ด

Private Sub CreateChart()

    Dim strSQL As String
   
    strSQL = "SELECT * FROM qryDailyChart"
    Me.DailyChart.RowSource = strSQL

    With Me.DailyChart
        .HasTitle = False
        .CategoryAxisTitle = "Daily Chart"
        .ChartValues = "SupplyQty"
        .ChartAxis = "dayOfMonth"
        .ChartType = acChartColumnClustered
        .PrimaryValuesAxisRange = acAxisRangeAuto
        .PrimaryValuesAxisMaximum = 400
        .HasLegend = False
        .CategoryAxisFontSize = 14
        .CategoryAxisFontColor = RGB(0, 176, 80)
        .PrimaryValuesAxisFontSize = 12
        .ChartSubtitle = True
        .ChartSubtitleFontSize = 50
 
    End With

End Sub