Página 1 de 1

ThisWorkbook.Worksheets

Enviado: 30 Out 2020 às 16:00
por andriessen
Boa tarde!

Alguém pode me dar uma luz por favor
Estou em um vba e ele esta funcionando assim
ThisWorkbook.Worksheets("Orcamentos").Range("E1").Value=Filename

queria trocar o "Orcamentos" pelo numero da Planinha (Planilha1)

VbaProject
EstaPastaDeTrabalho
Planilha1(Orcamento)

Grato.

Re: ThisWorkbook.Worksheets

Enviado: 30 Out 2020 às 16:55
por osvaldomp
andriessen escreveu: 30 Out 2020 às 16:00 queria trocar o "Orcamentos" pelo numero da Planinha (Planilha1)
Esse é o CodeName da planilha e não o seu número.
Experimente:
Planilha1.Range("E1").Value = Filename

Re: ThisWorkbook.Worksheets

Enviado: 30 Out 2020 às 17:10
por andriessen
obrigado