Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
查看: 7291|回复: 13

外部数据粘贴 使用PasteSpecial出错

[复制链接]
发表于 2019-12-28 12:02 | 显示全部楼层 |阅读模式
2学分
本帖最后由 孤梅独傲 于 2020-1-5 23:54 编辑

从其它地方复制数据想要粘贴到表格里,不带其它规格,只粘贴值
1577505772(1).png
应该如何修改
1577511477(1).png
我希望达到第二种效果,直接复制会出现第一种效果,如果PasteSpecial方法行不通,是否还有其它方法 1.rar (13.64 KB, 下载次数: 4)

最佳答案

查看完整内容

外部数据,得操控粘贴板。 试试附件,必须加个窗体,然后当作它不存在。 也可以用 API 来读取粘贴板,功能更强大。
excel精英培训的微信平台,每天都会发送excel学习教程和资料。扫一扫明天就可以收到新教程
发表于 2019-12-28 12:02 | 显示全部楼层
外部数据,得操控粘贴板。
试试附件,必须加个窗体,然后当作它不存在。
也可以用 API 来读取粘贴板,功能更强大。

读取粘贴板.zip

16.7 KB, 下载次数: 14

回复

使用道具 举报

发表于 2019-12-28 12:28 | 显示全部楼层
本帖最后由 cui26896 于 2019-12-28 12:30 编辑

这是单元格对象的方法,必须要有单元格。
Sheets(1).Range("a1").PasteSpecial Paste:=xlPasteAll

Sheets(1).Range("a1").PasteSpecial Paste:=xlPasteValue

回复

使用道具 举报

 楼主| 发表于 2019-12-28 13:36 | 显示全部楼层
cui26896 发表于 2019-12-28 12:28
这是单元格对象的方法,必须要有单元格。
Sheets(1).Range("a1").PasteSpecial Paste:=xlPasteAll

Selection  不是返回range对象吗,我找到错误原因是复制外面数据,比如网页上的数据就会出错,复制表格里的就正常运行
回复

使用道具 举报

发表于 2019-12-28 13:41 | 显示全部楼层
网页上肯定是错误的,是XML格式的。
回复

使用道具 举报

 楼主| 发表于 2019-12-28 13:50 来自手机 | 显示全部楼层
cui26896 发表于 2019-12-28 13:41
网页上肯定是错误的,是XML格式的。

可是记事本里复制也是错误的,麻烦看下我第二张图,想达到这个效果有什么办法吗
回复

使用道具 举报

发表于 2019-12-28 15:35 | 显示全部楼层
你别上图了,上个附件又不是很麻烦,也说得清楚,没有附件,隔空对话,都不明白。
回复

使用道具 举报

发表于 2019-12-28 20:22 | 显示全部楼层
请看运行代码前后的效果

复制效果1.JPG


运行代码后

复制效果2.JPG

回复

使用道具 举报

 楼主| 发表于 2019-12-29 10:12 | 显示全部楼层
cui26896 发表于 2019-12-28 20:22
请看运行代码前后的效果

抱歉,昨天有点事,我要复制的外部数据,并不是表格里
回复

使用道具 举报

 楼主| 发表于 2019-12-29 10:13 | 显示全部楼层
cui26896 发表于 2019-12-28 20:22
请看运行代码前后的效果

附件也已经上传,麻烦您有空的时候看下
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-3-29 05:20 , Processed in 0.433642 second(s), 8 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表