MESCIUS SPREAD for Windows Forms 15.0J
セルコメント
MESCIUS SPREAD for Windows Forms 15.0J > 開発者ガイド > セル > セルコメント

SPREAD for Windows Formsでは、ワークシートのセルにコメントを追加できます。 プレーンテキストのコメントまたはノートを追加するには、「セルノート」トピックを参照してください。

さらに、EnhancedShapeEngineプロパティを有効にして文字列、IRange.AddCommentメソッドを使用してリッチテキストのインスタンスを追加できます。

追加されたコメントをIRange.Commentプロパティを使用して編集できます。例えば、次の画像はデフォルトコメントとカスタマイズされたコメントの両方を表示します。カスタマイズされたコメントの場合は、常に表示するようにし、背景色、シェイプ罫線スタイル、罫線色などプロパティも設定されています。

スレッド化されたコメントを追加するには、IRange.AddCommentThreadedメソッドを使用できます。スレッド化されたコメントはSPREAD上では表示されず、エクスポートしたXLSXファイルでのみ表示されます。

 

次のサンプルコードは、コメントおよびスレッド化されたコメントを設定する方法を示します。

C#
コードのコピー 
// アクティブシートを取得します。
GrapeCity.Spreadsheet.IWorksheet TestActiveSheet = fpSpread1.AsWorkbook().ActiveSheet;
            
// 拡張シェイプエンジンを有効にします。
fpSpread1.Features.EnhancedShapeEngine = true;
            
string username = "Admin" + ":";
            
// リッチテキストオブジェクトを初期化します。
GrapeCity.Spreadsheet.RichText richText = new GrapeCity.Spreadsheet.RichText(username + "これはコメントをサポートする\r\nリッチテキストです。");

// スタイル設定
GrapeCity.Spreadsheet.Font font = GrapeCity.Spreadsheet.Font.Empty;
font.Bold = true;
GrapeCity.Spreadsheet.Font font2 = GrapeCity.Spreadsheet.Font.Empty;
font2.Italic = true;
font2.Underline = GrapeCity.Spreadsheet.UnderlineStyle.Double;

// リッチテキストにスタイルを追加します。
richText.Format(0, username.Length, font);
richText.Format(17, 9, font2);

// セルにコメントを追加します。
GrapeCity.Spreadsheet.IComment comment = TestActiveSheet.Cells["B2"].AddComment(richText);
            
// コメントスタイルをカスタマイズします。
TestActiveSheet.Cells["B2"].Comment.Visible = true; // 常にコメントを表示します。
TestActiveSheet.Cells["B2"].Comment.Shape.Fill.BackColor.ARGB = Color.Orange.ToArgb();  // コメントの背景色を変更します。
TestActiveSheet.Cells["B2"].Comment.Shape.Line.Style = GrapeCity.Drawing.LineStyle.ThickThin;   // 罫線のスタイルを変更します。
TestActiveSheet.Cells["B2"].Comment.Shape.Line.Weight = 5;  // 罫線の太さを変更します。
TestActiveSheet.Cells["B2"].Comment.Shape.Line.ForeColor.ARGB = Color.DeepSkyBlue.ToArgb(); // 罫線の色を変更します。

// スレッド化されたコメントを追加します。
TestActiveSheet.Cells["C5"].AddCommentThreaded("スレッド化されたコメントがサポートされています");

// スレッド化されたコメントを含むファイルをエクスポートします。
fpSpread1.SaveExcel("threaded-comment.xlsx", FarPoint.Excel.ExcelSaveFlags.UseOOXMLFormat | FarPoint.Excel.ExcelSaveFlags.Exchangeable);
Visual Basic
コードのコピー 
'アクティブシートを取得します。
Dim TestActiveSheet As GrapeCity.Spreadsheet.IWorksheet = FpSpread1.AsWorkbook().ActiveSheet
        
'拡張シェイプエンジンを有効にします。
FpSpread1.Features.EnhancedShapeEngine = True

Dim username As String = "Admin" & ":"

'リッチテキストオブジェクトを初期化します。
Dim richText As GrapeCity.Spreadsheet.RichText = New GrapeCity.Spreadsheet.RichText(username & vbCrLf & "これはコメントをサポートする" & vbCrLf & "リッチテキストです。")

'スタイル設定
Dim font As GrapeCity.Spreadsheet.Font = GrapeCity.Spreadsheet.Font.Empty
font.Bold = True
Dim font2 As GrapeCity.Spreadsheet.Font = GrapeCity.Spreadsheet.Font.Empty
font2.Italic = True
font2.Underline = GrapeCity.Spreadsheet.UnderlineStyle.Double

'リッチテキストにスタイルを追加します。
richText.Format(0, username.Length, font)
richText.Format(17, 9, font2)

'セルにコメントを追加します。
Dim comment As GrapeCity.Spreadsheet.IComment = TestActiveSheet.Cells("B2").AddComment(richText)

'コメントスタイルをカスタマイズします。
TestActiveSheet.Cells("B2").Comment.Visible = True  '常にコメントを表示します。
TestActiveSheet.Cells("B2").Comment.Shape.Fill.BackColor.ARGB = Color.Orange.ToArgb()   'コメントの背景色を変更します。
TestActiveSheet.Cells("B2").Comment.Shape.Line.Style = GrapeCity.Drawing.LineStyle.ThickThin    '罫線のスタイルを変更します。
TestActiveSheet.Cells("B2").Comment.Shape.Line.Weight = 5   '罫線の太さを変更します。
TestActiveSheet.Cells("B2").Comment.Shape.Line.ForeColor.ARGB = Color.DeepSkyBlue.ToArgb()  '罫線の色を変更します。

'スレッド化されたコメントを追加します。
TestActiveSheet.Cells("C5").AddCommentThreaded("スレッド化されたコメントがサポートされています")

'スレッド化されたコメントを含むファイルをエクスポートします。
FpSpread1.SaveExcel("threaded-comment.xlsx", FarPoint.Excel.ExcelSaveFlags.UseOOXMLFormat Or FarPoint.Excel.ExcelSaveFlags.Exchangeable)

 

 

© MESCIUS inc. All rights reserved.