// 新規ワークブックの作成 var workbook = new GrapeCity.Documents.Excel.Workbook(); object[,] data = new object[,]{ {"名前", "地域", "生年月日", "血液型", "体重", "身長"}, {"伊達", "西地区", new DateTime(1968, 6, 8), "A", 67, 165}, {"上杉", "北地区", new DateTime(1972, 7, 3), "B", 62, 134}, {"最上", "西地区", new DateTime(1964, 3, 2), "O", 72, 180}, {"片倉", "南地区", new DateTime(1972, 8, 8), "A", 66, 163}, {"田村", "東地区", new DateTime(1986, 2, 2), "A", 76, 176}, {"津軽", "北地区", new DateTime(1993, 2, 15), "AB", 68, 145} }; IWorksheet worksheet = workbook.Worksheets[0]; worksheet.Range["A1:F7"].Value = data; worksheet.Range["A:F"].ColumnWidth = 12; // テーブルを追加 worksheet.Tables.Add(worksheet.Range["A1:F7"], true); // 印刷オプションを作成 PrintOutOptions options = new PrintOutOptions(); // 印刷するプリンターを設定 options.ActivePrinter = "[実際のプリンター名]"; // 3部印刷 options.Copies = 3; // 垂直方向に裏返して両面印刷するよう指定 options.Duplex = System.Drawing.Printing.Duplex.Vertical; // このワークブックをプリンターで印刷 workbook.PrintOut(options);
' 新規ワークブックの作成 Dim workbook As New Workbook Dim data As Object(,) = { {"名前", "地域", "生年月日", "血液型", "体重", "身長"}, {"伊達", "西地区", #1968/6/8#, "A", 67, 165}, {"上杉", "北地区", #1972/7/3#, "B", 62, 134}, {"最上", "西地区", #1964/3/2#, "O", 72, 180}, {"片倉", "南地区", #1972/8/8#, "A", 66, 163}, {"田村", "東地区", #1986/2/2#, "A", 76, 176}, {"津軽", "北地区", #1993/2/15#, "AB", 68, 145} } Dim worksheet As IWorksheet = workbook.Worksheets(0) worksheet.Range("A1:F7").Value = data worksheet.Range("A:F").ColumnWidth = 12 ' テーブルを追加 worksheet.Tables.Add(worksheet.Range("A1:F7"), True) ' 印刷オプションを作成 Dim options As New PrintOutOptions ' 印刷するプリンターを設定 options.ActivePrinter = "実際のプリンター名" ' 3部印刷 options.Copies = 3 ' 垂直方向に裏返して両面印刷するよう指定 options.Duplex = System.Drawing.Printing.Duplex.Vertical ' このワークブックをプリンターで印刷 workbook.PrintOut(options)