Как вставить через VBA с такими же параметрами, как Ctrl-V (без форматирования)? - PullRequest
Новая
       35

Как вставить через VBA с такими же параметрами, как Ctrl-V (без форматирования)?

0 голосов
/ 09 марта 2020

Мне нужно вставить текст из почты прямо в Excel, когда я копирую его и Ctrl-V, он работает нормально. Но я не могу найти формулу вставки, которая работает так.

Когда я вставляю ее как значения, она испортила весь лист. 

Range("BC1").Select
ActiveCell.PasteSpecial Paste:=xlPasteAll

Я попробовал это без удачи и xlpastevalues ...

Мои тексты должны быть вставлены в одну колонку, как тексты (у меня есть другой макрос, чтобы скрыть это к определенной таблице).

Имеет ли это смысл? если нет, я могу опубликовать несколько фотографий.

1 Ответ

0 голосов
/ 09 марта 2020

Попробуйте ActiveSheet.PasteSpecial Format:="HTML" ... ИЛИ ... ActiveSheet.PasteSpecial Format:="Text"

Я пытался вставить (правой кнопкой мыши) текст из почты в Excel и получил следующее контекстное меню.

enter image description here

Это было меню «Вставить», которое я использовал, когда использовал для копирования из Crome. Итак, я записал макрос, выбрав опцию «Match Destination Formatting». enter image description here

В VBA я получил 

ActiveSheet.PasteSpecial Format:="HTML", Link:=False, DisplayAsIcon:= _
    False, NoHTMLFormatting:=True

Затем я записал макрос, выбрав параметр «Текст» в меню «Специальная вставка» enter image description here

и в VBA я получил 

ActiveSheet.PasteSpecial Format:="Text", Link:=False, DisplayAsIcon:= _
    False
...