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. Mikä on totta mikä ei?

      Onko juoru vai ei että nimeltä mainitsematon henkilö on tehnyt naiselle/naisille jotain joka on väärin?
      Kuhmo
      19
      1131
    2. Viesti sinulle

      Tiedät että tunteet ja ajatukset ja meillä on vahva yhteys mistä molemmat tiedetään. Odotan sinua ☀️
      Ikävä
      59
      1120
    3. Olen kironnut sinut alimpaan helvettiin

      Hyvää matkaa.
      Ikävä
      82
      881
    4. Mitä sinulle on tapahtunut lapsena

      Kun olet noin sairas päästäsi? Pikkupojalle ( Miehen kehossa)
      Ikävä
      99
      827
    5. Haluan purkaa vielä tuntemuksia

      Tykkään sinusta kovin paljon❤️ olen surullinen tilanteestasi ja siitä mitä me olemme yhdessä joutuneet kokemaan. Tämä ei
      Ikävä
      21
      747
    6. Tunteiden käsittely kertoo ihmisestä.

      Kun puhutaan "tavallisesta" ihmisestä, joka on suht tasapainoinen eläjä, niin puhutaan oikeastaan taitavasta tunteiden k
      Sinkut
      206
      650
    7. Persujen Puhoksen retki

      Perussuomalaiset olivat tehneet turistibussimatkan Puhokseen. Tosin raukat olivat niin peloissaan, etteivät uskaltaneet
      Perussuomalaiset
      220
      646
    8. Kyllä tiedän sun

      Likaiset pelit selän takana
      Ikävä
      59
      641
    9. Lopetetaanko tämä

      Juttu ja mennään eteenpäin? Pystytkö?
      Ikävä
      105
      637
    10. Onko tuo joku katkera nainen oikeasti

      Joka sinua syyttää?
      Ikävä
      99
      582
    11. Jopa poliisi nauraa paskaista pelkuripersuille

      Puhoksessa jäi "isänmaantoivot" bussiin vapisemaan :-D https://www.is.fi/politiikka/art-2000012319632.html
      Maailman menoa
      268
      518
    12. Just saying

      Mies joka antaa naiselle turvallisen olon, on seksikäs. Ei kieroja kikkoja ja haluaa olla vain sen yhden naisen mies.
      Ikävä
      102
      498
    13. Pilkettä sunnuntain silmässä

      😉 Jos tästä ketjusta löytyisi yksi ihminen, joka saisi sut hymyilemään tänään… Millainen hän olisi? Ei tarvitse kerto
      Sinkut
      73
      471
    14. Tehdään yhdessä itsestämme

      Parhaat versiot❤️ Se vaatii molemmilta hyvää itsetuntoa!
      Ikävä
      39
      444
    15. Ketkä käy potkimassa ovia öisin?

      Enää ei naurata.
      Haapavesi
      5
      438
    16. Voisin antaa sulle nyt

      Halin❤️
      Ikävä
      47
      430
    17. 33
      429
    18. Aika on tuonut järkeä

      Sä et tiedä musta kaikkea. Jos tietäisit, ymmärtäisit, miksi me ei sovita yhteen. Öljy ja vesi. En mä ole valehdellut,
      Järki ja tunteet
      42
      413
    19. Persut eivät uskaltaneet tulla ulos

      Bussiin jäivät https://www.iltalehti.fi/politiikka/a/d7f9fc57-dca0-40b8-9cb1-156e5872dba9
      Perussuomalaiset
      147
      395
    20. Miksi jotku naiset on niin tyhmiä

      Että elättelevät turhaa toivoa toisen kustannuksella. Onko ne kaikki kaappilesboja vai mikä niitä vaivaa? Sitten itketä
      Ikävä
      50
      375
    Aihe