如何Excel2007實現單元格自動調整列寬和行高?

在Excel中操作時有時需要單元格的行高和列寬自動的適應內容同時自動調整列寬和行高,這時需要用到VBA來實現,那麼下面分享下我的經驗。

工具/原料

Excel2007軟件。

方法/步驟

打開Excel,確認目標單元格內容,插入表單控件。

如何Excel2007實現單元格自動調整列寬和行高

ALT+F11打開VBA代碼編輯器,在其內輸入代碼。

如何Excel2007實現單元格自動調整列寬和行高

將表單控件指定到宏,運行代碼,查看運行後效果,單元格內容自動適應,列寬和行高自動得到調整。

如何Excel2007實現單元格自動調整列寬和行高

如何Excel2007實現單元格自動調整列寬和行高

如何Excel2007實現單元格自動調整列寬和行高

解釋VBA代碼如下。

Sub 運行代碼()

Worksheets("Sheet1").Columns("A:L").EntireColumn.AutoFit

Worksheets("Sheet1").Rows("1:10").EntireRow.AutoFit

End Sub

------------------------------------------

AutoFit 自動調整的意思

如何Excel2007實現單元格自動調整列寬和行高

注意事項

代碼書寫一定要正確。

表單控件最好不要在調整的數據行高和列寬內。

相關問題答案