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

560

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • tuttumies

      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.


    • tuttumies

      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. Täti-ihminen Sofia ja nuori kanadalainen lätkänpelaaja

      Sofialla on kiikarissa Logan Thompson 25v, Las Vegasissa pelaava kanadalaispelaaja. Tätä se kai tarkoitti, kun sanoi Seiskalle, ettei tiedä kuinka pit
      Kotimaiset julkkisjuorut
      203
      3241
    2. Some pillastui: Farmin voitto pedattiin Teemulle?!? "Törkee temppu" "Taina oli ihan vailla mahiksia"

      Ohhoh, Farmi-kaksintaistelu ja finaali on saanut tunteet kuumiksi - ja ehkä syystäkin Suomi24 Keskustelu -palstalla... Olisiko Tainalla ollut mahdolli
      Suomalaiset julkkikset
      28
      2873
    3. Suomessa todettu ilmeisesti eka apinarokkotapaus

      Euroopassa matkailleella miehellä. https://www.is.fi/kotimaa/art-2000008841676.html
      Maailman menoa
      106
      1574
    4. Pääsikö Martti

      Esittelemään velaka mersua ja hyyryä hienostoalueella lippisjonnelle🤗😜😎
      Kotimaiset julkkisjuorut
      198
      1505
    5. Voiko Martinaa muuta kuin nauraa

      Baha oli "tiedän, että ollaan loppuelämä yhdessä."😂 Pikkarainen oli " tässä on nyt se oikea ihminen, en luovu susta koskaan."😂 Lippispojasta sanoo "
      Kotimaiset julkkisjuorut
      325
      1304
    6. Etkö voisi

      Mies: Etkö millään voisi, tahtoisi tai haluaisi tavata? Edes hetken, kuten silloin joskus. Etkö voisi pyytää? Itse en voi. Tekisin mitä vain, jos näki
      Rakkaus ja rakastaminen
      85
      1234
    7. J joskus haluaisin

      Istua syliisi ja samalla suudella sinua...
      Ikävä
      56
      1209
    8. Petit miestäsi

      Pettäisit myös minut. Sinulle ei merkitse rehellisyys mitään. Naisilla on selkäranka. Käärmellä sitä ei ole. Älä enää vaivaa minua.
      Järki ja tunteet
      69
      1080
    9. Mitäs ajattelisit

      Jos saisit häneltä tänään pienessä sievässä lähetetyn viestin puhelimeen "haluan nähdä" tai "ikävä"?
      Ikävä
      83
      1039
    10. Nyt on aika muistella jättitarakkaa

      Uuh uuh uuh. https://aijaa.com/wMPRhU
      Kotimaiset julkkisjuorut
      64
      934
    Aihe