V tem članku je prikazano, kako v Excelu določiti časovni žig, ko se celica spremeni. Morda boste morali spremljati vnose podatkov v celice določenega stolpca. Za vnos podatkov ste na primer rezervirali stolpec B. Zdaj želite določiti časovni žig v sosednji celici v stolpcu C, ko se celica posodobi v stolpcu B. Ta članek vam bo pomagal to storiti na dva učinkovita načina.

Prenesi delovni zvezek za prakso

Praktični delovni zvezek lahko prenesete s spodnjega gumba za prenos.

2 načina za vstavljanje časovnega žiga v Excel, ko se celica spremeni

1. Uporaba funkcij IF, AND, NOW in drugih za vstavljanje časovnega žiga v Excel

Če želite ob spremembi celice dobiti časovni žig s pomočjo formul, sledite spodnjim korakom.

📌 Koraki

• Prvi tisk ALT+F+T da odprete Možnosti programa Excel . Nato pojdite v Formule Nato preverite zavihek Omogočanje iterativnega izračuna Nato nastavite potrditveno polje Največje število iteracij na 1. Nato kliknite V redu.

• Zdaj v celico vnesite naslednjo formulo C5 . Nato povlecite Ročaj za polnjenje in kopirajte formulo v spodnje celice.

• Nato v celico vnesite naslednjo formulo D5 . Nato povlecite Ročaj za polnjenje v spodnje celice kot prej.

• Zdaj začnite vnašati vrednosti v celice v stolpec B . Po tem boste dobili naslednji rezultat. Tukaj, stolpec D je pomožni stolpec. Skrijete ga lahko tako, da po izbiri stolpca kliknete z desno tipko miške.

• V celico lahko vnesete tudi naslednjo formulo C5 da bi dobili enak rezultat.

• Morda boste morali spremeniti oblikovanje celic v stolpec C . Stolpec izberete tako, da kliknete številko stolpca na vrhu. CTRL+1 da odprete Oblikovanje celic pogovorno okno. Zdaj kliknite na Po meri Nato vnesite d-mmm-yyyy hh:mm:ss AM/PM v Tip na koncu kliknite OK.

Razčlenitev formule:

Formula v celici C5:

➤ IF(B5="","",C5))

Spletna stran Funkcija IF ne vrne ničesar, če je celica B5 je prazna. V nasprotnem primeru vrne isto vrednost, shranjeno v C5 .

➤ NOW()

Spletna stran Funkcija NOW vrne trenutni datum in čas.

➤ IN(B5"",D5B5)

Spletna stran Funkcija AND vrne TRUE če sta oba argumenta resnična, tj. celica B5 ni prazna in . celice B5 in . D5 nimajo enake vrednosti.

➤ IF(AND(B5"",D5B5),NOW(),IF(B5="","",C5))

Če je Funkcija AND vrne TRUE , potem je Funkcija IF vrne trenutni datum in čas, pridobljena iz Funkcija NOW . V nasprotnem primeru vrne rezultat, pridobljen iz argumenta, ki vsebuje Funkcija IF .

Formula v celici D5:

➤ ISNUMBER(D5)

Spletna stran Funkcija ISNUMBER vrne TRUE če je celica D5 vsebuje število. V nasprotnem primeru vrne Lažno .

➤ IN(ISNUMBER(D5),B5=D5)

Spletna stran Funkcija AND vrne TRUE če je celica D5 vsebuje številko in celice B5 in . D5 imajo enako vrednost. FALSE v nasprotnem primeru.

➤ OR(C5="",AND(ISNUMBER(D5),B5=D5))

Spletna stran Funkcija ALI vrne TRUE če je kateri koli od argumentov resničen, tj. celica C5 je prazna ali pa je Funkcija AND vrne TRUE . Vrača se FALSE če so vsi argumenti napačni.

➤ IF(OR(C5="",AND(ISNUMBER(D5),B5=D5)),D5,B5)

Spletna stran Funkcija IF vrne isto vrednost, shranjeno v celici D5 če je Funkcija ALI vrne TRUE . V nasprotnem primeru vrne vrednost celice B5 .

➤ IF(B5="","",IF(OR(C5="",AND(ISNUMBER(D5)),B5=D5)),D5,B5)))

