Работа со строками при экспорте в excel.

[1234567890]

Добрый день.
Я выгружаю в excel при помощи отчета. В триггере OnPostDataItem я создал алгоритм для поиска дублей, дело в том, что мне надо при поиске дублей записывать значения поля(назовем его Field1) в одну ячеку через запятую, то есть должна быть такая запись:

Товар1 Field1
тов1 А,B,C,D
тов2 E,F

Я делаю так:

xlSheet.Range('H'+ FORMAT(CurrIndex1,0,'<Integer>') ).Value:=Format(xlSheet.Range('H'+ FORMAT(CurrIndex2,0,'<Integer>') ).Value)+',';

Но тем самым я перезаписываю значение ячейки, как мне сделать дозапись или конкатенацию строки в этой ячейке?

[max_hl_imported]

Добрый день.

Может быть использовать временную переменную для получения текущего значения ячейки ? Аля

TextBuf Text 1024

TextBuf := xlSheet.Range('H'+ FORMAT(CurrIndex1,0,'<Integer>') ).Text;
IF TextBuf <> '' THEN
  TextBuf += ', ' + xlSheet.Range('H'+ FORMAT(CurrIndex2,0,'<Integer>')).Text;
xlSheet.Range('H'+ FORMAT(CurrIndex1,0,'<Integer>') ).Value := TextBuf;

Ну или я не понял вопроса..
Оператор

:=

- это перезапись, используйте

+=

для конкатенации.

[1234567890]

Цитата:

Сообщение от max_hl

Добрый день.

Может быть использовать временную переменную для получения текущего значения ячейки ? Аля

TextBuf Text 1024

TextBuf := xlSheet.Range('H'+ FORMAT(CurrIndex1,0,'<Integer>') ).Text;
IF TextBuf <> '' THEN
  TextBuf += ', ' + xlSheet.Range('H'+ FORMAT(CurrIndex2,0,'<Integer>')).Text;
xlSheet.Range('H'+ FORMAT(CurrIndex1,0,'<Integer>') ).Value := TextBuf;

Ну или я не понял вопроса..
Оператор

:=

- это перезапись, используйте

+=

для конкатенации.

Спасибо за ответ, с временной переменной всё получилось.
Я ещё хотел спросить, когда я попытался сделать с оператором "+=", то появилась ошибка: "В этой функции должно быть использованной возвращаемое значение"

 Format(xlSheet.Range('I'+ FORMAT(CurrIndex1,0,'<Integer>') ).Value)+=Format(xlSheet.Range('I'+ FORMAT(CurrIndex2,0,'<Integer>') ).Value)+',';

В чём может быть ошибка?

[Fordewind]

Цитата:

Сообщение от max_hl

+=

для конкатенации.

'+=' работает с текстовыми переменными? Раньше не работало

[max_hl_imported]

Цитата:

Сообщение от Fordewind

Цитата:

Сообщение от max_hl

+=

для конкатенации.

'+=' работает с текстовыми переменными? Раньше не работало

Работает, постоянно пользуюсь т.к. меньше писать.

Цитата:

В чём может быть ошибка?

А в левой части FORMAT зачем ? там ведь в значение ячейки результат помещается..
В целом, рекомендую проштудировать основы программирования CAL

[dmites]

Если уткнулись в максимальный размер переменной Text (1024) в Nav, а в ячейку надо запихнуть большее
значение ячейки

xlWorkSheet.Range(....).FormulaR1C1:=
FORMAT(xlWorkSheet.Range(....).Value)+pValue;

[InTacto]

Цитата:

Сообщение от dmites

Если уткнулись в максимальный размер переменной Text (1024) в Nav, а в ячейку надо запихнуть большее
значение ячейки

xlWorkSheet.Range(....).FormulaR1C1:=
FORMAT(xlWorkSheet.Range(....).Value)+pValue;

а это рабочий код? применялся где-нибудь при размере ячейки и pvalue > 1024?

[dmites]

Цитата:

Сообщение от InTacto

Цитата:

Сообщение от dmites

Если уткнулись в максимальный размер переменной Text (1024) в Nav, а в ячейку надо запихнуть большее
значение ячейки

xlWorkSheet.Range(....).FormulaR1C1:=
FORMAT(xlWorkSheet.Range(....).Value)+pValue;

а это рабочий код? применялся где-нибудь при размере ячейки и pvalue > 1024?

Да, применяется при выгрузке текстовых описаний товара в интернет магазин.