No.1

Excel操作當中，表格的高度和寬度可以進行自動調整。

方法就是使用.AutoFit屬性進行設置。

下面用一個例子簡單介紹一下，如何對單元高度和寬度格進行自動調整。

No.2

方法很簡單，如上圖所示。

R.Columns.AutoFit‘自動調整列寬

R.Rows.AtuoFit'自動調整行高

上圖為例對表格內數據隨機生成，然后自動調整單元格高度和寬度。

如下幾行代碼就可實現整個工作表的行高和寬設置。

No.3

代碼

Private Sub setRowsColumnsWidthHeight()Application.ScreenUpdating = FalseDim s As WorksheetDim r As RangeSet s = ThisWorkbook.Worksheets("Sheet1")Set r = s.Range("A2:G15") '定義Range對象With r .Clear '清除表格 ' .ColumnWidth = 10' .Interior.Color = RGB(21, 131, 82) '背景色 .Borders.LineStyle = 1 '邊框樣式細線條 .Borders.ColorIndex = 12 '邊框顏色 .Value = VBA.Format(Rnd(9), "0.000") '值 .Columns.AutoFit '自適應列寬 .Rows.AutoFit '自適應行高 With .Font '設置文本格式 .Color = RGB(221, 221, 221) .Size = 14 .Name = "微軟雅黑" .Bold = True End WithEnd WithApplication.ScreenUpdating = TrueSet s = NothingSet r = NothingEnd Sub

仔細看上面代碼，也不十分理解。

對于整個表格的操作十分方便。

歡迎關注、收藏

總結

以上是生活随笔為你收集整理的单元格自适应宽度_Excel如何对表格进行自适应设置，方法很简单的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。