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

302

    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. Hoitajalakko peruuntuu, tilalle joukkoirtisanoutumiset

      "Tehyn ja Superin hallitukset kokoontuivat tänään toteamaan, että tilanne edellyttää järeämpiä työtaistelutoimia." https://www.hs.fi/politiikka/art-2
      Maailman menoa
      739
      9198
    2. Johan tuli oikea aivopieru Britti Lordilta

      Emeritusprofessori Lordi Robert Skidelsky sanoi Suomen rikkovan YYA sopimusta joka on tehty Neuvostoliiton kanssaa 1948. Mitä pir
      Maailman menoa
      373
      8004
    3. Tehyn Rytkösellä tallessa tekstiviestit A-studiokohussa

      https://www.mtvuutiset.fi/artikkeli/a-studiosta-kohu-tehyn-rytkosen-mukaan-ministeri-linden-sai-paattaa-osallistujat-ohjelma-kiistaa-vaitteen/8407068
      Maailman menoa
      162
      5761
    4. William ja Sonja Aiello ERO

      Hyvä Sonja! Nyt etsit uudet kaverit ja jätät nuo huume- ja rahanpesu porukat haisemaan taaksesi!
      Kotimaiset julkkisjuorut
      54
      2378
    5. Oho! Seurapiirikaunotar, ex-missi Sabina Särkkä yllättää tällä harvinaisella kyvyllä: "Mulla on..."

      Sabina Särkkä on nähty monissa tv-reality-sarjoissa. Mutta tiesitkö, että Särkällä on valokuvamuisti? https://www.suomi24.fi/viihde/oho-seurapiirikaun
      Kotimaiset julkkisjuorut
      6
      2103
    6. Se siitä sitten

      Kirjoitan tänne kun en sulle voi. En vaivaa sua enää koskaan. En ikinä tarkoittanut olla ahdistava tai takertuva. Tunteet heräsi enkä osannut olla tyy
      Ikävä
      82
      1752
    7. Ohhoh! Rita Niemi-Manninen otti ison tatuoinnin - Herätti somekansan: "Täydellinen paikka!"

      Rita Niemi-Mannisen suuri, uusi tatuointi on saanut somekansan heräämään talvihorroksesta. Niemi-Manninen otti tatskan rakkauslomalla Aki-miehensä kan
      Kotimaiset julkkisjuorut
      20
      1695
    8. Ihastumisesta kertominen

      Olen päättänyt kertoa tunteistani ihastukseni kohteelle. Erityisen vaikeaksi tilanteeni tekee se, että kyseessä on ns. kielletty rakkaus. Olen jo toi
      Ihastuminen
      92
      1455
    9. Taas Venäjän tiedoittaja akka Varoitti Suomea ja Ruotsia liittymästä Natoon

      Juuri sopivasti julkaistu varoitus, kun Suomen eduskunta alkaa klo 13:50 käsitellä asiaa suorassa TV 1:n lähetyksessä. ILtasanomat.
      Maailman menoa
      440
      1382
    10. Harvoin julkisuudessa nähty Jari Sillanpää, 56, julkaisi uusia kuvia - Karisti Suomen pölyt jaloista

      Huumekohun jälkeen matalaa profiilia pitänyt Jari "Siltsu" Sillanpää on ollut vaitonainen elämästään. Tänä keväänä miehen some on ollut hiljainen. Nyt
      Kotimaiset julkkisjuorut
      7
      1380
    Aihe