Este fórum está sendo desativado

[MarceloAdriano]

Olá
Como faço para se trabalhar com macros apontando ao número da planilha e não ao nome da mesma para que não ocorra a perda da marcro ao renomera a planilha.
Por exemplo:
Private Sub Workbook_Open()

ThisWorkbook.Worksheets("Controle").Select

'Gostaria de subistituir o nome "Controle", pelo numero da plan, no caso, Plan12. Qual a melhor forma de faze isso?
End Sub
Grato,
Marcelo Adrianno


End Sub

[alexandrevba]

Boa tarde!!

Veja:
https://msdn.microsoft.com/en-us/librar ... e.11).aspx

Código: Selecionar todos

Sub teste()
ThisWorkbook.Worksheets(12).Select
End Sub

Att

[MarceloAdriano]

Olá
Alexandre, sempre você me sauvando. Obrigado!
Aproveitando o ensejo. Há como alterarar esses os nomes das Plans1...2....3....4...5 etc... por uma renomeação mais amigavel?
Grato,
Marcelo Adraino

[alexandrevba]

Boa tarde!!

Eu não entendi.

vc pode gravar o nome da guia em uma variável...

Código: Selecionar todos

Sub EuNaoEntendi()
Dim sNomeGuia As String
    ThisWorkbook.Worksheets(2).Select
    sNomeGuia = ActiveSheet.Name
    MsgBox "Nome da guia: " & sNomeGuia
End Sub
 

Att

[MarceloAdriano]

Deixa para lá
Obrigado pela sua ajuda....