Excel Como Criar uma aba nomeada por uma célula no excel

[Uanderson Carlos da Silva]

Olá Boa tarde Gente.

 

Gostaria de se alguém sabe como criar uma aba no VBA com o nome de uma célula?

tipo o código é para fazer uma cópia automática da aba modelo e renomear a nova que no caso sempre vai ser modelo2 com informação da célula "A4" onde está escrito 123

 

Alguém pode me ajuda nessa questão???

 

Obrigado desde já.

 

[CasaDoHardware]

Experimente este codigo.

 

 

Sub CriaPlanilha()

 

Dim Nome As String

    Nome = Sheets("ADD").Range("A4").Value
    Sheets("Modelo").Copy Before:=Sheets(3)
    ActiveSheet.Name = Nome

 

End Sub

[Uanderson Carlos da Silva]

Muito Obrigado... 

 

Serviu como uma Luva.