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

573

    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. Kuhmossa rallit alkoi ennen aikojaan

      Paettiin polliisia törkeästi? Se tuo rallikiima on näemmä saavuttanu paikalliset tommi mäkiset kiljupäissään auton rat
      Kuhmo
      33
      1309
    2. Kaste tulisi tehdä apostolisella tavalla Ap. t. 2:38 mukaan

      Apostolit eivät kastaneet kolminaisuuden nimellä vaan Jeesuksen alkuperäisen käskyn mukaisesti: Ap. t. 2:38 Niin Pietar
      Kaste
      69
      1095
    3. Tuleeko tästä

      Enää mitään. Voiko mitään enää korjata?
      Ikävä
      105
      945
    4. 41000 kavallettu rahaa

      uutisoi Kaleva ja iltasanomat vuosina 2020-2022 välisenä aikana hävinnyt toi summa tuomittu nainen 1971 syntynyt.
      Pyhäjärvi
      42
      889
    5. Mitä muutoksia tekisit

      kaivatullesi? Miten on? Muista olla REHELLINEN 📸
      Ikävä
      63
      741
    6. Kerro minulle

      Miksi teit niinkuin teit? Miksi kielsit tunteesi minua kohtaan. Miksi et halunnut että tiedän oikeasti mitä tunnet. Etkö
      Ikävä
      56
      739
    7. Tietäisitpä vain mitä se

      yksikin on susta puhunut :) j
      Ikävä
      42
      726
    8. Fantasioista

      Suurimmalla osalla meistä on jonkinlaisia eroottisia fantasioita. Miten sinä suhtaudut fantasioihin? Ruokitko niitä vai
      Sinkut
      94
      672
    9. Se riisuu suosimasi paatoksen, paljastaa egosi tyhjäksi

      Idän fisosofian vihaaja kirjoitti: "Muuten tämä idän-uskontojen mekaniikka hävitää ja hautaa tästä kaiken hyvän paatoks
      Hindulaisuus
      302
      666
    10. Olet sinä ihana

      Muttei sua taida kiinnostaa muu kuin sun työ:(
      Ikävä
      29
      645
    Aihe