Excel精英培训网

 找回密码
 注册

QQ登录

只需一步,快速开始

工作中常用的Excel函数公式,全印在一张超大鼠标垫上
查看: 89|回复: 7

[已解决]请教老师,清除几个合并单元格的内容,一直报错1004,麻烦老师帮忙看看

[复制链接]
发表于 2021-9-12 23:11 | 显示全部楼层 |阅读模式
本帖最后由 ibm003 于 2021-9-12 23:55 编辑

Worksheets("表格1").Range("A8:A17,L8:L17").MergeArea.ClearContents

如上,用Range("L8"),这样是没有问题的,A8-A17,L8-L17都是合并过的单元格,目的是实现清除A8-A17,L8-L17的内容,请老师帮忙指点一下,万分感谢!
最佳答案
2021-9-13 13:56
本帖最后由 cutecpu 于 2021-9-13 14:28 编辑

合併儲存格不能分開單格處理

For Each r In Range("A8:A17,L8:L17")
        Range(r.MergeArea.Address).ClearContents
Next
當然也可以給 空值

Worksheets("Sheet1").Range("A8:A17,L8:L17") = ""

excel精英培训的微信平台,每天都会发送excel学习教程和资料。扫一扫明天就可以收到新教程
发表于 2021-9-12 23:40 | 显示全部楼层
MergeArea:返回一 个 Range 对象,该对象代表包含指定单元格的合并区域。
意思就是:你只能选择合并单元格所包含的其中一个单元格.MergeArea.单元格区域没有MergeArea属性。
纯个人理解。
回复

使用道具 举报

发表于 2021-9-12 23:43 | 显示全部楼层
官方解释:
备注

MergeArea 属性只应用于单个单元格区域。
回复

使用道具 举报

 楼主| 发表于 2021-9-12 23:57 | 显示全部楼层

请问怎么才能实现我的需求呢
回复

使用道具 举报

发表于 2021-9-13 08:44 | 显示全部楼层
lisongmei老师说了,只应用于单个单元格区域。把你代码中的MergeArea这个删掉试试
回复

使用道具 举报

 楼主| 发表于 2021-9-13 13:49 | 显示全部楼层
风林火山 发表于 2021-9-13 08:44
lisongmei老师说了,只应用于单个单元格区域。把你代码中的MergeArea这个删掉试试

老师,因为是合并过的单元个,去掉MergeArea会提示,无法对合并的单元格进行此操作


我把附件传上来了,麻烦老师再帮忙看看

测试表格.rar

9.68 KB, 下载次数: 2

回复

使用道具 举报

发表于 2021-9-13 13:56 | 显示全部楼层    本楼为最佳答案   
本帖最后由 cutecpu 于 2021-9-13 14:28 编辑

合併儲存格不能分開單格處理

For Each r In Range("A8:A17,L8:L17")
        Range(r.MergeArea.Address).ClearContents
Next
當然也可以給 空值

Worksheets("Sheet1").Range("A8:A17,L8:L17") = ""

评分

参与人数 1学分 +2 收起 理由
ibm003 + 2 老师,太厉害了,非常感谢

查看全部评分

回复

使用道具 举报

发表于 2021-9-13 16:41 | 显示全部楼层
ibm003 发表于 2021-9-12 23:57
请问怎么才能实现我的需求呢

Range("A8:A17,L8:L17").ClearContents
直接这样清空不就完了。。。为啥还要循环去,或者去写个MergeArea呢。


回复

使用道具 举报

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

本版积分规则

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

GMT+8, 2021-9-16 17:59 , Processed in 3.141132 second(s), 9 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

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