Вопрос : Достигните форматизации экспорта

Hi,

Я имею следующий Кодего я использую для того чтобы ехпортировать таблицу доступа для того чтобы первенствовать.

Может кто-то советовать Кодего для того чтобы сделать номера появиться с знаком £

С oWS
    . Ряд («A1: X1»). Interior.Color = RGB (255, 255, 0)
    FormulaRow =. Клетки (. Rows.Count, «b»). Конец (- 4162). Рядок + 'xlUp 2
    . Cells.Font.Size = 10
    . Рядки (1).Font.Bold = True
    .UsedRange.EntireColumn.AutoFit
    . Ряд («c: v») .NumberFormat = «0.00%; [Красный цвет] 0.00%»
    . Ряд («c: v») .NumberFormat = «#, ##0.00; [Красный цвет] #, ##0.00»
    . Ряд («a: ») Поле .AutoFilter: =1
    . Ряд («a: »). Отборно

Спасибо,
Seamus

Ответ : Достигните форматизации экспорта

RangeToApplyFormattingTo.NumberFormat = Chr (163) & «#, ##0.00; [Красный цвет] (" & Chr (163) & «#, ##0.00)»