1、下面的操作将设置表格的单元格的长和宽,并将线框加实线;
2、按组合按键【Alt+F11】调出VBA编辑器,插入宏取名为【设置单元格】;
3、在宏代码内输入代码设置单元格宽(Sheet1.Cells.ColumnWidth = 1);
4、在宏代码内输入代码设置单元格高(Sheet1.Cells.RowHeight = 10);
5、在宏代码内输入代码设置单元格线框(Sheet1.Cells.Borders.LineStyle = xlContinuous),执行宏代码最后得到如图1的表格。
时间:2024-10-20 07:52:16
1、下面的操作将设置表格的单元格的长和宽,并将线框加实线;
2、按组合按键【Alt+F11】调出VBA编辑器,插入宏取名为【设置单元格】;
3、在宏代码内输入代码设置单元格宽(Sheet1.Cells.ColumnWidth = 1);
4、在宏代码内输入代码设置单元格高(Sheet1.Cells.RowHeight = 10);
5、在宏代码内输入代码设置单元格线框(Sheet1.Cells.Borders.LineStyle = xlContinuous),执行宏代码最后得到如图1的表格。