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

1287

    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. Kansalla on oikeus tietää miksi persut pettävät

      Koko kulunut hallituskausi on kysytty persuilta, minkä vuoksi he ovat pettäneet käytännössä jokaisen vaalilupauksen, ain
      Maailman menoa
      60
      7512
    2. Venäjän armeijan evp-upseeri: Armeija surkeassa tilassa, jonka läpäisee kaiken kattava

      valehtelu. Venäläiset alkaneet pohtia julkisesti maan todellisia tappioita. Z-bloggari ja 3. luokan kapteeni (evp.) Mak
      Maailman menoa
      123
      2936
    3. Minkälaisen viestin

      Laittaisit ikävöinnin kohteelle, jos rohkenisit?
      Ikävä
      142
      1776
    4. Kansalla on oikeus tietää mikä on SDP:n talousohjelma jolla maan talous

      saadaan nousuun? Miksi puolue piilottelee sitä, vai eikö sitä ole? Tähän asti olemme vaan saaneet kuulla hallituksen ha
      Maailman menoa
      65
      1649
    5. Ammattiliitto 900 euroa/vuosi - Työttömyyskassa 72 euroa/vuosi

      Ammattiliitosta eroamalla voi säästää jopa 800 euroa vuodessa. Mitä enemmän tienaat, sitä enemmän maksat liitolle. Esim
      Maailman menoa
      115
      1458
    6. Miten voit olla niin tyhmä

      että et tajunnut että sua vedätettiin? Tietäisitpä miten hyvät naurut on saatu. Naiselle
      Tunteet
      167
      1404
    7. Missä vaiheessa

      Päätit irl luovuttaa minun suhteeni?
      Ikävä
      131
      1153
    8. Millaisena uskot

      Kaivattusi kokevan tunteensa?
      Ikävä
      77
      853
    9. Kyriake=Kirkko

      Kirkko, Kyriake Kirkko-sana tulee kreikankielen sanasta Kyriake=Herran omat, Kristuksen omaksi kastettujen suuri joukko
      Kaste
      47
      802
    10. Mitä haluat eniten

      Kaivattusi kanssa?
      Ikävä
      52
      745
    Aihe