View original (French)

Full Screen Display with VBA Excel

sonnygoal Posted messages 7 Status Member -  
 yacine kabyle -
Hello everyone,

I have a little problem: I would like my Excel VBA macro to automatically open an Excel sheet in full screen and the issue is that I can't hide all the menus, row numbers, column numbers, etc...
I'm not sure if it's possible but if anyone has a tip, that would be nice.
Thanks in advance
Configuration: Windows XP Internet Explorer 6.0

2 answers

  1. Papou
     
    Good evening,

    In your macro, add the following line: 

    Application.DisplayFullScreen = True


    Hoping I have met your expectations.
    7
    1. yacine kabyle
       
      Sub fullscrn()
      '
      ' macro fullscrn
      '

      '
      Application.ExecuteExcel4Macro "show.toolbar(""ribbon"",false)"
      ActiveWorkbook.Save
      End Sub
      0
  2. Papou
     
    Re-good evening Sonnygoal,

    Here is the continuation to hide headers, grids, tabs, scroll bars... 

    ' Hide gridlines ActiveWindow.DisplayGridlines = False ' Hide headings ActiveWindow.DisplayHeadings = False ' Hide scroll bars ActiveWindow.ActiveWindow.DisplayHorizontalScrollBar = False ActiveWindow.DisplayVerticalScrollBar = False ' Hide workbook tabs ActiveWindow.DisplayWorkbookTabs = False


    Tip: when you’re looking to write a macro, try the macro recorder, then grab the instructions that suit you (it’s super powerful)

    Good luck
    6
    1. kiko2000
       
      Please write ActiveWindow only once in the horizontal scroll bar section.
      0
    2. Baste
       
      Perfect!
      0
    3. cycy
       
      comment fais-tu pour afficher un tableau en plein écran?
      0
    4. Hélène
       
      Hello,
      Thank you for your responses, they are very helpful!
      However, is there a way to apply these "ActiveWindow" settings to the entire workbook?
      I tried replacing "ActiveWindow" with "ActiveWorkbook" or "Application" but it doesn't work
      Looking forward to hearing from you,
      0
    5. Oliv'
       
      Have you tried copying the query in question into the ThisWorkbook tab? It's at the top left in your VBA project (This allows you to assign your macro to all the tabs in the workbook).
      0