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

1236

    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. Mieleni harhailee sinussa

      Uskon että tykkäät minusta. On vain yksi elämä. Silti jään paikoilleni ja odotan että jokin muuttuu. Menin palasiksi, ei
      Tunteet
      21
      5774
    2. Taposta murhaksi

      Mitä tästä tapauksesta tiedetään?
      Kajaani
      60
      1937
    3. Grilli lopettaa?

      Pitääkö huhu paikkaansa että grilli lopettaa lähiaikoina?
      Suomussalmi
      25
      1369
    4. Joko Martinalla uusi aviomies hakusessa

      Onko jo Raya sovellukseen laitettu uusi vetoomus vetämään... ja mistähän maasta mahtaa olla seuraava sulhasehdokas. Suom
      Kotimaiset julkkisjuorut
      227
      1193
    5. Pitääkö luovuttaa?

      Sano nyt edes jotain 👾
      Ikävä
      74
      1115
    6. Mitä teet nainen

      Jos saat tietää että mies on elänyt yksinäistä ja rauhallista elämää sinua kaivaten, ei ole ollut muiden naisten kanssa,
      Ikävä
      53
      1067
    7. Missä olitte kun oli teidän tähän saakka kaunein yhteinen hetki?

      Me olimme rannalla erään kiven päällä❤️
      Ikävä
      66
      1029
    8. Pitkäaikaistyöttömyys Suomessa harvinaisen paha

      Karut työttömyysluvut, korkein luku yli neljännesvuosisataan.
      Maailman menoa
      143
      1026
    9. Olet nuorempi nainen aivan ihana

      Tykkään susta ihan valtavasti ❤️❤️
      Ikävä
      50
      1002
    10. Mitä vastaisit

      Jos kysyisin, että lähdettäisiinkö lenkille yhdessä? Vain sinä ja minä, kaksin? Miehelle
      Ikävä
      58
      975
    Aihe