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

402

    Vastaukset 2

    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. Oot upea nainen, älä vähättele ittees

      Ja tietojeni mukaan 2 muuta on susta kiinnostuneit mun lisäks. 👀
      Ikävä
      64
      1124
    2. Mikä kaivatussasi ärsyttää

      Juuri nyt, tällä hetkellä?
      Ikävä
      86
      1026
    3. KP-Sesongilla ongelmia?

      Tarvitsen luotettavaa katonpuhdistajaa ja kuulin, että KP-Sesonki Oy tekee hommat edullisesti ja asiakkaan tarpeet huomi
      Ylöjärvi
      19
      976
    4. Jämsän Paras Ravintola

      Särkijärven kioskiin on avattu uusi upea Maucas ravintola joka on jämsän paras. Loistava palvelu ja herkullinen ruoka. R
      Jämsä
      61
      919
    5. Huh huh...

      Törmäsin toisaalla tekstiin, mitä ajattelet masturboidessasi? Yksi kommentti, avaruusolioita! Täh?! Helvettiläinen oik
      Sinkut
      209
      741
    6. vapaa

      sana :) 🚮
      Ikävä
      63
      616
    7. Onko ihan pakko

      olla niin hiton pitkävihainen? Sinulle nainen...
      Ikävä
      38
      589
    8. Mitä ajattelet

      Kaivattusi elämästä
      Ikävä
      43
      556
    9. Ihmettelet nainen, miten vielä sinua rakastan

      No jos en enää sinua ajattelisi, niin ei se mitään rakkautta olisi alunperinkään. En tarvi sinusta nähdä merkkiäkään, ni
      Ikävä
      39
      545
    10. Kiellettyjä ajatuksia

      Istutaan sylikkäin, katson sun silmiin, vastaat kstseeseen ja kiedon kädet sun ympärille. Huulet koskettaa sun huulia,
      Ikävä
      39
      518
    Aihe