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

530

Äänestä

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • kunde

      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ä.

    Takaisin ylös

    Luetuimmat keskustelut

    1. Zelenskyi ei suostunut nöyrtymään Trumpin ja Vancen edessä, siksi meni pieleen

      Trumppia täytyy imarrella, silloin homma toimii aina. Tähän Zelenskyi ei suostunut.
      Maailman menoa
      656
      4790

    2. Harmi että

      Pidät niin vastenmielisenä. Olen minäkin välissä ollut ihan kamala sinulle ja ihmetellyt miten voit minusta tykätä. Se o
      Ikävä
      20
      2255

    3. Ajattele miten

      Paljon ottajia sinulla olisi
      Ikävä
      103
      1424

    4. En rehellisesti usko et oisit

      Sekuntiakaan oikeasti mua kaivannut. Tai edes miettinyt miten mulla menee. Jotenkin todennäköisesti hyödyt tästäkin jos
      Ikävä
      23
      1336

    5. Tekisitkö jotain toisin

      Kaivattusi kanssa alusta alkaen? 😍
      Ikävä
      88
      1332

    6. Trump näytti slipoveri-ukolle kaapin paikan!

      Slipoveri-ukko Ukrainan presidentti Volodimir Selenskyi meni tapaamaan valkoiseen taloon Trumppia ilman kunnon tuliaisia
      Kajaani
      127
      1111

    7. Nainen, olet jotenkin lumoava

      Katselen kauneuttasi kuin kuuta, sen loistoa pimeässä. Sen kaunis valo on kaunista sekä herkkää ja lumoavaa. Olet naisel
      Ikävä
      68
      1055

    8. Jos saan sinut elämääni

      niin minun täytyy nukkua ihan ensimmäiseksi 2vk putkeen. Sopiiko se sinulle? Väsynyt olen ollut ja niin levollinen olo
      Ikävä
      75
      955

    9. Kun Zele jenkeissä kävi

      Enää ei Zele saanutkaan miljardeja ilmaista rahaa niin helposti. Läksyttivät oikein kunnolla pientä miestä ja joutui poi
      Maailman menoa
      253
      950

    10. Tulee ikävä

      Ja toivon että saan anteeksi ❤️
      Ikävä
      71
      942
    Aihe
    TietosuojaselosteKäyttöehdotEvästeasetuksetSäännöt