Página 1 de 1

Seleção de duas Sheets

Enviado: 19 Jul 2017 às 14:08
por AndersonDao
Boa tarde,

Por favor, qual seria o código para selecionar a planilha ativa e a planilha seguinte (plan1 + plan2)?
Obs. Sem utilizar o nome das planilhas no código

Obrigado,

Re: Seleção de duas Sheets

Enviado: 19 Jul 2017 às 15:15
por alexandrevba
Boa tarde!!

Eu não sei o que você realmente pretende, mas já tentou?
Código: Selecionar todos
ActiveSheet.Next.Select
Att

Re: Seleção de duas Sheets

Enviado: 19 Jul 2017 às 16:08
por osvaldomp
Este código seleciona a planilha ativa e mais a primeira planilha à direita dela
Código: Selecionar todos
Sub SelecionaPlanilhasV1()
 Sheets(Array(ActiveSheet.Name, ActiveSheet.Next.Name)).Select
End Sub
Este abaixo seleciona a planilha ativa e mais as duas primeiras à direita dela. Para selecionar mais ou menos planilhas altere o +2
Código: Selecionar todos
Sub SelecionaPlanilhasV2()
 Sheets(Array(ActiveSheet.Name, Sheets(ActiveSheet.Index + 2).Name)).Select
End Sub

Re: Seleção de duas Sheets

Enviado: 19 Jul 2017 às 17:07
por AndersonDao
Muito Obrigado pessoal.
Muito Obrigado Osvaldo. Resolveu meu problema!