Pikanäppäin peräkkäisen jonon tekemiseen

Jelppi

Eli miten saa pikanäppäimillä aloitettua esim. jonon 1,2...? Eli kun excel-taulukkoon on kirjoitettu ynsimmäiseen soluu 1 ja toiseen soluun 2, niin pelkästään näppäimistöllä tehtyä esim. lukujonon 1,2,3
,4,5,6,7,8,9,10? CTRL D kokeilin, mutta se muuttaa kaikki 1,1,1,1,1,1,1,1,1,1

5

1260

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • moduuliin...

      Sub Automaattitäyttö()
      'alkusolut = solut, joissaa on sarjantekoon tarvittavat tiedot eli aktiivinen solu ja sitä edeltävä solu ylöspäin
      'voi olla myös vasemallla ,oikealla ylhäällä- pitää muuttaa offsetteja
      'ActiveCell.Offset(9, 0)) nyt 10 solun sarja alaspäin- muuta lukua tarvittaessa
      'liitä maro pikanäppäimeen TOOLS/MACRO/MACROS/OPTIONS ja liitä kirjain pikanäppäinyhdistelmaan SHIFT CTRL D
      Dim Alkusolut As Range
      Dim Täyttöalue As Range
      Set Alkusolut = Range(ActiveCell, ActiveCell.Offset(-1, 0))
      Alkusolut.Select
      Set Täyttöalue = Range(ActiveCell, ActiveCell.Offset(9, 0))
      Täyttöalue.Select
      Alkusolut.AutoFill Destination:=Täyttöalue
      End Sub

      • oikea koodi- noi select rivit oli vain testejä varten...

        Dim Alkusolut As Range
        Dim Täyttöalue As Range
        Set Alkusolut = Range(ActiveCell, ActiveCell.Offset(-1, 0))
        Set Täyttöalue = Range(ActiveCell, ActiveCell.Offset(9, 0))
        Alkusolut.AutoFill Destination:=Täyttöalue
        End Sub


      • Äkselli
        kunde kirjoitti:

        oikea koodi- noi select rivit oli vain testejä varten...

        Dim Alkusolut As Range
        Dim Täyttöalue As Range
        Set Alkusolut = Range(ActiveCell, ActiveCell.Offset(-1, 0))
        Set Täyttöalue = Range(ActiveCell, ActiveCell.Offset(9, 0))
        Alkusolut.AutoFill Destination:=Täyttöalue
        End Sub

        Täytä solut yks ja kaks -> maalaa solut -> tartu reunasta -> vedä haluamasi määrä


      • Jelppi
        Äkselli kirjoitti:

        Täytä solut yks ja kaks -> maalaa solut -> tartu reunasta -> vedä haluamasi määrä

        Hiirellä joo saa, mutta näppiksellä jos sais nopeempaa työskentelyä vielä


      • Jelppi kirjoitti:

        Hiirellä joo saa, mutta näppiksellä jos sais nopeempaa työskentelyä vielä

        mun koodihan tekee just niin kuin halusit
        SHIFT CTRL D
        ;-)


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

    Luetuimmat keskustelut

    1. Vain vasemmistolaiset rakennemuutokset pelastavat Suomen

      Kansaa on ankeutettu viimeiset 30+ vuotta porvarillisella minäminä-talouspolitiikalla, jossa tavalliselta kansalta on ot
      Maailman menoa
      118
      3862
    2. Persut huutaa taas: "kato! muslimi!"

      Persut on lyhyessä ajassa ajaneet läpi kaksi työntekijöiden oikeuksien heikennystä, joita se on aiemmin vastustanut. Pe
      Maailman menoa
      56
      3185
    3. onko kaivattusi

      vaarallinen? :D
      Ikävä
      79
      3157
    4. Haluaisin rakastaa sinua

      Ja olla sinulle se oikea... Rakastan sinua 💗💗💗
      Ikävä
      19
      3105
    5. Purra on kantanut vastuuta täyden kympin arvoisesti

      Luottoluokituksen lasku, ennätysvelat ja ennätystyöttömyys siitä muutamana esimerkkinä. Jatkakoon hän hyvin aloittamaans
      Maailman menoa
      6
      3041
    6. Menen nyt koisimaan

      Ja en ehkä palaa tänne. Asia on nyt loppuunkäsitelty ja totuus tuli ilmi
      Ikävä
      29
      2805
    7. Olisiko sinulla

      Jonossa vaihtoehtoja, ehkä
      Ikävä
      54
      2537
    8. Mitä tuntemuksia

      Rakkaasi ääni herättää?
      Ikävä
      19
      2277
    9. Pieni galluppi

      Mitäs lahjaa odotat joulupukilta.
      Ikävä
      63
      2260
    10. Oletko uhriutuja?

      vaikka itse olet rääkännyt toista ja aiheuttanut ties mitä toiselle.
      Tunteet
      62
      2119
    Aihe