作者：绿色风
分类：
时间：2022-08-17
浏览：133
楼主
芐雨 |
Q：对单元格进行操作后，单元格的高和宽都会改变，如何返回到单元格高和宽的原来值，即标准值？
A：通过VBA设置工作表的标准行高和标准列宽
- Sub 重置单元格的宽和高_芐雨()
- Worksheets("Sheet1").Columns("A").RowHeight = Worksheets("Sheet1").StandardHeight 'A列的行高等于工作表的标准行高
- Worksheets("Sheet1").Rows("1").ColumnWidth = Worksheets("sheet1").StandardWidth '行1的列宽等于工作表的标准列宽
- End Sub
- Sub 重置单元格的宽和高2_芐雨()
- Worksheets("sheet1").Columns("A").UseStandardHeight = True 'A列的行高等于工作表的标准行高
- Worksheets("Sheet1").Rows("1").UseStandardWidth = True '行1的列宽等于工作表的标准列宽
- End Sub
|
2楼
hustclm |
学习了，谢谢分享！什么是标准行高和列宽了？自适应吗？我测试一哈
 |
3楼
芐雨 |
你可以理解为新建工作簿时的行高和列宽 |
4楼
天南地北 |
我可以理解为Columns("A")和Rows("1")可以替换为CELLS么！ |
5楼
0Mouse |
标准行高和列宽是指新建工作表时单元格的默认行高和列宽，整列或整行都为空时，不存在自适应的说法，单元格里有内容了才可能发生“自动适应”，自适应是autofit，例如：
- Rows(1).AutoFit
运行代码的作用类似于双击行号1和2的分隔线。 |
6楼
芐雨 |
可以啊
 |
免责声明
有感于原ExcelTip.Net留存知识的价值及部分知识具有的时间限定性因素，
经与ExcelTip.Net站长Apolloh商议并征得其同意，
现将原属ExcelTip.Net的知识帖采集资料于本站点进行展示，
供有需要的人士查询使用，也慰缅曾经的论坛时代。
所示各个帖子的原作者如对版权有异议，
可与本人沟通提出，或于本站点留言，我们会尽快处理。
在此，感谢ExcelTip.Net站长Apolloh的支持，感谢本站点所有人**绿色风（QQ:79664738)**的支持与奉献，特此鸣谢！
------本人网名**KevinChengCW（QQ:1210618015)**原ExcelTip.Net总版主之一