Используя ExceltoWord! и получение «1004, Невозможно получить текстовое свойство класса функции листа»

Question

Я сейчас пытаюсь создать ExceltoWord! Шаблон для автоматической передачи набора текста в текстовый документ из Excel. В данный момент я вставляю описание, которое хочу использовать, в ячейку, и оно дает мне ошибку 1004. Похоже, что он основан на количестве текста, который я поместил в ячейку, потому что, когда я укорачиваю отрывок, это позволит мне опубликовать информацию. Есть ли способ, позволяющий обновлять более длинные текстовые отрывки в текстовом документе? Код отладчика, выдающий мне ошибку:

If myObjCopy.Value <> "" Then
    BkMk.Range.Text = Application.WorksheetFunction.Text(myObjCopy.Value, myObjCopy.NumberFormat)
Else
    BkMk.Range.Text = myObjCopy.Value 'use base format for all else
End If
    Application.CutCopyMode = False
End If

Answer 1

Произошла та же ошибка, на более старой итерации ошибка вызвала 255 character limit error, но на этот раз вернулась как 1004.

Из оригинальной ветки Excelto Word был дан ответ, см. Ниже.

Все, что вам нужно сделать, это закомментировать следующее, добавив ' перед двумя строками:

If myObjCopy.Value <> "" Then
                            'BkMk.Range.Text =     Application.WorksheetFunction.Text(myObjCopy.Value, myObjCopy.NumberFormat)
                        'Else
                            BkMk.Range.Text = myObjCopy.Value 'use base format for all else
                        End If