Добрый день!
Задача стоит следующая - перенести содержимое ячейки (пусть будет A4) с листа Excel (w1) в таблицу в файле Word (wrdDoc). При этом проблема заключается в том, что данная ячейка содержит надстрочный(е) символ(ы) и в начало содержимого требуется добавить набор символов (пусть будет "1. ").
Если я переношу содержимое таким образом:
Задача стоит следующая - перенести содержимое ячейки (пусть будет A4) с листа Excel (w1) в таблицу в файле Word (wrdDoc). При этом проблема заключается в том, что данная ячейка содержит надстрочный(е) символ(ы) и в начало содержимого требуется добавить набор символов (пусть будет "1. ").
Если я переношу содержимое таким образом:
| Код |
|---|
wrdDoc.Tables(1).Cell(3, 1) = "1. " & w1.Cells(4,1) |
то надстрочные символы перестают быть надстрочными.
Единственный вариант сохранить надстрочные символы, который я нашел - копировать содержимое ячейки:
| Код |
|---|
w1.Cells(4,1).Copy wrdDoc.Tables(1).Cell(3,1).Range.Paste |
Но тогда не понятно как вставить нужный набор символов в начало ("1. ").
Изменено: - 29.07.2025 07:13:54
