Всем доброго времени суток.
проблема в том, что в dwo есть поле ххх типа string. Если в это поле положить запись 'MAR01',
то при экспорте в excel, он (excel) понимает запись как дату и вместо 'MAR01' пишет '1-Mar'.
подскажите возможные варианты как это обойти?

вот мой код экспорта:
OleObject lole_Excel
OleObject lole_Sheet

if ll_ColumnsCount > 0 then

lole_Excel = CREATE OleObject
if lole_Excel.ConnectToNewObject( 'Excel.Application' ) < 0 then
MessageBox('DW export error','Unable to connect to Microsoft Excel')
Return
end if

dw_ism.SaveAs("",Clipboard!,true)
lole_Excel.Workbooks.Add
lole_Sheet = lole_Excel.Application.ActiveWorkbook.WorkSheets[1]
lole_Sheet.PasteSpecial('Text', FALSE, FALSE )
lole_Sheet.Rows(1).Select()
lole_Excel.Selection.Font.Bold = TRUE
lole_Sheet.Columns.Autofit()
lole_Excel.Application.Visible = true
lole_Excel.DisconnectObject()
DESTROY lole_Excel
end if

З.Ы. Если через OLe Эт осделать не возможно , то подскажите как это сделать используя библиотеку dw2exl

не знаю подоёдёт ли такое решение. т.к. у меня дво тянет из базы около 5 тыс записей.
из них 7-мь с 'MAR01'.
Придётся во все те модули, которые отвечают за заполнении базы добавлять эту ковычку + модифаить все существующие.
Но спасибо за подсказку.. попвтаюсь попробовать
Вот сейчас сижу и думаю как бы сообщить екселю о том что поле стринг.

RiskaПопробуйте после сохранения задать формат "text" нужному полю.
Riska , а с помощбю какой ф-ии это можно сделать. Используя Ole объекты.

Riska , а как мне обозначить весь столбец? range выделяет прямоугольник, а я не знаю кол-ва строк.
Как я понимаю мне необходимо доватить вот это:

lole_Excel.activeworkbook.activesheet.XXXX.NumberFormat = '@'
вместо хххх надо подставить столбец. он у меня 2-ой по счёту

Предполагаю что Range("A,A")

В общем после добавления вот такого кода:

OLEObject lole_range
lole_range = lole_Excel.Range("B:B")
lole_range.NumberFormat = '@'

я получил на выходе численное значение даты в виде int. Получается, что excel сначала получил запись 'MAR01', потом преобразовал её в '1-Mar', и только потом отработал мой NumberFormat и на выходе я получил int. -((

Подскажите в какое место у меня в коде (см. 1-ый пост) мне нужно вставить этот код [я вставлял после строчки "lole_Excel.Selection.Font.Bold = TRUE"]?
Или нужно искать другое решение проблеммы?

Всем БОЛЬШОЕ СПАСИБО.
Сегодня я первый раз поработал с Ole объектами.

вот экспорта в excel с принудительным типом string для 2-го столбца:

if ll_ColumnsCount > 0 then

lole_Excel = CREATE OleObject
if lole_Excel.ConnectToNewObject( 'Excel.Application' ) < 0 then
MessageBox('DW export error','Unable to connect to Microsoft Excel')
Return
end if
dw_ism.SaveAs("",Clipboard!,true)
lole_Excel.Workbooks.Add

OLEObject lole_range
lole_range = lole_Excel.Range("B:B")
lole_range.NumberFormat = '@'

lole_Sheet = lole_Excel.Application.ActiveWorkbook.WorkSheets[1]
lole_Sheet.PasteSpecial('Text', FALSE, FALSE )
lole_Sheet.Rows(1).Select()
lole_Excel.Selection.Font.Bold = TRUE
lole_Sheet.Columns.Autofit()

lole_Excel.Application.Visible = true
lole_Excel.DisconnectObject()
DESTROY lole_Excel
end if