excel表格宽度自适应.doc

excel表格宽度自适应篇一:,用于存放公用的选择项目,可命名为数据字典,输入需要作为选择项目的原始数据,在其他Sheet中都可以调用该数据源,并且便于维护,如图1。。首先,选中作为选择项目的数据区域,利用“数据?排序”菜单或是“工具”栏上的升序、降序按钮都可以进行排序。排序以后,相同字符开头的字符串将分布在连续的单元格中,便于创建数据有效性的引用序列(图2)。图2原始选择项目排序(左,排序前右,排序后),故而首先必须将数据字典工作表的D列内容(在D1:D11中)定义为一个名称,然后设置sheet2工作表A列的数据有效性,具体操作如下:+F3打开定义名称对话框,在名称框中输入MC(名称任意,但应符合名称命名的规则),在引用位置处输入或引用:=数据字典!$D:$D,。首先,我们选中需要设置下拉菜单的列或者单元格,然后选择“数据?有效性”,在弹出的“数据有效性”对话框中,选择“设置”选项卡,在“有效性条件”的“允许”处选择“序列”,并且在“来源”中使用以下公式:=OFFSET(MC,MATCH(A1&*,MC:MC,0)-1,,COUNTIF(MC:MC,A1&*))其中,其中MC是之前排过序的项目数据源的名称,A1则是当前选中的单元格(图4)。,系统不会因为数据有效性的错误警告而阻止用户的输入。在“数据有效性”设置窗口选中“出错警告”选项卡,取消勾选“输入无效数据时显示出错警告”选项。,当Sheet2工作表的A列的单元格中输入“法”字后,点击下拉菜单,这时下拉框只有4个选项。选择范围缩小,这样操作更精准、更快捷(图3)。篇二:Excel自动调整合并单元格行高自动调整合并单元格行高原型原理是:因为独立单元格设置了自动换行后,高度会自动变化,利用这个特点,将合并单元格的内容复制到一个独立单元格,并将这个单元格格式设置成自动换行,且其宽度设置为合并区域宽度(合并区域宽度=合并区域中各列宽度之和),再将此时独立单元格的行高值设置到合并区域所在的行即可。运行条件:创建一个名字为temp的Sheet表单,将下内容粘贴到Excel模块中。VBA程序如下:Submain()MergeCellAutoFitsheet1,6,2EndSub3SubMergeCellAutoFit(sSheetAsString,mRowAsInteger,mColAsInteger)DimmWidthAsDoubleDimmSt,mEdAsIntegerIfSheets(sSheet).Cells(mRow,mCol).MergeCellsThenmSt=Sheets(sSheet).Cells(mRow,mCol).=mSt+Shee