如何设置单元格自定义格式

[l3300]

在Excel表单中以自定义格式设置某列数字
如果小于0显示为"（###）"，如果等于0则显示为“-”，大于0正常显示，
自定义格式为"_(* #,##0.00_);_(* (#,##0.00);_(* " - ",可正常工作，
但把该格式放入程序中则出错为：类型不匹配，程序如下：
xlWs.columents(3)NumberFormatLocal = "_(* #,##0.00_);_(* (#,##0.00);_(* " - "??_);_(@_)"

[l3300]

请高手相助

[osman003]

If ActiveCell.Value2 = 0 Then
ActiveCell.FormulaR1C1 = "-"
ElseIf ActiveCell.Value2 < 0 Then
ActiveCell.NumberFormatLocal = "0.00_);[红色](0.00)"
End If

其中,ActiveCell为需要更改格式的cell