Grafik oluşturmak hakkında...

Katılım
22 Eylül 2006
Mesajlar
883
Excel Vers. ve Dili
Office Excel®2007®TR
merrhaba

Merhabalar.Aşağıdaki gibi bir çözüm buldum kendimce...
Kod:
Private Sub Worksheet_Change(ByVal Target As Range)
Range("A1" & ":A" & Cells(1, 2)).Select
Charts.Add
ActiveChart.ChartType = xlLineMarkers
ActiveChart.Location Where:=xlLocationAsObject, Name:="Sayfa1"
End Sub
 
Üst