临海做网站网站空间

1、启用宏

选项--信任中心--信任中心设置--宏设置--启用所有宏-确定。

2、返回excel界面，alt+F11

点开sheet1，输入代码。 具体要实现的功能可以找 deepseek给些代码，下面是批量调整行高、列宽的示例。

Sub BatchResizeRows()Dim targetHeight As DoubletargetHeight = 25 ' 设置目标行高（单位：磅）Dim targetWidth As DoubletargetWidth = 35 ' 设置目标列宽（单位：字符宽度）' 设置要调整的行范围（示例：1到10行）Rows("1:7").RowHeight = targetHeightRows("8").RowHeight = 25Rows("18").RowHeight = targetHeight' 设置要调整的列范围（示例：A到D列）Columns("B:D").ColumnWidth = targetWidthEnd Sub

点运行即可。