Página 1 de 1
Nome da aba igual ao texto escrito em uma determinada célula
Enviado: 26 Nov 2015 às 16:05
por thefrey
Boa tarde galera, sou novato aqui.
Seguinte, estou criando algumas planilhas com cadastro de clientes e estou querendo saber se tem como quando eu renomear uma determinada célula (nome do cliente), renomeie automaticamente somente a aba da planilha ativa, e que quando eu duplicar a aba funcione da mesma forma sem alterar a anterior.
Exemplo nas imagens abaixo:
Obrigado!
Re: Nome da aba igual ao texto escrito em uma determinada cé
Enviado: 26 Nov 2015 às 16:37
por Parkeless
Boa tarde!
Tenta isso:
Código: Selecionar todosPrivate Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$F$6" Then
If Target.Value <> "" Then
On Error Resume Next
ActiveSheet.Name = Target
End If
End If
End Sub
Obs.: Esse código deve ser colocado no VBE não em um módulo, mas na própria aba que você quer essa ação; para isso procure a aba do lado superior esquerdo do VBE, e clique duas vezes sobre ela:
Troque o "$F$6" se você quiser buscar o nome da aba em outra célula, mas mantenha os cifrões.
Re: Nome da aba igual ao texto escrito em uma determinada cé
Enviado: 26 Nov 2015 às 16:40
por EdivanCabral
Veja se o anexo te ajuda...
Visite meu blog:
programacaopassoapasso.wordpress.com
Re: Nome da aba igual ao texto escrito em uma determinada cé
Enviado: 26 Nov 2015 às 17:19
por thefrey
Cara, até ta sendo o que quero, fiquei feliz demais..
Só que está acontecendo o seguinte: Eu estou criando um botão com uma gravação macro para duplicar a plan ativa chamada João que funcionou perfeitamente com o mesmo nome da célula, so que após a macro duplicar a plan, dá erro dezendo que o nome Jõao está inexistente pq a plan anterior foi alterada,.. veja só:
Re: Nome da aba igual ao texto escrito em uma determinada cé
Enviado: 26 Nov 2015 às 17:23
por Parkeless
Se o seu código está linkando o nome da aba, você não pode alterar o nome dela, ou vai dar pau mesmo.
O que você pode fazer, é usar o número da aba ao invés do nome no código (ao invés de Sheets("João"), usar Sheets(1) ), ou mandar o código verificar todas as abas, e usar um critério específico pra ele saber onde está.
Nome da aba igual ao texto escrito em uma determinada célula
Enviado: 26 Nov 2015 às 17:32
por thefrey
Entendi, no caso eu tenho que deixar a plan "João" ativa e com a celula do nome e inalterada pra poder a macro duplicar sem dá erro ne isso?
existe alguma forma de eu deixar a plan "João" funcionando, porém invisível, para que não haja risco de modificá-la?
Nome da aba igual ao texto escrito em uma determinada célula
Enviado: 27 Nov 2015 às 09:33
por Parkeless
Não, não é isso...
Ao invés de referenciar a aba pelo nome (ex.: Sheets("João") ), você referencia pelo número da aba na pasta de trabalho (ex.: Sheets(1) ), o que significa referenciar pela ordem da aba, não pelo nome... assim o nome da aba pro código não importa, e a aba pode alterar o nome a vontade
Tenta aí
Nome da aba igual ao texto escrito em uma determinada célula
Enviado: 27 Nov 2015 às 10:24
por thefrey
Aeeeee man, funcionou perfeitamente, era isso que eu queria! Tópico encerrado!