VBA数组写入表格出现莫名的空白列

antique_star · 发表于 2018-9-25 11:22

antique_star · 发表于 2018-9-25 12:12

抱歉！年纪大了，不记事。
在查找自己的笔记中找到以前的不算高明的解决办法。
ActiveCell.SpecialCells(xlLastCell).Row
ActiveCell.SpecialCells(xlLastCell).Column
Activesheet.Cells.SpecialCells(xlLastCell).Row
Activesheet.Cells.SpecialCells(xlLastCell).Column
特殊空白行列，无法用UsedRange捕捉到位置，用上面的代码可以捕捉到。
效果完全等同于前台的Ctrl+End的效果。

朱荣兴 · 发表于 2018-9-25 12:57

提示: 作者被禁止或删除内容自动屏蔽

antique_star · 发表于 2018-9-27 11:53

usedrange 的最大行号或者列号是包括单元格边框在内的，

感谢朱版主的回复，包括边框在内？是指单元格边框格式吧？
在实际应用中发现，只要设了边框，即使右下角无单元格内容，usedrange也会包括。
至于底色包不包就一直没测试过。

		自动登录	找回密码
密码			免费注册

朱荣兴朱荣兴当前离线性别保密 UID 1318548 阅读权限 0 注册时间 2011-2-2 在线时间小时最后登录 1970-1-1 积分 19282 财富分享技术精华头像被屏蔽 TA的精华主题 TA的得分主题	发表于 2018-9-25 12:57 \| 显示全部楼层 [广告] ★会Excel,就能做支持PC、手机、Web、App、Windows、安卓、IOS、Linux信息一体化的各种管理系统 ★ 提示: 作者被禁止或删除内容自动屏蔽

	回复举报

[求助] VBA数组写入表格出现莫名的空白列