- Katılım
- 14 Şubat 2006
- Mesajlar
- 3,426
- Excel Vers. ve Dili
- (Excel 2016 - İngilizce)
DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
SeriesCollection(1).Points(i).DataLabel.Text = "=Sayfa1!R5C6"
Sub Macro1()
'
' Macro1 Macro
'
'
ActiveSheet.ChartObjects("Chart 1").Activate
ActiveChart.ChartArea.Select
ActiveChart.SeriesCollection(1).DataLabels.Select
ActiveChart.SeriesCollection(1).Points(5).DataLabel.Select
Selection.Text = "=Sayfa1!R5C6"
End Sub
Ekteki dosyada yapmaya çalıştığım, toplam çizgisinde F kolonunda bulunan verileri label olarak göstermek.