excel怎么调整最适宜行高和列宽(Excel办公随心所欲---自动调整列宽和行高)(1)

在日常工作中,我们经常需要根据单元格内容去调整列宽和行高的问题。要是手动去调整,这必然会很繁琐,格式上也会造成混乱。要是我们可以用点击一下鼠标的方法,所有的列宽和行高会自动做出调整,这该多棒啊....

下面的方法就可以轻松搞定以上问题,请看:

第1步:依次单击[开发工具]--->[Visual Basic]--->[插入]--->[模块]命令,在模块窗口中输入以下代码,如下图:

excel怎么调整最适宜行高和列宽(Excel办公随心所欲---自动调整列宽和行高)(2)

在模块中输入代码

Sub AutoRowsColumns()

Application.ScreenUpdating = False

ActiveSheet.Rows("1:1048576").AutoFit

ActiveSheet.Columns("A:XFD").AutoFit

ActiveSheet.Range("A1:XFD1048576").HorizontalAlignment = xlLeft

ActiveSheet.Range("A1:XFD1048576").VerticalAlignment = xlCenter

Application.ScreenUpdating = True

End Sub

第2步:在活动工作表中插入命令按钮。方法是依次单击[开发工具]--->[插入],选择窗口控件按钮,松开左键的同时并指定宏名称为AutoRowsColumns,点击确认并命名为自动调整列款和行高,单击该按钮,最终效果如下图:

excel怎么调整最适宜行高和列宽(Excel办公随心所欲---自动调整列宽和行高)(3)

效果图

简单吧,要是喜欢,请点赞,留言,转发哦....

,