Calc en plein écran

Résolu
Mots croisés Messages postés 3059 Date d'inscription   Statut Membre Dernière intervention   -  
Mots croisés Messages postés 3059 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

J'ai créé un tableau avec Calc.
Je désirerais que celui-ci, à l'ouverture, s'ouvre en plein écran (pas de barre d'outils, ni barre de formule, ni entête de lignes et colonnes).

J'imagine que, pour comme Excel, il faut créer un bout de code en VBA.
Est ce que quelqu'un peut m'écrire ce code?
Et puis n'y comprenant pas grand chose avec les macros de Calc, si vs pouviez me guider sur l'endroit où copier ce code.

Merci



--
Sans les Helpers notre errance informatique serait sans fin - Mots croisés

1 réponse

  1. yclik Messages postés 3875 Date d'inscription   Statut Membre Dernière intervention   1 611
     
    Bonjour
    Pour ouvrir en plein écran, il faut une macro déclenchée sur évènement du document
    1 ouvrir éditeur macro
    ALT+F11
    sélectionner le classeur dans le cadre de gauche (+)
    + Standard
    Bouton "Nouveau"
    Module 1 OK
    coller la macro ci dessous sous Main (sans main et end sub de la macro copiée)
    Sub Main  
    rem define variables
    dim document as object
    dim dispatcher as object
    rem ----------------------------------------------------------------------
    rem get access to the document
    document = ThisComponent.CurrentController.Frame
    dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")

    rem ----------------------------------------------------------------------
    dim args1(0) as new com.sun.star.beans.PropertyValue
    args1(0).Name = "FullScreen"
    args1(0).Value = true

    dispatcher.executeDispatch(document, ".uno:FullScreen", "", 0, args1())
    End sub

    Enregistrer et fermer l'éditeur de macro

    2 Déclencher sur évènement
    Dans le classeur
    Outils>personnaliser...
    Onglet "Evènement" sélectionner "Ouvrir un document"
    Sous Assigner bouton "Macro"
    sélectionner le module du classeur en cours (comme en 1)
    sélectionner la macro et bouton "OK"
    Dans l'onglet évènements, en bas, enregistrer dans le document en cours.
    OK
    Enregistrer le document
    tester la macro
    Outils>macro>exécuter une macro
    sélectionner le module du classeur en cours (comme en 1)
    sélectionner la macro et bouton "OK"

    le classeur est en plein écran, pour sortir faire touche Echap ou Esc

    Fermer le document

    Nota la macro a été réalisée avec l'enregistreur de macro
    Outil>macro>enregistrer une macro
    Faire les opération prévues
    Bouton "Terminer l'enregistrement
    + Standard
    Enregistrer
    1
    1. Mots croisés Messages postés 3059 Date d'inscription   Statut Membre Dernière intervention   113
       
      Bjr Yclick

      Je n'avais pas remarqué que je n'avais pas donné suite à ce post.

      Ca fonctionne.

      En te remerciant, bonne journée.
      0