Elton

O que pretende? Inserir uma nova "Plan" e inserir os "label's" de A2 até A5;

ou utilizar a planilha "01" como modelo e duplicar/renomear?

ao inserir nova plan e inserir os "label's" de A2 até A5;

Para inserir novas planilhas pode fazer assim:

Sub Novo()
    Sheets(2).Copy After:=Sheets(Sheets.Count)
    Sheets(Sheets.Count).Name = Sheets.Count - 1
    Sheets("cadastro").Select
End Sub

Em adicional,
segue exemplo incluido nova sheet, acrescentando os "Label's" na celulas "A2:A5"
e ocultando as planilhas.

existe alguma forma de copiar inserir outra planilha com mesma formatação da plan 01?

Adapte conforme sua necessidade :

Sub CopiaAba()
    'Efetua uma Cópia da Aba de nome "01" para o final
    Worksheets("01").Copy After:=Sheets(Sheets.Count)
    'Renomeia a Aba
    ActiveSheet.Name = "Teste"
End Sub

[]s

ok mauro para copiar a planilha o reinaldo já havia resolvido agora queria dificultar um pouco mais e copiar tambem a formatação da planilha 01do ultimo anexo

Elton, agora você me confundiu,

Eu vi que a rotina do Reinaldo lhe atendeu conforme suas solicitações anteriores.

Mas nesta última solicitação, você pediu :
existe alguma forma de copiar inserir outra planilha com mesma formatação da plan 01?
E no anexo que add, temos somente duas Abas, a "Cadastro" e a Aba "01", com a seguinte solicitação naaba "01" :
criar outras planilhas a partir desse modelo
mesma formatação ,cores e tamanho de fonte

Então a rotina que lhe passei, faz uma Cópia fiel da Aba "01", - Textboxs e toda a formatação existente, cor das celulas, tamanhos de fonte e renomeia.

Desculpe-me não ter captado o que pretende, se puder explicar melhor.

[]s

Elton,

Estou confuso,

Perguntei inicialmente, se queria utlizar um modelo ou incluir uma nova sheet, e voce disse uma nova sheet. Ok

O modelo enviado se propunha a fazer isso.

Em Paralelo o codigo disponibilizado pelo Bernardo e depois pelo Mauro, duplicavam um "modelo" com todos seus dados e configurações.

Então no anexo estou disponibilizando so seguinte:

Inclui uma Planilha que chamei de Modelo.

Alterei a rotina para a inclusão uma "nova" Planilha, seja copia da "Modelo" nomeando-a com o "valor" indicado.

ok,está perfeito.
obrigado.