VBA如何修改工作表名?

2025-09-28 07:40:33

1、首先,打开一个Excel数据表,如下图示。

VBA如何修改工作表名?

2、按下Alt+F11,在打开的新界面左上角,双击对应的工作表,出现代码编辑区,如下图所示。

VBA如何修改工作表名?

3、输入代码:

Sub 鱼木混猪()

 

For i = 1 To 5

 

Sheets(i).Name = Range("B" & i + 1)

 

Next

 

End Sub

 

代码作用是将前5个工作表,依次改名为B2:B6单元格内容,如下图所示。

VBA如何修改工作表名?

4、鼠标点击代码中任意位置,点击“运行子程序”按钮,如下图所示。

VBA如何修改工作表名?

5、返回Excel,就能看到工作表名字改成了相应单元格中的内容,如下图所示。

VBA如何修改工作表名?

1、1.打开Excel;

2.按下Alt+F11,双击其中工作表;

3.在代码去输入代码,核心代码:

Sheets(i).Name = Range("B" & i + 1)

4.点击“运行子程序”;

5.工作表名就修改了。

 

声明:本网站引用、摘录或转载内容仅供网站访问者交流或参考,不代表本站立场,如存在版权或非法内容,请联系站长删除,联系邮箱:site.kefu@qq.com。
猜你喜欢