|
| Autor | Mensagem |
|---|
Mitterrand
Mensagens: 36
Data de inscrição: 03/02/2012
 | | Assunto: Planilha em tela cheia Sex Fev 03, 2012 11:50 pm | |
| Gostaria saber se é possível, e como, deixar Planilha sempre em tela cheia, mesmo quando minimizar e restaurar (ela está no modo tela cheia, mas quando minimizar para fazer outra coisa e volta, ela já volta a mostrar a barra de ferramentas).
Agradeço a ajuda antecipadamente. |
|
| | |
alexandrevba
Mensagens: 827
Data de inscrição: 13/07/2011
Localização: Serra - ES
| | Assunto: Re: Planilha em tela cheia Sab Fev 04, 2012 2:13 am | |
| Boa noite!!! faça as adaptações necessárias. Na postagem para ocultar observe que tem que alterar os valores de "false" para "true" Use esse comando | Código: | ActiveWindow.WindowState = xlMaximized |
|
|
| | |
Mitterrand
Mensagens: 36
Data de inscrição: 03/02/2012
| | Assunto: Duvida tela cheia Sex Fev 24, 2012 7:04 pm | |
| | alexandrevba escreveu: | Boa noite!!!
faça as adaptações necessárias.
Na postagem para ocultar observe que tem que alterar os valores de "false" para "true"
Use esse comando
| Código: | ActiveWindow.WindowState = xlMaximized |
|
______________________________
Eu estou utilizando o código abaixo, mas funciona 100%. Como faço?
Sub auto_open()
Dim barras, nTela, Cont
On Error Resume Next
For Each barras In Application.CommandBars
barras.Enabled = False
Next
Application.DisplayFullScreen = True
ActiveWindow.DisplayHeadings = False
Application.DisplayFormulaBar = False
ActiveWindow.DisplayHorizontalScrollBar = False
ActiveWindow.DisplayVerticalScrollBar = False
ActiveWindow.DisplayWorkbookTabs = False
Application.DisplayStatusBar = False
Application.ScreenUpdating = True
End Sub |
|
| | |
alexandrevba
Mensagens: 827
Data de inscrição: 13/07/2011
Localização: Serra - ES
| | Assunto: Re: Planilha em tela cheia Sex Fev 24, 2012 11:44 pm | |
| Boa noite!!! Tente.. | Código: | Sub auto_open()
Dim barras, nTela, Cont
On Error Resume Next
For Each barras In Application.CommandBars
barras.Enabled = False
Next
Application.DisplayFullScreen = True
ActiveWindow.WindowState = xlMaximized
ActiveWindow.DisplayHeadings = False
Application.DisplayFormulaBar = False
ActiveWindow.DisplayHorizontalScrollBar = False
ActiveWindow.DisplayVerticalScrollBar = False
ActiveWindow.DisplayWorkbookTabs = False
Application.DisplayStatusBar = False
Application.ScreenUpdating = True
End Sub |
|
|
| | |
alexandrevba
Mensagens: 827
Data de inscrição: 13/07/2011
Localização: Serra - ES
| | Assunto: Re: Planilha em tela cheia Sex Fev 24, 2012 11:45 pm | |
| Boa noite!!! Tente.. | Código: | Sub auto_open()
Dim barras, nTela, Cont
On Error Resume Next
For Each barras In Application.CommandBars
barras.Enabled = False
Next
Application.DisplayFullScreen = True
ActiveWindow.WindowState = xlMaximized
ActiveWindow.DisplayHeadings = False
Application.DisplayFormulaBar = False
ActiveWindow.DisplayHorizontalScrollBar = False
ActiveWindow.DisplayVerticalScrollBar = False
ActiveWindow.DisplayWorkbookTabs = False
Application.DisplayStatusBar = False
Application.ScreenUpdating = True
End Sub |
|
|
| | |
Mitterrand
Mensagens: 36
Data de inscrição: 03/02/2012
| | Assunto: Re: Planilha em tela cheia Sab Fev 25, 2012 4:48 am | |
| Ainda não resolveu... | alexandrevba escreveu: | Boa noite!!!
Tente..
| Código: | Sub auto_open()
Dim barras, nTela, Cont
On Error Resume Next
For Each barras In Application.CommandBars
barras.Enabled = False
Next
Application.DisplayFullScreen = True
ActiveWindow.WindowState = xlMaximized
ActiveWindow.DisplayHeadings = False
Application.DisplayFormulaBar = False
ActiveWindow.DisplayHorizontalScrollBar = False
ActiveWindow.DisplayVerticalScrollBar = False
ActiveWindow.DisplayWorkbookTabs = False
Application.DisplayStatusBar = False
Application.ScreenUpdating = True
End Sub |
|
|
|
| | |
alexandrevba
Mensagens: 827
Data de inscrição: 13/07/2011
Localização: Serra - ES
| | Assunto: Re: Planilha em tela cheia Sab Fev 25, 2012 10:12 am | |
| Bom dia!
Ao abrir o Editor VBA (EVBA), com o comando Alt+ F11 do lado esquerdo dê 2 click's em EstaPasta_De_Trabalho.
Cole o código lá dentro |
|
| | |
Mitterrand
Mensagens: 36
Data de inscrição: 03/02/2012
| | Assunto: Re: Planilha em tela cheia Sab Fev 25, 2012 11:02 pm | |
| Coloquei mas não deu certo... Será que teria como fazer com que os códigos da auto_open sejam executados a cada 1 seg? Porque desta forma mesmo se o usuário minimizasse a tela e voltasse, quando fosse executado voltaria para o modo tela cheia. | alexandrevba escreveu: | Bom dia!
Ao abrir o Editor VBA (EVBA), com o comando Alt+ F11 do lado esquerdo dê 2 click's em EstaPasta_De_Trabalho.
Cole o código lá dentro |
|
|
| | |
alexandrevba
Mensagens: 827
Data de inscrição: 13/07/2011
Localização: Serra - ES
| | Assunto: Re: Planilha em tela cheia Sab Fev 25, 2012 11:11 pm | |
| Boa noite!! use | Código: | Private Sub Workbook_Open()
Application.OnTime TimeValue("00:00:01"), "o nome da sua Macro aqui"
End Sub
|
|
|
| | |
Mitterrand
Mensagens: 36
Data de inscrição: 03/02/2012
| | Assunto: Re: Planilha em tela cheia Dom Fev 26, 2012 12:04 am | |
| Coloquei dentro de Esta pasta de trabalho mas não deu certo... | alexandrevba escreveu: | Boa noite!!
use
| Código: | Private Sub Workbook_Open()
Application.OnTime TimeValue("00:00:01"), "o nome da sua Macro aqui"
End Sub
|
|
|
|
| | |
alexandrevba
Mensagens: 827
Data de inscrição: 13/07/2011
Localização: Serra - ES
| | Assunto: Re: Planilha em tela cheia Dom Fev 26, 2012 1:43 am | |
| Tem como postar seu arquivo? repleto de detalhes do que precisa  |
|
| | |
|
