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. Kuollut teini Kajaanissa

      Kuulemma sellaista huhua liikkeessä?
      Kajaani
      13
      2336
    2. Perhoseni (miehelle)

      Miksi et usko, että mun rakkaus sinuun on aitoa ja vilpitöntä? Tai että se oli jo silloin? Miksi ajattelet, ettet ole r
      Ikävä
      167
      1118
    3. Totta on asia. Jeffrey Cohen on jättänyt Sofian.

      Vaimon viesti on paljastanut totuuden.
      Kotimaiset julkkisjuorut
      274
      1102
    4. Uskallatko paljastaa

      Millä nimellä löydyn puhelimestasi?
      Ikävä
      79
      897
    5. Uskaltaisitko

      Tavata kaivattusi tässä tilanteessa?
      Ikävä
      87
      833
    6. Halaus juuri sinulle

      Kaikki järjestyy kyllä. Luota vain. ❤️🫶
      Ikävä
      63
      808
    7. Mies, näetkö minut myös

      Seksuaalisena ihmisenä ja naisena? Haluatko minua seksuaalisesti? Vai olenko mielestäsi tyttönen?
      Ikävä
      24
      735
    8. Kuinkahan monen

      Naisen puolisoa olet nainen vikitellyt ja eron aiheuttanut? Toivottavasti karma on ku*sut muroihisi useamman kuin kerran
      Ikävä
      69
      701
    9. Mitä sä haluat vanhus?

      🤣🤣🤣🤣🤣
      Ikävä
      65
      681
    10. Nainen, mitä mieltä olet kodittomista?

      Ja heistä jotka eivät kykene huolehtimaan asioistaan, itsestään eikä terveydestään? Miten heidän kanssaan tulisi toimia?
      Ikävä
      142
      681
    11. Mies, kumman ottaisit mieluummin

      176 cm vai 154 cm naisen, jos molemmat muuten yhtä viehättäviä? Mikä on oma pituutesi?
      Sinkut
      135
      663
    12. Meneekö unohtamis

      Projektisi hyvin??
      Ikävä
      47
      660
    13. Voiko se ikinä toimia

      Voiko meistä ikinä tulla mitään? Näin kauan aikaa on kulunut ja mitään ei tapahdu... En usko, että sinä mietit minua het
      Ikävä
      32
      608
    14. Tekisi mieli vetäistä kunnon jurrit sinun kanssasi

      Ja keskustella asiat, ei tästä tule hevonvttua.
      Ikävä
      46
      604
    15. Kauan mökötetään toisillemme?

      Loppuelämäkö? Vai oisko jo pussailutreffit?
      Ikävä
      53
      604
    16. Pettymys TTK-parketilla! Anna Hanski tippui - Sami-opelta erikoinen heitto: "Nyt sä pääset..."

      Toisena parina Tanssii Tähtien Kanssa -kisasta tippuivat Anna Hanski ja Sami Helenius. Pettymys oli käsinkosketeltava y
      Tanssii tähtien kanssa
      25
      573
    17. Eikö olisi mukavaa

      Jakaa arki yhdessä mies. Tämmöisin aatoksin.
      Ikävä
      40
      554
    18. Voin tulla

      Sisustamaan sulle 🤭
      Ikävä
      55
      548
    19. Anteeksi mies

      En jaksa tätä…, en halua, että sinulla on paha mieli tämän takia. Viestiä Sinulle.
      Ikävä
      41
      542
    20. Kerro mies tarinasi

      Miksi kaikki meni niinkuin meni? Haluaisin vieläkin ymmärtää. Tuskin saan vastausta häneltä, koska etsin aavikolta juuri
      Ikävä
      20
      518
    Aihe