Разное - Автозаполнение документа Word

[Александр_Цыпкин@vk]

Прошу помощи, необходимо чтобы в буфер копировалась информация в виде значений без формул. Возможна ли модернизация существующего макроса.

[Александр_Цыпкин@vk]

Прошу помощи, необходимо чтобы в буфер копировалась информация в виде значений без формул. Возможна ли модернизация существующего макроса.

Вложения

РАСЧЁТ.7z

(37.56 КБ) 0 скачиваний

РАСЧЁТ.7z

(37.56 КБ) 0 скачиваний

[Iska]

Цитата Александр_Цыпкин@vk:



в буфер копировалась информация

Разное - Автозаполнение документа Word

«буфер» — это рабочий лист «Буфер» приложенной рабочей книги?




Цитата Александр_Цыпкин@vk:



Возможна ли модернизация существующего макроса.

Разное - Автозаполнение документа Word

Закомментируйте строку:



Код:

Код: Выделить всё

    'ActiveCell.EntireRow.Copy Worksheets("Буфер").Rows(2)

и добавьте после этой строки следующее:



Код:

Код: Выделить всё

    ActiveCell.EntireRow.Copy
    Worksheets("Буфер").Rows(2).PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
    Application.CutCopyMode = False

Такое Вас устроит?