如何使用与 Ctrl-v 相同的选项(无格式)粘贴 vba?
How to paste through vba with same options as Ctrl-v (no formatting)?
我需要将邮件中的一些文本直接粘贴到我的 excel 中,当我复制它并按 ctrl-v 时,它工作正常。
但是我找不到这样的粘贴公式。
当我将其粘贴为值时,它会弄乱整个 sheet。
Range("BC1").Select
ActiveCell.PasteSpecial Paste:=xlPasteAll
我已经试过了,但没有成功,xlpastevalues
...
我的文本需要像文本一样粘贴到一栏的开头(我有另一个宏将其转换为定义的 table)。
有意义吗?如果没有我可以 post 一些照片。
尝试 ActiveSheet.PasteSpecial Format:="HTML"
... 或者 ... ActiveSheet.PasteSpecial Format:="Text"
我尝试将邮件中的文本粘贴(右键单击)到 Excel 并得到以下快捷菜单。
这是我以前从 Crome 复制时得到的 'paste' 菜单。所以,我录制宏选择 "Match Destination Formatting" 选项。
在VBA我得到了
ActiveSheet.PasteSpecial Format:="HTML", Link:=False, DisplayAsIcon:= _
False, NoHTMLFormatting:=True
然后我录制了在选择性粘贴菜单中选择文本选项的宏
在 VBA 我得到了
ActiveSheet.PasteSpecial Format:="Text", Link:=False, DisplayAsIcon:= _
False
我需要将邮件中的一些文本直接粘贴到我的 excel 中,当我复制它并按 ctrl-v 时,它工作正常。 但是我找不到这样的粘贴公式。
当我将其粘贴为值时,它会弄乱整个 sheet。
Range("BC1").Select
ActiveCell.PasteSpecial Paste:=xlPasteAll
我已经试过了,但没有成功,xlpastevalues
...
我的文本需要像文本一样粘贴到一栏的开头(我有另一个宏将其转换为定义的 table)。
有意义吗?如果没有我可以 post 一些照片。
尝试 ActiveSheet.PasteSpecial Format:="HTML"
... 或者 ... ActiveSheet.PasteSpecial Format:="Text"
我尝试将邮件中的文本粘贴(右键单击)到 Excel 并得到以下快捷菜单。
这是我以前从 Crome 复制时得到的 'paste' 菜单。所以,我录制宏选择 "Match Destination Formatting" 选项。
在VBA我得到了
ActiveSheet.PasteSpecial Format:="HTML", Link:=False, DisplayAsIcon:= _
False, NoHTMLFormatting:=True
然后我录制了在选择性粘贴菜单中选择文本选项的宏
在 VBA 我得到了
ActiveSheet.PasteSpecial Format:="Text", Link:=False, DisplayAsIcon:= _
False