KaKaBeCuDo

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