很多時候，我們對Excel自動調整行高的結果并不滿意，尤其是密集恐懼症患者。比如下面這樣的:
雖然效果已經不錯了，但強迫症患者覺得還是擁擠了一點，所以我們需要有個簡便法子在自動調整行高基礎上，再增加一點行與行的距離。
辦法就是錄制一個宏，然後運行它。
确保“開發工具”可見如果“開發工具”沒有出現在菜單欄上，可以按照下面的圖示使其顯示出來：
按上圖操作後，“開發工具”就顯示在菜單欄上了。
錄制一個宏
點擊“錄制宏”之後，會彈出設置對話框。根據自己的需求進行設置。注意快捷鍵隻能設置字母。
設置完畢确定後，即開始錄制。但是我們并不需要真正錄制代碼，我們隻是要獲取一個便于我們編輯的宏。所以我們可以馬上點擊“停止錄制”：
然後點擊“開發工具”——“宏”，選中我們剛才創建的宏，點擊“編輯”：
進入代碼編輯窗口後，清空已有代碼：
将下面的代碼複制粘貼到剛才清空的位置，這時可以直接關閉編輯窗口，vba編輯器會自動保存代碼，不用擔心。
Sub AutoFitPlus() Dim rng As Range Selection.EntireRow.AutoFit For Each rng In Selection.Rows rng.RowHeight = rng.RowHeight 10 Next rng Selection.VerticalAlignment = xlCenter End Sub
使用宏現在我們可以使用我們的宏來設置行高度了。選中要設置行高的列，然後點擊“開發工具”——“宏”，找到我們剛才創建的宏，點擊“運行”，眨眼功夫，行高就自動設置好了。
紅框内就是我們通過宏設置好的行高，紅框外是自動設置的行高。
注意：一定要選中實際需要調整的單元格或行之後再運行宏，不要直接選中整列然後設置行高。不信邪的可以試試看選中整列後再運行宏會發生什麼。
如果您覺得這個帖子對您有用，歡迎轉發、收藏和評論。如果您有任何問題，歡迎評論中留言，謝謝。
,更多精彩资讯请关注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 