Spletna stran Funkcija IF ne vrne ničesar, če je celica B5 je prazen. V nasprotnem primeru vrne rezultat, pridobljen iz argumenta, ki vsebuje Funkcija IF .

Preberite več: Kako vstaviti Excelov časovni žig, ko se celica spremeni brez VBA (3 načini)

Podobna branja

• Kako vstaviti statični datum v Excel (4 preproste metode)
• Excel VBA: Vstavljanje časovnega žiga ob zagonu makra
• Kako vstaviti datumski žig Excel, ko so spremenjene celice v vrstici
• Pretvarjanje časovnega žiga Unix v datum v Excelu (3 metode)

2. Uporabite kodo VBA za vstavljanje časovnega žiga v Excel, ko se celica spremeni

Časovni žig v Excelu lahko dobite tudi, ko se celica spremeni z uporabo VBA. Če želite to narediti, sledite spodnjim korakom.

📌 Koraki

• Najprej desno kliknite na zavihek ciljnega delovnega lista. Nato izberite Prikaži kodo To bo odprlo modul kode za ta delovni list.

• Nato z gumbom za kopiranje v zgornjem desnem kotu kopirajte naslednjo kodo.

 Private Sub Worksheet_Change(ByVal Target As Range) Dim CellCol, TimeCol, Row, Col As Integer Dim DpRng, Rng As Range CellCol = 2 TimeCol = 3 Row = Target.Row Col = Target.Column If Row <= 4 Then Exit Sub Timestamp = Format(Now, "DD-MM-YYYY HH:MM:SS AM/PM") If Target.Text "" Then If Col = CellCol Then Cells(Row, TimeCol) = Timestamp Else On Error Resume Next Set DpRng = Target.Dependents ForVsak Rng v DpRng Če Rng.Column = CellCol Potem Cells(Rng.Row, TimeCol) = Časovni žig Konec Če Naslednji Konec Če Konec Če Konec Če Konec Sub 

• Nato kopirano kodo prilepite na prazen modul, kot je prikazano spodaj.

• Nato dokument shranite kot Delovni zvezek z omogočenimi makri . Zdaj začnite vnašati podatke v celice v stolpcu B. Dobili boste enake rezultate kot prej.

Razlaga kode VBA:

Zasebni Sub Worksheet_Change (ByVal Target As Range)

Dim CellCol, TimeCol, Row, Col kot Integer

Dim DpRng, Rng kot območje

Razglasitev potrebnih spremenljivk.

CellCol = 2

Stolpec za vnos podatkov.

TimeCol = 3

Stolpec Časovni žig.

Vrstica = Target.Row

Col = Target.Column

Shranjevanje številk vrstic in stolpcev izbrane celice.

Če vrstica <= 4 Potem Exit Sub

Vse spremembe v zgornjih 4 vrsticah ne ustvarijo časovnega žiga.

Časovni žig = Format(Now, "DD-MM-YYYYY HH:MM:SS AM/PM")

Časovni žig bo oblikovan na ta način. Spremenite ga po potrebi.

Če Target.Text "" Potem

Če Col = CellCol Potem

Cells(Row, TimeCol) = Časovni žig

Ustvari časovni žig, če je izbrana celica prazna.

Ob napaki Nadaljuj naslednji

Če se pojavi napaka, se ta ne upošteva.

Set DpRng = Target.Dependents

Za vsak Rng v DpRng

Če Rng.Column = CellCol Potem

Cells(Rng.Row, TimeCol) = Časovni žig

Ustvarite časovne žige za območje celic, če niso prazne.

Preberite več: Kako samodejno vstaviti podatke o časovnem žigu v Excel (5 metod)

Stvari, ki si jih je treba zapomniti

• Za pravilno oblikovan časovni žig morate za celice v stolpcu B uporabiti obliko po meri.
• Nadomestna formula deluje le, če so podatki vneseni v prazne celice.
• Tukaj sta vnos podatkov in stolpec časovnega žiga trdno kodirana v kodi VBA. Kodo morate spremeniti glede na svoj nabor podatkov.

Zaključek

Zdaj veste, kako v Excelu označiti časovni žig, ko se celica spremeni. Imate še kakšna vprašanja ali predloge? Za to uporabite spodnji razdelek za komentarje. Obiščete lahko tudi našo ExcelWIKI blog, da bi raziskali več o Excelu. Bodite z nami in se še naprej učite.