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

3218

Äänestä

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • kunde

      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

      • kunde
        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?

      • kunde

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

    Takaisin ylös

    Luetuimmat keskustelut

    1. Suomen kansa haluaa Antti Lindtmanista pääministerin

      Lindtman on miltei tuplasti suositumpi kuin etunimikaimansa Kaikkonen. Näin kertoo porvarimedian teettämä kysely. http
      Maailman menoa
      251
      4535

    2. Vain 21% kannattaa Lindtmania pääministeriksi

      se on selvästi vähemmän kuin puolueen kannatus, mites nyt noin?
      Maailman menoa
      127
      2971

    3. Miten löydän sinut

      Ja saan sanottua kaiken mitä haluan sinulle kertoa? Ja kuinka kuuntelisit minua sen hetken? Kuinka voin ilmaista sen mit
      Ikävä
      41
      2742

    4. Yöllinen autolla kaahari Heinolan seudulla

      Asukkaita häiriköivän nuoren herran autokaahaus keskustelu poistettu, onko jokin hyvävelijärjestelmä käytössä ?
      Heinola
      74
      1710

    5. Vaikea tilanne

      Hieman kolkuttaa omatuntoa, kun on osoittanut kiinnostusta väärää naista kohtaan. En ymmärrä miten toinen on voinut te
      Ikävä
      105
      1553

    6. Jouluksi miettimistä: kuka tai mikä valmistaa rahan?

      Nyt kun on ollut vääntöä rahasta ja eritoten sen vähyydestä, niin olisi syytä uida rahan alkulähteille, eli mistä se syn
      Maailman menoa
      20
      1451

    7. Milloin kaivatullasi

      .. on nimipäivä?
      Ikävä
      55
      1304

    8. Kehtaisitko näyttäytyä

      kaivattusi seurassa?
      Ikävä
      92
      1216

    9. Julkinen sektori on elänyt aivan liian leveästi yli varojensa!

      Viimeisen 15 vuoden aikana julkisen puolen palkat ovat nousseet n. 40%, kun taas yksitysellä sektorilla vain n. 20%. En
      Maailman menoa
      204
      1083

    10. Missä kunnassa kaivattusi asuu

      Kuinka tarkkaa uskalla sanoa?
      Ikävä
      47
      1075
    Aihe
    TietosuojaselosteKäyttöehdotEvästeasetuksetSäännöt