Exceliin Visual Basicia

ViBa

Kysymykseni on varsin yksinkertainen niille jotka osaavat ohjelmoida Visual Basicia, itse kun en osaa...
Eli excel-työkirjaan pitää luoda makro joka tekee valittuun soluun tietyn arvon, vaikka 6:00. Sitten kaksi pykälää sen solun alle kirjain A. Kolmanneksi arvon 6:00 oikealle puolelle arvon 14:00. Lopuksi siirrytään yksi solu oikealle.

6:00 14:00 (Lopuksi kursori tähän)

A

Eli peruskaava jolla voi liikkua solujen välillä kirjoittaen niihin jonkun arvon ja lopettaen johonkin toiseen soluun.

Toinen kysymys koskee funktionäppäimiä F1 - F12. Saako niitä miten otettua käyttöön omia makroja ohjailtaessa? Eli saako oman makron toimimaan F1 -näppäimellä?

Kiitos!

3

331

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • Excelit.fi

      Arvojen luominen työkirjaan:

      ----------------------------
      Sub LuoArvot()
      '
      ' LuoArvot Macro
      ' Macro recorded 6.8.2004 by Excelit.fi
      '

      ActiveCell.FormulaR1C1 = "6:00"

      ActiveCell.Offset(2, 0).Select
      ActiveCell.FormulaR1C1 = "A"

      ActiveCell.Offset(-2, 1).Select
      ActiveCell.FormulaR1C1 = "14:00"

      ActiveCell.Offset(0, 1).Select

      End Sub
      ----------------------------

      Funktionäppäin F1 käyttöön:
      (Oheinen koodi laitetaan tiedoston ThisWorkbook-objektiin valitsemalla objekti Visual Basic Editorissa oikealla hiiren napilla ja painamalla valintaa "View Code")

      ----------------------------
      Private Sub Workbook_Open()
      Application.OnKey "{F1}", "LuoArvot"
      End Sub
      ----------------------------

      • ViBa

        Kiitos paljon, toimii hienosti.

        Miten jos halutaan tyhjentää solu eikä kirjoiteta siihen mitään?
        Eli vaikka edellisen esimerkin lopuksi halutaan poistaa oikean puoleisen solun arvo ja palata sen jälkeen takaisin?


      • näin
        ViBa kirjoitti:

        Kiitos paljon, toimii hienosti.

        Miten jos halutaan tyhjentää solu eikä kirjoiteta siihen mitään?
        Eli vaikka edellisen esimerkin lopuksi halutaan poistaa oikean puoleisen solun arvo ja palata sen jälkeen takaisin?

        ActiveCell.Offset(0, -1) = ""
        tai
        ActiveCell.Offset(0, -1).ClearContents


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

    Luetuimmat keskustelut

    1. Riikka Purra leikkasi alimmalta tulodesiililtä 15 %

      Muistaako kukaan Riikka Purran kovaäänisen vaalilupauksen ennen eduskuntavaaleja? https://yle.fi/a/74-20221152 "THL o
      Maailman menoa
      279
      5838
    2. Muistele nainen niitä meidän yhteisiä hetkiä

      Miltä ne tuntui? Enkö aina huokunut välittämistä, kiintymystä. Eikö sinulla aina ollut hyvä olo kanssani? Minulla ainaki
      Ikävä
      37
      3396
    3. Sofia Virta: bänet!

      Matkailuautoilija metsänomistaja puoliso on nyt entisen teeren poikia, ja Sofia tekee comebackin vapaille markkinoille.
      Maailman menoa
      143
      2637
    4. "Suomi voisi ottaa taloudessa oppia Espanjasta"

      "Espanjassa talouspolitiikka on löysempää, mutta velka-aste on kääntynyt jopa laskuun.", pohdiskelee Suomen seuraava pää
      Maailman menoa
      221
      2102
    5. Kokoomus: SDP johtaa kansalaisia harhaan

      (Umpityhmät palstademarit ovat taas uskoneet Lindtmanin höpötykset Espanjasta.) SDP harhaanjohtaa kansalaisia talouspol
      Maailman menoa
      78
      1635
    6. Otan vielä joskus yhteyttä

      Ja jos et vastaa, niin tulen sinne. Pakko puhua.
      Ikävä
      64
      1057
    7. Niin että miten

      Haluatko oikeasti olla minun kanssa oikeassa elämässä, vai onko tämä vain kirjoittelua
      Ikävä
      77
      991
    8. Nuoriso on tyhmää tutkijat ovat todenneet

      Nyt se on todettu ääneen mitä kaikki ovat jo pitkään epäilleet. Nuoriso on tyhmentynyt tasaiseen tahtiin. Kohta pitää ni
      Sinkut
      126
      856
    9. Ikävä tilanne rikoksen vuoksi Espanjassa - Jari Sillanpää pistää uutta matoa koukkuun

      Jari Sillanpää on ehkä yksi suosituimmista tangokuninkaallisista. Ex-tangokuningas juhli viime syksynä 30 vuotista uraan
      Suomalaiset julkkikset
      9
      855
    10. Tätä ei tv:ssä: Farmi-tippuja Amski rehellisenä ongelmista kuvauksissa

      Ennakkosuosikki Amskidabamski Anne-Mari Tarkkio joutui ulos Farmi Suomi -realitystä. Voimatehtävässä vastakkain asettui
      Tv-sarjat
      11
      804
    Aihe