Notifications
Clear all

Ajuda com melhorar aparência

3 Posts
2 Usuários
0 Reactions
993 Visualizações
(@ewerthonk)
Posts: 5
Active Member
Topic starter
 

Fala galera, criei uma planilha e to tentando melhorar o aspecto dela, deixar mais próximo de um executável e ocultar algumas coisas do excel, a melhor maneira que consegui, foi encontrando um Sub na internet, que tem essa forma:

Sub lsLigarTelaCheia()
    'Oculta todas as guias de menu
    Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",False)"
    
    'Ocultar barra de fórmulas
    Application.DisplayFormulaBar = False
    
    'Ocultar barra de status, disposta ao final da planilha
    Application.DisplayStatusBar = False
    
    'Alterar o nome do Excel
    Application.Caption = "Brasilux"
    
    With ActiveWindow
        'Ocultar barra horizontal
        .DisplayHorizontalScrollBar = False
        
        'Ocultar barra vertical
        .DisplayVerticalScrollBar = False
        
        'Ocultar guias das planilhas
        .DisplayWorkbookTabs = False
        
        'Oculta os títulos de linha e coluna
        .DisplayHeadings = False
        
        'Oculta valores zero na planilha
        '.DisplayZeros = False
        
        'Oculta as linhas de grade da planilha
        .DisplayGridlines = False
     End With
    
End Sub

E a parte de

With ActiveWindow
        'Ocultar barra horizontal
        .DisplayHorizontalScrollBar = False
        
        'Ocultar barra vertical
        .DisplayVerticalScrollBar = False
        
        'Ocultar guias das planilhas
        .DisplayWorkbookTabs = False
        
        'Oculta os títulos de linha e coluna
        .DisplayHeadings = False
        
        'Oculta valores zero na planilha
        '.DisplayZeros = False
        
        'Oculta as linhas de grade da planilha
        .DisplayGridlines = False
     End With

Só deixa esses elementos ocultos na planilha em que estou, o que eu preciso mudar pra poder ocultar as barras, guias e títulos de todas as abas de planilhas do arquivo?
Obrigado.

 
Postado : 29/08/2017 8:39 pm
leandroxtr
(@leandroxtr)
Posts: 447
Reputable Member
 

Se voce deseja realmente fazer um executável, deveria pessoas na possibilidade de executar todas as suas atividades em um UserForm e com o Application (Excel) oculto.

Tenho planilhas aqui que só precisam no Excel para usa-los como banco de dados.

Não sei se a sua ideia é exatamente essa, mas acho desnecessário desabilitar (da um trabalho) uma pancada de coisa do excel se a intenção final não é tê-lo como uma planilha comum. Com o UserForm voce oculta o excel, executa todas as suas atividades por meio de botoes, combobox, listbox, textbox.... e quando precisar abrir o excel, ele permanece editável para que você possa manipulá-lo.

Abraços

Se te ajudou, não se esqueça de dar um like na resposta e marcar o tópico como finalizado.

Abraços!
Leandro Cordeiro

 
Postado : 30/08/2017 5:29 am
(@ewerthonk)
Posts: 5
Active Member
Topic starter
 

Então, não tenho conhecimento suficiente pra usar o userform e afins, só queria dar uma melhorada na aparência e me deparei com esse problema. Enfim, obrigado pela dica.

 
Postado : 30/08/2017 12:59 pm