private void ChangeCellColor(FarPoint.Web.Spread.FpSpread s, FarPoint.Web.Spread.Cell c, FarPoint.Web.Spread.Appearance a)
{
s.ActiveSheetView.Cells[c.Row.Index, c.Column.Index].BackColor = a.BackColor;
}
FarPoint.Web.Spread.Appearance appr = new FarPoint.Web.Spread.Appearance();
appr.BackColor = Color.Red;
FarPoint.Web.Spread.Cell c;
c = FpSpread1.ActiveSheetView.Cells[1, 1];
ChangeCellColor(FpSpread1, c, appr);
Private Sub ChangeCellColor(ByVal s As FarPoint.Web.Spread.FpSpread, ByVal c As FarPoint.Web.Spread.Cell, ByVal a As FarPoint.Web.Spread.Appearance)
s.ActiveSheetView.Cells(c.Row.Index, c.Column.Index).BackColor = a.BackColor
End Sub
Dim appr As New FarPoint.Web.Spread.Appearance
appr.BackColor = Color.Red
Dim c As FarPoint.Web.Spread.Cell
c = FpSpread1.ActiveSheetView.Cells(1, 1)
ChangeCellColor(FpSpread1, c, appr)