Ir ao conteúdo

Posts recomendados

Postado

Eu uso uma planilha para organizar os rankings do futebol, sendo que uma nova aba é criada toda a partida para inserir os dados das mesmas (gols, assist, etc..). Eu criei a primeira, e uso um botão com a seguinte macro para criar as próximas: 
 

Sub DuplicaERenomeia()
'primeiro, faz a cópia da planilha
    Sheets("06_01").Copy After:=Sheets(ThisWorkbook.Worksheets.Count)
    'como foi movida para o final, pega a última
    Dim newSheet As Worksheet
    Set newSheet = ThisWorkbook.Worksheets(ThisWorkbook.Worksheets.Count)
    newSheet.Name = InputBox("ULTIMA", newSheet.Name)
    MsgBox "Pronto!"


End Sub

 

Eu preciso que os dados dessa nova planilha sejam somados automaticamente nas abas de ranking (onde estou utilizando uma fórmula simples de soma. Exemplo: ='06_01'P4+'13_01'!P4.....). Do jeito que faço toda vez que uma nova aba é criada, eu tenho que ir manualmente em todas as fórmulas e inserir a referência.
Segue o arquivo para facilitar o entendimento.
 

Classico de Sábado_1º Semestre.xls

Crie uma conta ou entre para comentar

Você precisa ser um usuário para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar agora

Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×
×
  • Criar novo...

LANÇAMENTO!

eletronica2025-popup.jpg


CLIQUE AQUI E BAIXE AGORA MESMO!