KaKaBeCuDo

Boa Tarde!! Preciso de uma ajuda no arquivo abaixo. Tenho uma Lista Suspensa na guia "2021" coluna "C". Ela busca informações da guia "TEMAS" coluna "B". Se clico na lista para escolher o valor, ótimo - funciona sem problema algum. Porém, se ao invés de escolher na lista eu quiser digitar um valor (que está na lista) aparece erro. Obs.: A coluna "B" da guia "TEMAS" é resultado de um índice - ou seja, de uma fórmula. Já revirei algumas opções e pesquisei na internet, mas nadaaaaa..... Se alguém puder me ajudar agradeço muito!! TESTE.zip

Booooooaaaa mano você é o caraaa!!! Como falei sou Nutella ainda kkkkk Abraços

pior que a fórmula está assim conforme abaixo... se eu não estiver muito doido, está igual sua sugestão: Sub FazCópiaDaPlanilhaAtiva() Application.ScreenUpdating = False ActiveSheet.Unprotect ActiveSheet.Copy After:=Sheets(Sheets.Count) [A1] = [A1] + 1 ActiveSheet.Name = [A1] SelectSheet = [A1] Range("C5:C9,C12:C16,C19:C23,C26:C30,C33:C37,C40:C44,C47:C51,C54:C58,C61:C65,C68:C72,C75:C79,C82:C86").ClearContents Range("E5:H9,E12:H16,E19:H23,E26:H30,E33:H37,E40:H44,E47:H51,E54:H58,E61:H65,E68:H72,E75:H79,E82:H86").ClearContents Range("K5:L9,K12:L16,K19:L23,K26:L30,K33:L37,K40:L44,K47:L51,K54:L58,K61:L65,K68:L72,K75:L79,K82:L86").ClearContents Range("R4,R11,R18,R25,R32,R39,R46,R60,R67,R74,R81").ClearContents ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True End Sub

Pois é, mas isso não acontece. Mesmo eu protegendo ela manualmente (a ATUAL 2020), quando crio a 2021, a planilha 2020 fica desprotegida pela Macro adicionado 5 minutos depois Só para explicar melhor. Se crio a 2021, daí na 2021 vai ter o botão vinculado à Macro. Se Clico no botão na planilha 2021, cria-se a 2022. porém a 2021 volta a ficar desprotegida....

Legal mano, ficou muito bom mesmo.... só faltou agora proteger a planilha atual através da Macro. por que as cópias já saem protegidas.

1. como você conseguiu desproteger? manualmente ou via código? se via código então disponibilize-o Via Código. Segue abaixo. 2. você "precisa" desproteger só a planilha 2020 ? ou as cópias dela também (2021, 2022, ...) ? a 2020 e as cópias dela 2021, 2022... 3. você "precisa" desproteger por quais motivos? para inserir/editar dados? se sim, isso pode ser feito pelo código para alterar a célula A1 pela Macro - pois a célula é bloqueada Sub FazCópiaDaPlanilhaAtiva() ActiveSheet.Unprotect ActiveSheet.Copy After:=Sheets(Sheets.Count) [A1] = [A1] + 1 ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True ActiveSheet.Name = [A1] SelectSheet = [A1] Range("C5:C9,C12:C16,C19:C23,C26:C30,C33:C37,C40:C44,C47:C51,C54:C58,C61:C65,C68:C72,C75:C79,C82:C86").ClearContents Range("E5:E9,E12:E16,E19:E23,E26:E30,E33:E37,E40:E44,E47:E51,E54:E58,E61:E65,E68:E72,E75:E79,E82:E86").ClearContents Range("F5:F9,F12:F16,F19:F23,F26:F30,F33:F37,F40:F44,F47:F51,F54:F58,F61:F65,F68:F72,F75:F79,F82:F86").ClearContents Range("G5:G9,G12:G16,G19:G23,G26:G30,G33:G37,G40:G44,G47:G51,G54:G58,G61:G65,G68:G72,G75:G79,G82:G86").ClearContents Range("H5:H9,H12:H16,H19:H23,H26:H30,H33:H37,H40:H44,H47:H51,H54:H58,H61:H65,H68:H72,H75:H79,H82:H86").ClearContents Range("K5:K9,K12:K16,K19:K23,K26:K30,K33:K37,K40:K44,K47:K51,K54:K58,K61:K65,K68:K72,K75:K79,K82:K86").ClearContents Range("L5:L9,L12:L16,L19:L23,L26:L30,L33:L37,L40:L44,L47:L51,L54:L58,L61:L65,L68:L72,L75:L79,L82:L86").ClearContents Range("R4,R11,R18,R25,R32,R39,R46,R60,R67,R74,R81").ClearContents End Sub

