'
'
ActiveCell.Select
Selection.Resize(numRows 1, numColumns 18).Select
Selection.Sort Key1:=Range("N9"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlLeftToRight, _
DataOption1:=xlSortNormal
Range("N12").Select
End Sub
Käyttäjä valitsee itse sarakkeesta N haluamansa rivinumeron, jonka siis haluaa lajitella nousevaan järjestykseen. Makron pitää laska tuosta valinnasta esim. 13 solua oikealle ja sitten lajitelle se alue nousevaan järjestykseen, 1, 2, 3, 4, 5, jne.
Ilmeisesti tuo Range("N9")- kohta mättää
Selection.Sort Key1:=Range("N9")
Miten pitäisi muokata?
Rivin lajittelu makrolla alueella N9:X9
pööö
1
249
Vastaukset
vikana-eli Sort Key1:=ActiveCell jolloin aina lajitellaan aktiivisen solun mukaan
alla hieman siistittynä(ilman virhetarkasteluja ja N-sarake testiä) sama koodin pätkä
Sub testi()
Const NumColums As Integer = 14 '(Makron pitää laska tuosta valinnasta esim. 13 solua oikealle )
With ActiveCell.Resize(1, NumColums)
.Sort Key1:=ActiveCell, Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlLeftToRight, _
DataOption1:=xlSortNormal
End With
ActiveCell.Select
End Sub
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Suomalainen tutkimus paljasti oudon asian vasemmistolaisista - he häpeävät itseään
Kyllä, asia on faktaa. Suomalainen tutkimus osoittaa, että vasemmistolaisina itseään pitävät kansalaiset häpeävät itseää1383819Sosialismia Tampereella: Virallinen ilmiantolinja avautuu kaupungissa
Nyt siis mennään mansessa ihan justiinsa samaan malliin kuin entisessä Neuvostoliitossa, jossa saattoi ilmiantaa naapuri3362954Tätä et nähnyt tv:ssä: Frederik paljastaa - Totuus "haisevasta jäynästä" pehtoorille Farmilla
Frederik veti ns. herneen nenään ja päätti kostaa pehtoorille. Mitäs mieltä olet Frederikin "aamutoimista"? Lue jutt81855Ellen Jokikunnas paljastaa kyynelehtien Ralph-pojasta: "Apua..."
Ellen Jokikunnaksen ja hänen puolisonsa Jari Raskin perheestä ja taloprojektista Italiassa kertova Unelmia Italiassa -sa51588Oho! Vappu Pimiä teki "röyhkeän" teon - Onko sopivaa paljastaa tämä MasterChef-sarjasta?
Vappu Pimiä on astunut MasterChef Suomi -keittiöön ja liittynyt ohjelman legendaariseen tuomaristoon Helena Puolakan ja41069- 71924
Kaste tulisi tehdä apostolisella tavalla Ap. t. 2:38 mukaan
Apostolit eivät kastaneet kolminaisuuden nimellä vaan Jeesuksen alkuperäisen käskyn mukaisesti: Ap. t. 2:38 Niin Pietar38854- 44764
- 65731
Kuhmossa rallit alkoi ennen aikojaan
Paettiin polliisia törkeästi? Se tuo rallikiima on näemmä saavuttanu paikalliset tommi mäkiset kiljupäissään auton rat22708