VSTOおよびAspose.Cellsでワークシートのセルに境界線を追加する
Contents
[
Hide
]
スプレッドシートのセルに境界線を追加するには、以下の手順を実行してください:
- ワークシートを設定します:
- Applicationオブジェクトをインスタンス化する(VSTOのみ)
- ワークブックを追加する
- 最初のシートを取得する
- 境界線を追加するためのセルにテキストを追加する
- 境界線を追加する:
- 範囲を定義する
- 範囲に境界スタイルを適用する
- 各範囲と設定する境界スタイルごとに繰り返す。この例は毛管、細線、中線、太線を適用します。
- 終了:
- セルが含まれる列を自動的に調整してテキストがきれいに収まるようにする
- ドキュメントを保存する
これらの手順は以下のコードで示されています。最初のコード例では、VSTOを使用してこれらを実装する方法が表示され、C#またはVisual Basicのどちらかを使用します。VSTOの例の後には、同じ手順を実行する方法を示す例がありますが、Aspose.Cells for .NETを使用し、再度C#またはVisual Basicのどちらかを使用します。Aspose.Cellsコードサンプルは、効率的なコーディングに最適化されているため、はるかに短くなります。
コードは、最初のシート上のいくつかのセルに異なる境界線を持つExcelファイルを生成します。
境界線が適用されたセル。
VSTO
//Instantiate the Application object.
Excel.Application ExcelApp = Application;
//Add a Workbook.
Excel.Workbook objBook = ExcelApp.Workbooks.Add(System.Reflection.Missing.Value);
//Get the First sheet.
Excel.Worksheet objSheet = (Excel.Worksheet)objBook.Sheets["Sheet1"];
//Put some text into different cells (A2, A4, A6, A8).
objSheet.Cells[2, 1] = "Hair Lines";
objSheet.Cells[4, 1] = "Thin Lines";
objSheet.Cells[6, 1] = "Medium Lines";
objSheet.Cells[8, 1] = "Thick Lines";
//Define a range object(A2).
Excel.Range _range;
_range = objSheet.get_Range("A2", "A2");
//Get the borders collection.
Excel.Borders borders = _range.Borders;
//Set the hair lines style.
borders.LineStyle = Excel.XlLineStyle.xlContinuous;
borders.Weight = 1d;
//Define a range object(A4).
_range = objSheet.get_Range("A4", "A4");
//Get the borders collection.
borders = _range.Borders;
//Set the thin lines style.
borders.LineStyle = Excel.XlLineStyle.xlContinuous;
borders.Weight = 2d;
//Define a range object(A6).
_range = objSheet.get_Range("A6", "A6");
//Get the borders collection.
borders = _range.Borders;
//Set the medium lines style.
borders.LineStyle = Excel.XlLineStyle.xlContinuous;
borders.Weight = 3d;
//Define a range object(A8).
_range = objSheet.get_Range("A8", "A8");
//Get the borders collection.
borders = _range.Borders;
//Set the thick lines style.
borders.LineStyle = Excel.XlLineStyle.xlContinuous;
borders.Weight = 4d;
//Auto-fit Column A.
objSheet.get_Range("A2", "A2").EntireColumn.AutoFit();
//Save the excel file.
objBook.SaveAs("ApplyBorders.xls",
Microsoft.Office.Interop.Excel.XlFileFormat.xlExcel8,
Type.Missing,
Type.Missing,
Type.Missing,
Type.Missing,
Microsoft.Office.Interop.Excel.XlSaveAsAccessMode.xlNoChange,
Type.Missing,
Type.Missing,
Type.Missing,
Type.Missing,
Type.Missing);
//Quit the Application.
ExcelApp.Quit();
Aspose.Cells
//Instantiate a new Workbook.
Workbook objBook = new Workbook();
//Get the First sheet.
Worksheet objSheet = objBook.Worksheets["Sheet1"];
//Put some text into different cells (A2, A4, A6, A8).
objSheet.Cells[1, 0].PutValue("Hair Lines");
objSheet.Cells[3, 0].PutValue("Thin Lines");
objSheet.Cells[5, 0].PutValue("Medium Lines");
objSheet.Cells[7, 0].PutValue("Thick Lines");
//Define a range object(A2).
Aspose.Cells.Range _range;
_range = objSheet.Cells.CreateRange("A2", "A2");
//Set the borders with hair lines style.
_range.SetOutlineBorders(CellBorderType.Hair, Color.Black);
//Define a range object(A4).
_range = objSheet.Cells.CreateRange("A4", "A4");
//Set the borders with thin lines style.
_range.SetOutlineBorders(CellBorderType.Thin, Color.Black);
//Define a range object(A6).
_range = objSheet.Cells.CreateRange("A6", "A6");
//Set the borders with medium lines style.
_range.SetOutlineBorders(CellBorderType.Medium, Color.Black);
//Define a range object(A8).
_range = objSheet.Cells.CreateRange("A8", "A8");
//Set the borders with thick lines style.
_range.SetOutlineBorders(CellBorderType.Thick, Color.Black);
//Auto-fit Column A.
objSheet.AutoFitColumn(0);
//Save the excel file.
objBook.Save("ApplyBorders.xls");