excel,如何让标签根据单元格填写的内容自动重命名？

Question

如何让标签名字根据单元格填写的内容自动重命名

Answer 1

Sub shtName()

Dim sht As Worksheet

For Each sht In Worksheets

    If sht.Range("b3") <> "" Then

        sht.Name = sht.Range("b3")

    End If

Next

End Sub