// SVG ファイルストリームの作成 FileStream outputStream = new FileStream("ConvertRangeToSvg.svg", FileMode.Create); // 新規ワークブックの作成 var workbook = new GrapeCity.Documents.Excel.Workbook(); IWorksheet worksheet = workbook.Worksheets[0]; // 値の設定 worksheet.Range["A1:C1"].Value = new string[] { "デバイス", "数量", "単価" }; worksheet.Range["A2:C5"].Value = new object[,] { { "T540p", 12, 9850 }, { "T570", 5, 7460 }, { "Y460", 6, 5400 }, { "Y460F", 8, 6240 } }; // スタイルの設定 worksheet.Range["A1:C1"].Font.Bold = true; worksheet.Range["A1:C1"].Font.Color = Color.White; worksheet.Range["A1:C1"].Interior.Color = Color.LightBlue; worksheet.Range["A2:C5"].Borders[BordersIndex.InsideHorizontal].Color = Color.Orange; worksheet.Range["A2:C5"].Borders[BordersIndex.InsideHorizontal].LineStyle = BorderLineStyle.DashDot; // 範囲 "A1:C5" を画像としてストリームに保存 worksheet.Range["A1:C5"].ToImage(outputStream, Drawing.ImageType.SVG); // SVG ストリームを閉じる outputStream.Close();
' SVG ファイルストリームの作成 Dim outputStream = File.Create("ConvertRangeToSvg.svg") ' 新規ワークブックの作成 Dim workbook As New Workbook Dim worksheet As IWorksheet = workbook.Worksheets(0) ' 値の設定 worksheet.Range("A1:C1").Value = {"デバイス", "数量", "単価"} worksheet.Range("A2:C5").Value = New Object(,) { {"T540p", 12, 9850}, {"T570", 5, 7460}, {"Y460", 6, 5400}, {"Y460F", 8, 6240} } ' スタイルの設定 With worksheet.Range("A1:C1") .Font.Bold = True .Font.Color = Color.White .Interior.Color = Color.LightBlue End With With worksheet.Range("A2:C5").Borders(BordersIndex.InsideHorizontal) .Color = Color.Orange .LineStyle = BorderLineStyle.DashDot End With ' 範囲 "A1:C5" を画像としてストリームに保存 worksheet.Range("A1:C5").ToImage(outputStream, ImageType.PNG) ' SVG ストリームを閉じる outputStream.Close()