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

1226

    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. Useita puukotettu Tampereella

      Mikäs homma tämä nyt taas on? "Useaa henkilöä on puukotettu Tampereen keskustassa kauppakeskus Ratinan lähistöllä." ht
      Tampere
      143
      2679
    2. Asiakas iski kaupassa varastelua tehneen kanveesiin.

      https://www.iltalehti.fi/kotimaa/a/33a85463-e4d5-45ed-8014-db51fe8079ec Oikein. Näin sitä pitää. Kyllä kaupoissa valtava
      Maailman menoa
      361
      1984
    3. Leipivaaran päällä on kuoleman hiljaista.

      Suru vai suuri helpotus...
      Puolanka
      40
      1717
    4. Kuka rääkkää eläimiä Puolangalla?

      Poliisi ampui toistakymmentä nälkiintynyttä eläintä Puolangalla Tilalta oli ollut karkuteillä lähes viisikymmentä nälkii
      Puolanka
      33
      1584
    5. Meneeköhän sulla

      oikeasti pinnan alla yhtä huonosti kuin mulla? Tai yhtä huonosti mutta jollain eri tyylillä? Ei olisi pitänyt jättää sua
      Ikävä
      28
      1360
    6. Jos ei tiedä mitä toisesta haluaa

      Älä missään nimessä anna mitään merkkejä kiinnostuksesta. Ole haluamatta mitään. Täytyy ajatella toistakin. Ei kukaan em
      Ikävä
      94
      1203
    7. Määpä tiijän että rakastat

      Minua nimittäin. Samoin hei! Olet mun vastakappaleeni.
      Ikävä
      54
      1163
    8. Muutama kysymys ja huomio hindulaisesta kulttuurista.

      Vedakirjoituksia pidetään historiallisina teksteinä, ei siis "julistuksena" kuten esimerkiksi Raamattua, vaan kuten koul
      Hindulaisuus
      327
      937
    9. Jumala puhui minulle

      Hän kertoi sinusta asioita, joiden takia jaksan, uskon ja luotan. Hän kuvaili sinua minulle ja pakahduin onnesta kuulles
      Ikävä
      110
      928
    10. Annan meille mahdollisuuden

      Olen avoimin mielin ja katson miten asiat etenevät. Mutta tällä kertaa sun on tehtävä eka siirto.Sen jälkeen olen täysil
      Ikävä
      53
      772
    Aihe