É vdd que qndo o homem diz que lugar de mulher é na cozinha, é pq ele é um vexame no quarto?

Colega, tentei reproduzir a situação que vc descreve na sua pergunta e, realmente, acontece exatamente do jeito que vc falou. Bom, aparentemente, a planilha criada assume o índice imediatamente superior à última que está visível. Assim como vc, eu tb acho que a planilha deveria assumir o último índice.

A boa notícia é que eu consegui contornar o problema com o código abaixo: Sub CopiaPlan() Dim Vetor() As Variant ReDim Vetor(Sheets. Count, 2) Application. ScreenUpdating = False For I = 1 To Sheets.

Count Vetor(i, 0) = Sheets(i). Name Vetor(i, 1) = Sheets(i). Visible If Not Sheets(i).

Visible Then Sheets(i). Visible = True Next I Sheets(1). Copy After:=Sheets(Sheets.

Count) ActiveSheet.Name = "Plan" & ActiveSheet. Index For I = 1 To Sheets. Count - 1 Sheets(Vetor(i, 0)).

Visible = Vetor(i, 1) Next I Application. ScreenUpdating = True End Sub O comando ActiveSheet.Name = "Plan" & ActiveSheet. Index é opcional.

Só o coloquei para ter os nomes das planilhas na sequência, já que o comando que copia a planilha atribui o mesmo nome da planilha original à planilha copiada (Plan1 (2)). Veja se isso ajuda. Abraço!

I cant really gove you an answer,but what I can give you is a way to a solution, that is you have to find the anglde that you relate to or peaks your interest. A good paper is one that people get drawn into because it reaches them ln some way.As for me WW11 to me, I think of the holocaust and the effect it had on the survivors, their families and those who stood by and did nothing until it was too late.