本节介绍一个简单属性,在以前的文章中也有提及,这里拿来重点说明一下,如何对列宽进行自动设置宽度。Excel表格中的列宽并不是固定的大小,默认情况下不会根据你的内容进行变化,所以需要人为来进行一些变更。
本节介绍一个简单属性,在以前的文章中也有提及,这里拿来重点说明一下,如何对列宽进行自动设置宽度。
Excel表格中的列宽并不是固定的大小,默认情况下不会根据你的内容进行变化,所以需要人为来进行一些变更。
根据表格内容多少的变化,表格的宽度也随之变化。
如下图所示,可以用三种方式来进行表格宽度设置。
第一种:根据表格最大值来设置列宽。
第二种:根据表题行设置列宽。
第三种:根据指定行来设置列宽。
第二种和第三种实际上一样,只不过第三种更加自由一些。
下图为根据标题行来设置列宽的样式
看一下代码
Private Sub CommandButton1_Click()\'按整列设置宽度Dim r As RangeSet r = Range(\"A:F\")r.Columns.AutoFitSet r = NothingEnd SubPrivate Sub CommandButton2_Click())\'按标题行Dim r As RangeSet r = Range(\"A2:F2\")r.Columns.AutoFitSet r = NothingEnd SubPrivate Sub CommandButton3_Click())\'按某列设置Dim r As Range, ri As Integerri = Me.ComboBox1.ValueSet r = Range(\"A\" & ri & \":F\" & ri)r.Columns.AutoFitSet r = NothingEnd Sub
实际上仅仅是如下一行代码:
Range.Columns.AutoFit
AutoFit方法是Range对象下的,这里特别注意一点,AutoFit要应用在Columns和Rows之下。它们分别代表了工作表的列和行,就是这个意思。
明白了这一点,就不难理解上述代码了。
本站部分文章来自网络或用户投稿,如无特殊说明或标注,均为本站原创发布。涉及资源下载的,本站旨在共享仅供大家学习与参考,如您想商用请获取官网版权,如若本站内容侵犯了原著者的合法权益,可联系我们进行处理。