Automaattinen päivämäärä?

Päivämäärä ongelma

Onko Exelissä mahdollista luoda kaavaa joka lisäisi soluun päivämäärän (ja ehkä myös ajan) sillä hetkellä kun syötän tietoja tyhjään soluun ja tuo päivämäärä jäisi siihen.

Yritin näin, mutta tuo NYT funktiohan muuttuu sitä mukaan kun kello käy, joten se ei käy.
=JOS(a2="";"";NYT())

6

3289

    Vastaukset 6

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • tietämättä tarpeitasi tossa alla yleisluontoinen esim.
      eli tsekataan A2 solua ja kun soluun syötetään arvo, niin soluun B2 tulee kellonaika. Tee soluun B2 sopiva solumuotoilu.
      Solun B2 arvo ei muutu, vaikka muut solut muuttusivatkin toisin kuin noilla volatile eli ei pysyvillä Excelin omilla funktioilla.
      Solun B2 arvo muuttuu vain siinä tapauksessa, kun solu A2 on tyhjennetty ja uudelleen syötetään arvo siihen

      taulukon moduuliin...

      Private Sub Worksheet_Change(ByVal Target As Range)
      If Not Intersect(Range("A2"), Target) Is Nothing Then
      If Not Range("A2") = "" Then
      Range("B2") = Now()
      End If
      End If
      End Sub

      Keep EXCELing
      @Kunde

      • Päivämäärä ongelma

        Juuri tuollaista etsinki. Tuo koodin kirjoittaminen ei ole ollenkaan tuttua, mutta sain toimimaan.

        Saanko tuota koodia jotenkin muokkaamalla saman toiminnon myös muihin ruutuihin.
        - Eli siis jos syötän soluihin A1-A200 jotain niin soluihin B1-B200 tulee tuo päivämäärä ja aika
        - Ja tarkoitan siis, että sitä mukaan kun soluihin noita tietoja tulee


      • Päivämäärä ongelma kirjoitti:

        Juuri tuollaista etsinki. Tuo koodin kirjoittaminen ei ole ollenkaan tuttua, mutta sain toimimaan.

        Saanko tuota koodia jotenkin muokkaamalla saman toiminnon myös muihin ruutuihin.
        - Eli siis jos syötän soluihin A1-A200 jotain niin soluihin B1-B200 tulee tuo päivämäärä ja aika
        - Ja tarkoitan siis, että sitä mukaan kun soluihin noita tietoja tulee

        lisäsin malliksi aikamuotoilun, jota on helppo muotoilla...

        Private Sub Worksheet_Change(ByVal Target As Range)
        On Error Resume Next
        If Not Intersect(Range("A1:A200"), Target) Is Nothing Then
        If Not Target = "" Then
        Target.Offset(0, 1) = Format(Now(), "dd.mm.yyyy hh:mm:ss")
        End If
        End If
        End Sub


    • digipikseli

      Jos haluat muuttaa esim täytettväksi ruuduiksi F sarakkeen solut - muuta kohtaa Target.Offset(0, 1) -> Target.Offset(0, 5)

      eli 5 siirtää täytettävää solua oikealle F sarakkeeseen :))

      lisäsin kun itse pähkäilin moista :)

    • Jeppuliii

      Liittyen samaan aiheeseen: Saako tiettyyn soluun päivämäärän sen mukaan koska excel sivu on avattu? Eli jos avaan sen tänään ja alan täyttään ni se lyös määriteltyyn soluun automaattisesti tämän päiväisen päivämäärän?

      • ko. taulukon moduuliin(jompi kumpi ei molempia).,,,

        jos taulukko aktivoidaan niin silloin päiväys kirjoitetaan (ei päivity jos taulukko on aktiivinen ja tallennat sen ja avaat uudelleen huomenna niin sama päiväys(eli vaatii avauksessa jonkun tietyn sivun aktivoimisen aluksi(pääsivu)...)
        Private Sub Worksheet_Activate()
        Range("C1") = Date
        End Sub

        tai jos haluat, että kun muutoksia tehdään

        Private Sub Worksheet_Change(ByVal Target As Range)
        Range("C1") = Date
        End Sub


        Keep EXCELing
        @Kunde


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

    Luetuimmat keskustelut

    1. Mikä sun salaisuus on,kun näytät niin nuorelta..

      Vaikka oot jo noin vanha!?
      Ikävä
      122
      1506
    2. MiltäKaivattusi

      Näyttää? !
      Ikävä
      50
      970
    3. Perhoseni (miehelle)

      Miksi et usko, että mun rakkaus sinuun on aitoa ja vilpitöntä? Tai että se oli jo silloin? Miksi ajattelet, ettet ole r
      Ikävä
      148
      780
    4. Myönnetään, tunnen lämpimiä tunteita kohtaasi

      Vaikutat tosin liian hyvältä ollaksesi totta. Komeita miehiä on maailma pullollaan mutta sinussa on jotain.....
      Ikävä
      50
      746
    5. Mitä meidän välillämme

      On käynyt näiden vuosien aikana?
      Ikävä
      70
      676
    6. Uskaltaisitko

      Tavata kaivattusi tässä tilanteessa?
      Ikävä
      67
      626
    7. Olen tavattavissa

      tänään klo 17-02 siinä ravintolassa. Tulethan sinäkin?
      Ikävä
      53
      617
    8. Halaus juuri sinulle

      Kaikki järjestyy kyllä. Luota vain. ❤️🫶
      Ikävä
      59
      596
    9. Onko Sofia jälleen jätetty?

      Moni asia viittaisi siihen, että hän on jälleen sinkku.
      Kotimaiset julkkisjuorut
      123
      563
    10. Rekat seisovat dieselin hinnan takia . Ala ei kestä tällaista hintatasoa, sanoo yrittäjä .

      EU:n kallein diesel on kova paikka kuljetusalalle. Ajoja on jätetty ajamatta kannattavuus­ongelmien vuoksi, sanoo alan e
      Kajaani
      119
      535
    11. Mies, näetkö minut myös

      Seksuaalisena ihmisenä ja naisena? Haluatko minua seksuaalisesti? Vai olenko mielestäsi tyttönen?
      Ikävä
      20
      510
    12. Kuka se on

      Kuhmon komein aikamies?
      Kuhmo
      5
      488
    13. Voiko se ikinä toimia

      Voiko meistä ikinä tulla mitään? Näin kauan aikaa on kulunut ja mitään ei tapahdu... En usko, että sinä mietit minua het
      Ikävä
      32
      488
    14. Meneekö unohtamis

      Projektisi hyvin??
      Ikävä
      34
      487
    15. Voin tulla

      Sisustamaan sulle 🤭
      Ikävä
      55
      478
    16. Nainen, mitä mieltä olet kodittomista?

      Ja heistä jotka eivät kykene huolehtimaan asioistaan, itsestään eikä terveydestään? Miten heidän kanssaan tulisi toimia?
      Ikävä
      118
      476
    17. Uskallatko paljastaa

      Millä nimellä löydyn puhelimestasi?
      Ikävä
      49
      457
    18. Mitä jos...

      Susta tykätään poikana enemmän, kun tyttönä? Miten asian käsittelet tai otat tiedon vastaan? T nainen gubetellija herät
      Sinkut
      142
      453
    19. Kuollut teini Kajaanissa

      Kuulemma sellaista huhua liikkeessä?
      Kajaani
      4
      429
    20. Totta on asia. Jeffrey Cohen on jättänyt Sofian.

      Vaimon viesti on paljastanut totuuden.
      Kotimaiset julkkisjuorut
      134
      420
    Aihe