投稿者 @@  (学生) 投稿日時 2009/11/8 03:58:58
> 投稿者 @@   (社会人)   投稿日時 2009/11/06 12:42:43  
> Sub nikai()
> '
> '
>     Charts.Add
>     ActiveChart.ChartType = xlXYScatterLines
>     ActiveChart.SetSourceData Source:=Sheets("Sheet1").Range("E3")
>     ActiveChart.SeriesCollection.NewSeries
>     ActiveChart.SeriesCollection(1).XValues = "=Sheet1!R1C1:R50C1"
>     ActiveChart.SeriesCollection(1).Values = "=Sheet1!R1C2:R50C2"
>     ActiveChart.Location Where:=xlLocationAsObject, Name:="Sheet1"
> End Sub

> このVBAでつくったプログラムをVB.netで使えるようにしてくれませんか? 
 
えー・・・いやだなぁ・・・