在日常工作中，我們經常需要根據單元格内容去調整列寬和行高的問題。要是手動去調整，這必然會很繁瑣，格式上也會造成混亂。要是我們可以用點擊一下鼠标的方法，所有的列寬和行高會自動做出調整，這該多棒啊....
下面的方法就可以輕松搞定以上問題，請看：
第1步：依次單擊[開發工具]--->[Visual Basic]--->[插入]--->[模塊]命令，在模塊窗口中輸入以下代碼，如下圖：
在模塊中輸入代碼
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，點擊确認并命名為自動調整列款和行高，單擊該按鈕，最終效果如下圖：
效果圖
簡單吧，要是喜歡，請點贊，留言，轉發哦....
,更多精彩资讯请关注tft每日頭條，我们将持续为您更新最新资讯!
zpostcode 
Recruit 
weather 
mreligion 
Yellowpages 
sport 
constellation 
shopping 
name 
game 
directory 
literature 
Word 
tour 
furnish 
Lottery 
tftnews 
lyrics 
News 
digital 
car 
dir 
Edu 
Finance 
