作者：乔山办公网日期：
返回目录：excel表格制作
你要调整那2个？
是一个工作薄的多百个表
还是很多个？
如果度是一个工作薄中的很多表，可以试试下回面这个，自己调整下列及列宽答
Sub 宏3()
For i = 1 To Sheets.Count
Sheets(i).Select
Sheets(i).Columns("C:C").Select '你要修改的第1列
Selection.ColumnWidth = 20 ’列宽
Sheets(i).Columns("d:d").Select '你要修改的第2列
Selection.ColumnWidth = 50
Next
End Sub
用宏可以做到
可将单元格格式设置为【数值】且小数位数为0。
提供一种方法给大家节约一点点时间。如果一个文件有多个表相似，有多行多列都需要确切的数据大抄小，不嫌麻袭烦的话可以将第一个表做样，在表头变实心剪头后按住CTRL多选相同要求的行或者列后，再右击选行高或列宽百，填入数字，回车。再在第二个表中CTRL选择需要相同高度的行或列，按F4（复制上一步命令）即可快速改变行高或者列宽。（注意，F4只复制上一步，不复制上上步度）嫌麻烦的各位可以另寻他法。