Notifications
Clear all

Tela inicial

9 Posts
1 Usuários
0 Reactions
1,530 Visualizações
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Qual o comando, quando eu abrir a planilha, sempre terá que ser na tela inicial, mesmo se salvar algo, tem que abrir a planilha na tela inicial

 
Postado : 22/03/2012 4:57 pm
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

A tela inicial é uma Sheet especifica, um Userform?

Se for uma Sheet, vá no VBE num modulo qualquer e digite

Sub Auto_Open()
NomedaSheet. Select
End Sub
 
Postado : 22/03/2012 5:03 pm
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Não funcionou

 
Postado : 22/03/2012 5:08 pm
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Bom, com esse retorno não dá para saber o que aconteceu aí, pois a rotina funciona.

Favor postar mais detalhes o que você fez para não ter funcionado.

 
Postado : 22/03/2012 5:58 pm
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Boa noite!!

Tente usar esse comando que o White, passou dentro de ...EstaPasta_de_Trabalho

Private sub workbook_Open()

End sub

 
Postado : 22/03/2012 6:04 pm
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Sub Auto_Open()
inicial. Select
End Sub

Foi esta rotina que eu coloquei.

 
Postado : 24/03/2012 12:24 pm
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Irei tentar a opção do mestre alexandre.

 
Postado : 24/03/2012 12:26 pm
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Ferreira, tanto Auto_Open como Workbook_Open são rotinas para serem executadas ao iniciar, a diferença é aque Auto_Open praticamente não se utiliza mais, foi craiada para resolver alguns problemas de incompatibilidades nas versões anteriores, tem um tópico no Forum sobre a mesma, então o ideal é utizar o Evento Workbook_Open.

Com certeza o erro se dá devido as referencia, mais uma vez vou colocar aqui no forum como lidar com o Objeto Application, Workbook e Worksheet, perca alguns minutos e procure ler as lições 4, 5 e 6, o idela é ler todas.

Lição 04: VBA - Trabalhando com o objeto Application
http://www.juliobattisti.com.br/excel12 ... licao4.htm

O erro é porque você não tem a Worksheet (Objeto) com o nome Inicial, veja que falei Objeto e não uma ABA ou não está referenciando corretamente.

A instrução abaixo só ira funcionar se tivermos um Objeto com o Nome Inicial.
Sub Auto_Open()
inicial. Select
End Sub

O correto aqui seria, uma das seguintes formas :
Sub Auto_Open()
Sheets("Inicial").Activate
End Sub

Sub Auto_Open()
Dim Inicial As Worksheet
Set Inicial = Sheets("Inicial")

Sheets("Inicial").Activate
End Sub

[]s

 
Postado : 24/03/2012 4:06 pm
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Irei ler a apostila inteira.

Obrigado.

 
Postado : 25/03/2012 3:14 am