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
Excel Sort-toiminto
Sorttiportti
2
401
Vastaukset 2
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
@KundeOlipa hieno ratkaisu.
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
- 110685
Jasmin Vähäkangas valehtelee kolumnissaan. Hän ei ole "taaperon" äiti.
Lapsi ei taaperra. Vielä seurakunnan lehdessä valehtelee noin?64516- 39516
Miten voi sinun
tunteet yhtäkkiä kuolla kuin napista painamalla? Et enää vilkaisekaan minuun päin vaan jos vahingossa näet minut käännät37442Pyhäjärvi syvällä kusessa
Pyhäjärvi ei tule selviämään millään tästä alhosta. Ollaan aivan liian syvällä. https://www.mtvuutiset.fi/artikkeli/pyha71437Hyvää yötä
Ikuinen kohtalo, sydänystävä, rakkauteni♥️.. kumpa olisimme saaneet elämältä mahdollisuuden!21419- 152414
Missähän pöytäkirja viipyy, taas?
Hallituksen kokouksessa oli eilen mielenkiintoisia asioita käsiteltävänä. Pöytäkirja on ollut yleensä saman iltana luett38399Hyvästi feikit hiustenpidennykset - Kerttu Rissanen hurmaa uudella hiustyylillä
Kerttu Rissanen ihastuttaa uudella hiustyylillään ja lookillaan. Rissasella on totuttu näkemään pitkät hiukset ja hiust6394- 20371