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
Pikanäppäin peräkkäisen jonon tekemiseen
5
1287
Vastaukset
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 Suboikea 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 SubTä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
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, ain607512Venä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.) Mak1232936- 1421776
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 ha651649Ammattiliitto 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. Esim1151458Miten voit olla niin tyhmä
että et tajunnut että sua vedätettiin? Tietäisitpä miten hyvät naurut on saatu. Naiselle1671404- 1311153
- 77853
Kyriake=Kirkko
Kirkko, Kyriake Kirkko-sana tulee kreikankielen sanasta Kyriake=Herran omat, Kristuksen omaksi kastettujen suuri joukko47802- 52745