Komentopainike

Tärkeä juttu

Löytyykö OpenOfficesta komentopainiketta?
Pitäisi seurata alla olevaa ohjetta

Näytä - Työkalurivit - Ohjausobjektit. Valitse sieltä Komentopainike ja piirrä ohueksi ristiksi muuttuneella korsorilla haluttun kohtaan neliö, josta sitten muodostuu se painike. Klikkaa sitä hiiren oikealla ja makrot tulee näkyviin. Kirjoita Private Sub CommandButton1_Click() ja End Sub väliin tuo Range("A1") = Range("C1"). Ja vaikkapa myös ActiveWorkbook.Save, joka tallettaa työkirjasi.
Sitten tätä nappia painamalla hoituu lopputoimet.

http://keskustelu.suomi24.fi/node/9019698

3

853

    Vastaukset 3

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • Ohjausobjektit, kuten painike, saadaan Lomakkeen ohjausobjektit -työkalupalkista asiakirjaan. Suunnittelu tila pitää olla käytössä-asennossa ko. palkissa muokattaessa ja poissa käytöstä käytettäessä painiketta.

      Aloittelijan kannattanee nauhoittaa makro ensin vaikkapa uuteen moduuliin Main-nimellä ja sitten liittää se ohjausobjektiin Tapahtumat-välilehdellä. Edellä kuvattu tapaus mennee Suorita-kohdalle.

      VBA-koodi ei ainakaan kaikin osin ole Openoffice.orgin Basicin kanssa yhteensopiva.

      Tässä esimerkkinä nauhoitus, joka tekee vain tallennuksen aiemmin nimetylle Calc-taulukolle (ehkäpä muillekin asiakirjatyypeille):

      REM ***** BASIC *****


      sub Main
      rem ----------------------------------------------------------------------
      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 ----------------------------------------------------------------------
      dispatcher.executeDispatch(document, ".uno:Save", "", 0, Array())


      end sub

      • Hankala homma?

        Osaisitko sinä kertoa kuinka OpenOfficella saisi seuraavan taulukon toimimaan.

        Solussa A1 on luku joka lisätään solun A2 lukuun ja tulos siirretään soluun A3
        Tämän jälkeen tehdään jotain ?
        ja solun A3 arvo on loikannut solun A1 arvoksi ja kehä jatkuu.

        Makroista en ymmärrä paljon mitään, mutta uskoisin tämän olevan mahdollista
        jollain konstilla.


    • Onkohan tämä vielä ajankohtainen, mutta jos on, niin ...

      Koskapa tuolla toisaalla käy ilmi, ettet ole makroihin perehtynyt, niin vähemmällä vaivalla pääsen, kun teen Calc-laskenta-asiakirjan, jossa on ko. toiminto painikkeineen ja makroineen.

      Kun Suomen OpenOffice.orgilla ei tietääkseni ole keräystiliä, niin ehkäpä teet lupauksen pienestä lahjoituksestasi KUA:lle, LKA:lle, Pelastusarmeijan joulupataan tai sopimaksi katsomallesi hyväntekeväisyysorganisaatiolle ja ilmoitat tästä minulle sähköpostiin: vieras.m ät suomi24.fi. Paluupostin liitteenä saat Calcin laskentataulukon, joka toimii (G1:n kohdalla olevasta) painikkeesta niin, että A1 ja B1 solujen summa C1:stä siirtyy A1-solun ja taulukko tallentuu.

      Näin toimien et menetä rahojasi, jos vaikka laskentataulukko ei toimisikaan toivotusti. Vaatii kuitenkin Asetukset - Makrojen suojaukset Keskitaso-valintaa.

    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Luetuimmat keskustelut

    1. Oot upea nainen, älä vähättele ittees

      Ja tietojeni mukaan 2 muuta on susta kiinnostuneit mun lisäks. 👀
      Ikävä
      42
      875
    2. Mikä kaivatussasi ärsyttää

      Juuri nyt, tällä hetkellä?
      Ikävä
      78
      845
    3. KP-Sesongilla ongelmia?

      Tarvitsen luotettavaa katonpuhdistajaa ja kuulin, että KP-Sesonki Oy tekee hommat edullisesti ja asiakkaan tarpeet huomi
      Ylöjärvi
      17
      809
    4. Jämsän Paras Ravintola

      Särkijärven kioskiin on avattu uusi upea Maucas ravintola joka on jämsän paras. Loistava palvelu ja herkullinen ruoka. R
      Jämsä
      51
      734
    5. Huh huh...

      Törmäsin toisaalla tekstiin, mitä ajattelet masturboidessasi? Yksi kommentti, avaruusolioita! Täh?! Helvettiläinen oik
      Sinkut
      208
      671
    6. Onko ihan pakko

      olla niin hiton pitkävihainen? Sinulle nainen...
      Ikävä
      38
      549
    7. Mitä ajattelet

      Kaivattusi elämästä
      Ikävä
      43
      546
    8. Ihmettelet nainen, miten vielä sinua rakastan

      No jos en enää sinua ajattelisi, niin ei se mitään rakkautta olisi alunperinkään. En tarvi sinusta nähdä merkkiäkään, ni
      Ikävä
      39
      495
    9. vapaa

      sana :) 🚮
      Ikävä
      47
      475
    10. Kiellettyjä ajatuksia

      Istutaan sylikkäin, katson sun silmiin, vastaat kstseeseen ja kiedon kädet sun ympärille. Huulet koskettaa sun huulia,
      Ikävä
      37
      439
    Aihe