Testei e está funcionando. Coloquei um botão e vinculei a Macro adicionado 15 minutos depois Só mais um detalhe.... Eu vou precisar desproteger e proteger a planilha "2020" após clonar ela. Já consegui desproteger, mas não estou conseguindo proteger... Alguma ideia?

@osvaldomp Desculpe, não me expressei direito.... clicar na aba

@osvaldomp Obrigado pela ajuda. Mas não consegui colocar para funcionar ao clicar na planilha 2020 > Copiar ou Mover > Criar uma Cópia..... Onde devo colocar essa Sub?

Olá, Boa Tarde!! Gostaria de ajuda na planilha em anexo... Criar uma MACRO que quando eu clicar na planilha "2020" e pedir para Copiar essa planilha, ela copie uma nova planilha igual essa logo na frente da planilha "2020", só que com o ano seguinte = "2021". E assim sucessivamente. A MACRO também precisa mudar a Célula A1 para o ano que vai dar nome a planilha Não sei se expliquei bem.... mas caso negativo, peçam novas informações aqui que vamos informando! 2020.xlsx Muito obrigado e abraços 2020.xlsx

@Patropi Obrigado Mano!!! você É O CARAAAAAAAAA

@Patropi Bom Dia!! Obrigado mais uma vez.... Porém, veja o erro quando coloco mais duas cidades. 07_06_19_Retonrar cidades sem reptidos_Patropi.xlsx

@Patropi Boa Tarde!! Mais uma vez, preciso de sua ajuda... Tentei usar a Fórmula na planilha em anexo, mas não consegui. Veja se consegue me entender Teste.xlsx

@Patropi você É O CARA!!!!! Valeu mano isso mesmo....

@Patropi Boa Tarde!! Nesse caso, a função DESLOC pega a primeira coluna (L) como ALTURA. Mas, e se a segunda coluna (M) tiver mais itens do que a primeira? Espero que tenha entendido.

@deciog Olá Boa Tarde!! Sim, já ajudou muito!!! Só ficaria melhor ainda se a escolha da segunda afetasse a primeira também, sabe? Por exemplo, se eu escolher José primeiro na H2 consigo escolher José na G2 também... =/

@ray gabriel Olá Bom Dia!! Sou novato aqui no Fórum.... mas talvez possa te ajudar. rs Veja se era assim que esperava. Se der certo clique em curtir e seleciona como Melhor Resposta =D Excel Validação de dados_KaKaBeCuDo.xlsx

@Patropi Bom Dia!! Tenho uma missão, creio que agora um pouco mais complexa... Kkk Vamos ver se consegue me ajudar novamente. Em resumo é, em duas Validações de Dados distintas, a segunda não permitir que selecione o mesmo nome da primeira, ou vice versa. As instruções estão na planilha... Valeu 20_12_18_Validação de dados dinamica com critério_Patropi.xlsx

@Patropi obrigado meu amigo!! Deu certo sim... Vou tentar entender a metodologia agora Kkkkk

Olá Amigos, Bom Dia!! Tenho a planilha em anexo. Gostaria de aprender a fazer uma lista suspensa em que apareça apenas os nomes em que na coluna B esteja com o valor "S". Obrigado!!! TESTE - Lista Suspensa.xlsx