Aukioloaikojen syöttäminen

Anonyymi

Onko Excelillä mahdollista ratkaista seuraava asia:

Oletuksena työkirjasta löytyy taulukko aukioloajalle 8-16. Jos käyttäjä tarvitseekin aukioloajaksi vain 8-14 ja syöttää tämän tiedon johonkin tietokenttään, kellonaikasarakkeet 14 ja 15 joko poistettaisiin tai sitten niihin soluihin ei voisi kirjoittaa mitään. Eli taulukko muokkaantuisi käyttäjän määrittelemän kellonajan mukaan?

3

59

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • Anonyymi

      Onnistuu kyllä, mutta suosittelen silti lopettamaan ne ruokalähettihommat ja menemään oikeisiin palkkatöihin.

    • Anonyymi

      Tehdään pieni esimerkki:

      Lets leikitään että sinulla on solussa A2 aukiolo.
      Solu on tekstimuotoiltu ja sisältää arvon '8-16
      Soluissa E2-E9 on tuntinumerot 8, 9, 10,..., 14, 15
      Maalataan alue E8:E9 -> Ehdollinen muotoilu/Uusi sääntö
      Määritä kaavan avulla mitkä solut muotoillaan
      Muotoile arvot joissa tämä kaava on tosi ->
      =$A$2="8-14"
      Muotoile -> Fontti/Väri (valkoinen) -> OK
      Solun teksti muunnetaan valkoisessa solussa valkoiseksi
      mikä ihmisen silmässä on sama kuin näkymätön.

      Testataan kaavan toimivuutta muuttamalla solussa A2 olevaa
      aukioloa '8-16 muotoon '8-14.

      E-sarakkeen tunnit 14 ja 15 piiloutuu soluissa E8 ja E9.

    • Anonyymi

      Tämä ko. sivun moduliin:

      Private Sub Worksheet_Change(ByVal Target As Range)
          aukiolo = "$B$1"  ' solu, johon aukioloaika kirjoitetaan
          sarakkeet = "C:Z" ' mahdolliset tuntisarakkeet
          aamu = 6          ' ensimmäisen sarakkeen aika
          
      On Error GoTo Loppu:
          Application.EnableEvents = False
          Dim auki() As String
          If Target.Address = aukiolo And Target.Count = 1 Then
              auki = Split(Range(aukiolo), "-")
              a = aamu
              For Each sarake In Columns(sarakkeet)
                  sarake.EntireColumn.Hidden = (a < CInt(auki(0)) Or a >= CInt(auki(1)))
                  a = a   1
                  s = sarake.Column
              Next
          End If

      Loppu:
          Application.EnableEvents = True
      End Sub

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

    Luetuimmat keskustelut

    1. Kela valvoo lasten tilejä.

      Tämä isoveli Kela kyttää jopa lasten yli 200,- euron rahat jotka on melko varmasti lahjaksi saatu. Se vaikuttaa perheen
      Yhteiskunta
      281
      3104
    2. Nainen, tervetuloa

      Tule luokseni eka vaikka viikoks tai pariksi. Saisin helliä, kannustaa ja tukea sua ja kokata lempi herkkujasi. Pääsisit
      Ikävä
      23
      2674
    3. Mitä haluaisit sanoa hänelle

      Nyt tällä hetkellä?
      Ikävä
      130
      1841
    4. TTK-tähti Saana Akiola paljasti tv-ohjelmassa tapahtuneen ahdistelun

      Olisko pitänyt suunnitella ulostulo paremmin? Nyt lehdet soittelevat kaikki 8 läpi ja kuusi sanoo ettei koskenut häntä.
      Maailman menoa
      20
      1833
    5. Elisa laskuttaa jo sähköpostilaskusta erikseen euron

      Paperilaskuista on otettu lisämaksua jo ajat sitten, mutta nyt Elisa ottaa euron siitä että lähettävät sähköisen laskun
      Maailman menoa
      112
      1588
    6. Olisit ollut varovaisempi

      Nyt jos minut hylkäät ja et meidän asiasta minulle mitään ilmoita niin ettet edes anteeksi pyydä, niin tiedä että minä e
      Ikävä
      35
      1514
    7. Oho! Susanna Laine kohtasi epäonnea lomareissulla Italiassa - Avaa tilannetta: "Vähän sahaavaa..."

      Ou nou! Tsemppiä kuitenkin loppulomaan Italiassa, Susanna Laine ja mahdollinen seuralainen! Lue lisää ja katso kuvat:
      Suomalaiset julkkikset
      7
      1360
    8. Ensitreffit alttarilla Jyrki paljastaa hääyön intiimiasioista kameroiden sammuttua: "Fyysinen..."

      Ooo-la-laa… Ensitreffit alttarilla -sarjassa alkaa hääparien välillä ns. tunteet kuumenemaan. Lue lisää: https://www.s
      Ensitreffit alttarilla
      2
      1133
    9. Väliämme on noin 6 km

      Niin lähellä ja niin kaukana. Sinä olet kotona, minä olen kotona. Olet jo unessa. Mutta kun herään, olet jo töissä ja vä
      Ikävä
      9
      1103
    10. Odotatko vielä

      Häntä?????
      Ikävä
      62
      1063
    Aihe