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

851

    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. Miten yksi ihminen

      Voi kolahtaa näin kovaa? Saada ajatukset vallattua näin totaalisesti? Taidan oikeasti tarvita ammattiapua tämän kanssa,
      Ikävä
      96
      1722
    2. Olet lihonut kuin pullataikina

      Olet lihonut kuin pullataikina. Et ole yhtä kaunis kuin aikaisemmin. Oletko ryyppäämässä käynnyt joka ilta?
      Ikävä
      85
      1419
    3. Mikä on hänen nimen viimeinen tavu?

      🎣🎣🎣🎣🎣
      Ikävä
      81
      1385
    4. Olisko jo aika?

      Voisitko jo viimein puhua tai avata edes yhteydet sen mahdollistamiseksi.
      Ikävä
      65
      955
    5. Kyllä on ihmisillä paha olla

      Harmi, kun se pitää kipata toisten niskaan. Noh, huhuhan kertoo, että koko palsta on menossa kiinni. Pitäneekö paikkan
      Sinkut
      164
      915
    6. Mustikanpoimintaa

      Raskasta ja hidasta hommaa on vaikka kyllä pääsisi ihan hyville tuntipalkoille jos ämpärin tunnissa ehtisi hyvältä paika
      Maailman menoa
      93
      874
    7. Festivaaliko?

      Ei kunnon valoja tai mitään rakenteita, amatöörien puuhastelua äänentoistoa myöten.Yksi soittotaitonen bändi! Luisia kyl
      Kuhmo
      45
      847
    8. Toivotko jotain tapahtuvan

      Että saisit kaivattusi vaimoksesi?
      Ikävä
      58
      750
    9. Mies viimeinen viestisi..

      Minkä verran panostit? Oliko jotain kokreettista. Pyysitkö treffeille? Ilmoititko halusta tavata? Epämääräisiin ei mon
      Ikävä
      133
      709
    10. Ammoniakkivuoto

      Oliko tämä Kiantaman tehtaalla? Ei heitä huonot uutiset Kiantamaa kiertämästä. Pitäsikkö jo laittaa lappu luukulle ja mu
      Suomussalmi
      21
      675
    Aihe