This example changes the color of the comment border on cell B2 to red
Var Comment: TXLSComment;
begin
...
With Workbook.Sheets[1] dobegin
Comment := Range['B2', 'B2'].Comment;
if Assigned(Comment) then Comment.Shape.Line.ForeColor.RGB := $0000FF;
end;
...
end;