Excel ЧаВо

Делаю экспорт в Excel, допустим


При записи текста, содержащего одни цифры, Excel пытается его преобразовать в число. Чтобы избажать такой "помощи" со стороны Excel'я, перед записью в ячейку установите в свойство NumberFormat текстовый формат или добавьте перед текстом символ апострофа "'" (код символа 39).

Delphi:

S := '000069987'; // установим текстовый формат перед записью в ячейку

with ASheet.Range['A1', EmptyParam] do begin

NumberFormat := '@'; Formula := S; end; // или добавим перед текстом апостроф - результат тот же и даже быстрее работает

// так как не приходится изменять свойство NumberFormat

ASheet.Range['A2', EmptyParam].Formula := #39 + S;



Содержание раздела