PÄIVÄMÄÄRÄ

Pysyväksi ?

Miten saan pysymään luetun päivämäärän solussa esim.
C1 :ssä , jos syötän luvun soluun D6 ?

=JOS(D60;TÄMÄ.PÄIVÄ();"")

Tällä kaavalla luetaan aina udelleen...

7

526

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • tutkailin useita variaatioita, mutta ei taida onnistua ilman VBA:ta tämäkään juttu. Sen avulla se onkin piece of cake

      eli kun D6 syötetään jotakin C1 tulee tämän päivän päiväys ja kun D6 on tyhjä on myös C1 tyhjä

      taulukon moduuliin...

      Private Sub Worksheet_Change(ByVal Target As Range)
      If Target.Cells.Count > 1 Then Exit Sub
      If Not Intersect(Target, Range("D6")) Is Nothing Then
      If Not Range("D6") = "" Then
      With Range("C1")
      .Value = Date
      .EntireColumn.AutoFit
      End With
      Else
      Range("C1") = ""
      End If

      End If
      End Sub

      • Pysyväksi

        Kiitti. Kokeilenpa.
        Ihme, ettei peruskaavassa pysty toteuttamaan.
        hmmm...


    • -Pasi-

      Itse tein joskus kyseisen homman näin (jos ymmärsin kysymyksesi oikein):

      Minulla on jossakin solussa, vaikkapa solussa O1 kaava "=tämä.päivä()" jolloin tssä solussa on tietenkin aina kyseisen päivän päivämäärä. Solussa O2 on kaava "=O1 1" jolloin siinä on huominen päivämäärä jne.

      Siinä solussa johon haluan jonkun tietyn päivämäärän valittua, on kelpoisuustarkistus ja valinta luettelosta, luettelon lähde on solualue jossa päivämäärät ovat.

      Jos pärjäät yhdellä päivämäärällä niin solualueeksi riittää yksi solu, jos haluat valita muutamasta päivästä eteen- tai taaksepäin niin tarvitset useamman solun sisältävän solualueen.

      Toivottavasti selitys ei ollut kovin hankala, toteutus on tosi yksinkertainen.

      -Pasi-

      • Pysyväksi

        Juuri näin, että kun
        D6_een syötetään jotakin niin C1_een tulee syöttöpäivän päiväys ja kun D6 on tyhjä on myös C1 tyhjä. Syötettiinpä milloin tahansa, vaikkapa vuoden välein ;)


      • eno2
        Pysyväksi kirjoitti:

        Juuri näin, että kun
        D6_een syötetään jotakin niin C1_een tulee syöttöpäivän päiväys ja kun D6 on tyhjä on myös C1 tyhjä. Syötettiinpä milloin tahansa, vaikkapa vuoden välein ;)

        Ehdottaisin tuota VBA:ta tai vaikka pikku makroa. Oletan että haluat tietojen lisäyksen jälkeen tallentaa tiedoston nimellä - eikö?

        Makro menisi sitten näin:
        C1 kopiointi
        C1 liitä määräten - vain arvot
        tallenna nimellä ( tässä voidaan tiedoston nimeksi ottaa esim. alkuun solun C1 arvo tai kysellä käyttäjää antamaan inputboxilla jotain yms.)


      • -Pasi-
        Pysyväksi kirjoitti:

        Juuri näin, että kun
        D6_een syötetään jotakin niin C1_een tulee syöttöpäivän päiväys ja kun D6 on tyhjä on myös C1 tyhjä. Syötettiinpä milloin tahansa, vaikkapa vuoden välein ;)

        Ymmärsin kysymyksesi väärin, tuo kertomani tapa ei tuo päivämäärää automaattisesti soluun vaan se täytyisi aina klikata siihen erikseen. Ilman VBA:ta en kyllä keksi miten onnistuisi.

        -Pasi-


      • Pysyväksi
        eno2 kirjoitti:

        Ehdottaisin tuota VBA:ta tai vaikka pikku makroa. Oletan että haluat tietojen lisäyksen jälkeen tallentaa tiedoston nimellä - eikö?

        Makro menisi sitten näin:
        C1 kopiointi
        C1 liitä määräten - vain arvot
        tallenna nimellä ( tässä voidaan tiedoston nimeksi ottaa esim. alkuun solun C1 arvo tai kysellä käyttäjää antamaan inputboxilla jotain yms.)

        Joo.Tallennus tottakai ;)


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

    Luetuimmat keskustelut

    1. Hetken jo luulin, että en ikävöi sinua koko aikaa

      Mutta nyt on sitten taas ihan hirveä ikävä jotenkin. Tiedätköhän sinä edes, kuinka peruuttamattomasti minä olen sinuun r
      Ikävä
      34
      5338
    2. Outoa että Trump ekana sanoutui irti ilmastosopimuksesta

      kun Kaliforniaa riepottelee siitä johtuvat tuhoisat maastopalot. Hirmumyrskytkin ovat USA:ssa olleet tuhoisia.
      Maailman menoa
      484
      2474
    3. Eli jos toisen hiki haisee ns. omaan nenään siedettävältä

      Se kertoo hyvästä yhteensopivuudesta. Selvä! Olet mies minun. 🫵🥳
      Ikävä
      27
      1239
    4. JOKO OLETTE KUULLET, MITÄ KIURUVEDELLÄ ON SATTUNUT!

      Oletteko jo kuulleet, mitä Kiuruvedellä on sattunut, voi hyvänen aika? Aivan viime tuntien aikana olisi sattunut, jos t
      Kiuruvesi
      5
      1035
    5. En tiedä miksi kerroin sinusta täällä

      Siksi kai, kun meidän juttu on niin alkuvaiheessa, etten voi vielä puhua siitä kenellekään.
      Tunteet
      16
      957
    6. Oho! Queen of Fucking Everything villitsee - Ikean sininen luottotuote nappasi hervottoman idean!

      Ikea on ajan hermoilla! Aika hauska idea ja Queen of Fucking Everything -ajatus toimii hyvin tässäkin. Lue lisää: http
      Mainonta ja markkinointi
      7
      934
    7. Nainen, tunnetko saman kuin minä

      Syvän yhteyden välillämme, silloin kun se tunne tulee. Niinä hetkinä minulla on niin järjettömän suuri ikävä sinua. Ikäv
      Ikävä
      41
      812
    8. HS - Yllätyskäänne Eagle S -tutkinnassa, Supo pitää onnettomuutena

      HS:n mukaan esitutkinta joudutaan todennäköisesti keskeyttämään syyttäjän päätöksellä mikäli näyttöä tahallisuudesta ei
      Maailman menoa
      193
      774
    9. Ei ois kyllä kivaa

      Jos miestä ei kiinnostais ollenkaan minun seura. Aina huitelis ties missä tai olis omassa seurassaan. Kaikki muu ois kiv
      Ikävä
      3
      764
    10. Siellä taas pyörin

      Nimittäin sinun paikkakunnalla mies. Mutta en vieläkään nähnyt sinua. Miksi sinä olet minulta aina piilossa?
      Tunteet
      8
      723
    Aihe