Excel Sort-toiminto

Sorttiportti

Hei, olen motellissa töissä ja olen tekemässä Exceliin varausjärjestelmää. Kysyisinkin nyt miten saisin päivämäärät menemään automaattisesti järjestykseen aina kun lisään uuden varauksen.

Esimerkiksi jos minulla on varauksessa

17.6. Matti Mäkelä
18.6. Pia Pokka

jonka jälkeen saan varauksen

16.6. Niina Nenä

miten saan Niinan varauksen menemään listan ensimmäiseksi automaattisesti? Tiedän Excelin Sort-toiminnosta mutta se on vaivalloinen koska se pitää tehdä joka varauksen jälkeen uudestaan. Osaako joku auttaa? Pomoni olisi minusta niin ylpeä :D:D Kiitos jo etukäteen

2

373

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • tiedot pitää olla 2 eri sarakkeessa, koska tekstilajittelu hankalampaa numeroill eli esim Csarake pvm ja D -sarake asiakas
      oletuksena tiedot alkaa C1
      jos tiedot alkaa muualta muuta osoitteita

      toimii nyt näin
      syötetään tieto C-sarakkeeseen ja jos D sarakkeesta puuttuu vastaava tieto siirtyy siihen. Jos D sarakkeessa oli tieto lajittelee
      ja päinvastoin D sarakkeen kanssa

      taulukon moduuliin...

      Option Explicit

      Private Sub Worksheet_Change(ByVal Target As Range)
      If Not Intersect(Target, Columns("C:D")) Is Nothing Then
      If Not Intersect(Target, Columns("C:C")) Is Nothing Then
      If Target.Offset(0, 1) = "" Then
      Target.Offset(0, 1).Select
      GoTo loppu
      End If
      Else
      If Target.Offset(0, -1) = "" Then
      Target.Offset(0, -1).Select
      GoTo loppu
      End If
      End If
      Columns("C:D").Sort Key1:=Range("C1"), Order1:=xlAscending, Header:=xlGuess, _
      OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
      DataOption1:=xlSortNormal
      End If
      loppu:
      End Sub

      Keep EXCELing
      @Kunde

    • Olipa hieno ratkaisu.

    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Luetuimmat keskustelut

    1. Marinin hallituskaudella Suomen BKT sentään kasvoi

      Tämä ns. kauhukabinetti ei ole saanut aikaan kuin vahinkoa. Otti ennätysvelat rikkaiden veroalennuksiin ja sai työttömyy
      Maailman menoa
      8
      2032
    2. Huulitäytteet ja tekotisssit

      Kylillä kulkiissa olen huomannut että tässäkin tuppukylässä on hameväki alkanut muokkaamaan ulkonäköään huulitäytteillä
      Suomussalmi
      110
      1393
    3. Drone-epäily Uudellamaalla

      Ihmisiä kehotetaan siirtymään sisätiloihin. https://www.is.fi/kotimaa/art-2000012008358.html
      Maailman menoa
      120
      1165
    4. Sait mut mies heikoksi

      Yllätti tämä asia nyt kyllä. Olet ollut mielessä koko ajan. Ei riitä pelkkä kevät nyt syyksi. Veit jalat alta. Pannaan m
      Ikävä
      86
      1064
    5. Vauvat syntyvöät vihan lapsina?

      Kyllä on pimeä oppi, ja olen ollut täydessä pimeydessä opillisesti, että pienet lapset syntyisivät paholaisen lapsina. O
      Luterilaisuus
      66
      1015
    6. Nuorille miehille ei kelpaa enää paljon käytetty nainen

      "En ikinä huolisi mitään kyläpyörää", Tomi täräyttää TikTokissa https://www.iltalehti.fi/kotimaa/a/27182b8f-7759-49d0-8
      Sinkut
      190
      912
    7. Unelma tilanne

      Miten haluaisit, että tilanteenne etenisi tai miten toivoisit hänen lähestyvän sinua? Vai toimitko mielummin itse, jos j
      Ikävä
      67
      785
    8. Itsensä pidättely

      Pidätteletkö tunteitasi tai itseäsi hänen aikanaan ja jos niin miksi?
      Ikävä
      76
      750
    9. Stefan Therman. Vakava syyte ja vankila uhkaa.

      Nyt ei taida mies selvitä enää selityksillä.
      Kotimaiset julkkisjuorut
      73
      622
    10. Iivarilla johtopäätösten aika

      Kun veteraanipolitikko ja pumppuvoimalavastustaja Pikkarainen aloittaa eilen nähdyn ulosmarssin on Iivarilla johtopäätös
      Kemijärvi
      36
      612
    Aihe