Rychle a automaticky vložte datum a časové razítko do aplikace Excel
V aplikaci Excel je vložení data a časového razítka běžnou operací. Tady v tomto tutoriálu představím několik metod ručního nebo automatického vložení data a časového razítka do buněk aplikace Excel poskytnutím různých případů.
Vložte datum a časové razítko pomocí zkratek
Vložte datum a časové razítko se vzorcem
Vzorec pro automatické vložení časového razítka při zadávání dat do jiného sloupce
VBA pro automatické vložení časového razítka při zadávání dat do jiného sloupce
Pokud potřebujete pouze vložit datum a časové razítko do několika buněk, můžete je vložit ručně stisknutím klávesových zkratek.
Vložte aktuální datum: ovládání + :
Vložit aktuální čas: směna + ovládání + :
Viz obrázek:
Tip:
1. Výstupy můžete podle potřeby formátovat jako formáty data nebo času Formát buněk dialog.
2. Pokud máte Kutools pro Excel, můžete vložit aktuální datum nebo jiná data ve specifikovaném formátu data podle potřeby Vložte datum funkce. Kliknutím stáhněte zdarma
Pokud chcete vložit datum nebo časové razítko, které se může automaticky aktualizovat, můžete použít níže uvedené vzorce.
Vložte aktuální datum
= DNES ()
Stisknout vstoupit klíč a do buňky je vloženo aktuální datum.
Vložit aktuální čas :
= NYNÍ ()
Stiskněte klávesu Enter a do buňky se vloží aktuální datum a čas.
Tip:
1. Výstupy můžete podle potřeby formátovat jako formáty data nebo času Formát buněk dialog. Například chcete zobrazit pouze aktuální čas, po použití tlačítka naformátujte buňku jako Čas = NYNÍ () vzorec
2. Pokud chcete vložit aktuální datum a čas do záhlaví nebo zápatí listu, můžete použít Vložte informace o sešitu funkce Kutools pro Excel rychle zvládnout tuto práci. Kliknutím stáhněte zdarma
Předpokládejme, že existují dva sloupce, sloupec A a sloupec B, nyní chcete vložit aktuální časové razítko do sloupce B při zadávání dat do sloupce A, jak to můžete udělat?
Automatické vkládání časového razítka při zadávání dat
1. Nejprve klikněte na Soubor > možnosti k otevření Možnosti aplikace Excel dialog, zvolte Vzorce v levém podokně a poté zkontrolujte Povolit iterativní výpočet in Možnosti výpočtu skupina. A klikněte OK.
2. Do sloupce B, například do buňky B1, zadejte tento vzorec
= IF (A1 <> "", IF (B1 <> "", B1, NOW ()), "")
potom přetáhněte úchyt automatického vyplňování dolů do buněk.
3. Poté naformátujte buňky vzorce jako formát datetime, jak potřebujete v souboru Formát buněk dialog: ponechte vybrané buňky vzorce, kliknutím pravým tlačítkem zobrazte místní nabídku, zvolte Formát buněk, pak Formát buněk objeví se dialogové okno v Zvyk část, která pod Číslo na kartu, zadejte požadovaný formát na Styl textové pole a klikněte na OK.
Nyní, když zadáte data do sloupce A, bude aktuální datetime vložen do sloupce B.
Automatické vkládání a aktualizace časového razítka, zatímco buňky se mění v jiném sloupci
Pokud chcete automaticky vložit časové razítko při zadávání buněk a zároveň se při změně záznamu aktualizuje vložené časové razítko, můžete použít následující vzorec:
=IF(A1<>"",IF(AND(B1<>"",CELL("address")=ADDRESS(ROW(A1),COLUMN(A1))),NOW(),IF(CELL("address")<>ADDRESS(ROW(A1),COLUMN(A1)),B1,NOW())),"")
A1 je buňka, do které zadáte data, B1 je buňka vzorce, do které chcete vložit časové razítko.
Přetáhněte úchyt automatického vyplňování dolů do buněk, které používáte.
Poté naformátujte buňky vzorce jako formát datetime podle potřeby v souboru Formát buněk dialog: ponechte vybrané buňky vzorce, kliknutím pravým tlačítkem zobrazte místní nabídku, zvolte Formát buněk, pak Formát buněk objeví se dialogové okno v Zvyk část, která pod Číslo na kartu, zadejte požadovaný formát na Styl textové pole, klikněte OK.
Pokud znáte kód VBA, můžete postupovat takto:
1. Klikněte pravým tlačítkem na kartu listu, kterou používáte, a poté vyberte Zobrazit kód z kontextové nabídky.
2. Pak v Microsoft Visual Basic pro aplikace okno, vložte pod kód.
VBA: Automatické vložení časového razítka
Private Sub Worksheet_Change(ByVal Target As Range)
'UpdatebyKutools20190919
Dim xRInt As Integer
Dim xDStr As String
Dim xFStr As String
On Error Resume Next
xDStr = "A" 'Data Column
xFStr = "B" 'Timstamp Column
If (Not Application.Intersect(Me.Range(xDStr & ":" & xDStr), Target) Is Nothing) Then
xRInt = Target.Row
Me.Range(xFStr & xRInt) = Format(Now(), "mm/dd/yyyy hh:mm:ss")
End If
End Sub
3. Poté tento kód uložte. Od této chvíle, pokud zadáte data nebo změníte data ve sloupci A, bude nové časové razítko vloženo do sloupce B.
Poznámka: můžete změnit sloupec A a B a formát času mm / dd / rrrr hh: mm: ss v kódu VBA tak, aby odpovídaly vaší skutečné potřebě.
Chcete-li použít definovanou funkci, můžete postupovat takto:
1. Držet Alt + F11 klávesy pro povolení Microsoft Visual Basic pro aplikace okno. A klikněte Vložit > Modul vložit prázdný modul.
2. Vložte pod nový kód do nového modulu. Poté kód uložte a vraťte se zpět do listu.
Function FormatDate(xRg As Range)
'UpdatebyKutools20190919
On Error GoTo Err_01
If xRg.Value <> "" Then
FormatDate = Format(Now, "mm/dd/yyyy hh:mm:ss")
Else
FormatDate = ""
End If
Exit Function
Err_01:
FormatDate = "Error"
End Function
3. Do buňky, do které se vloží časové razítko, zadejte tento vzorec
= FormatDate (F1)
F1 je buňka, do které zadáte data nebo data změníte. Poté přetáhněte úchyt automatického vyplňování dolů do buněk.
Nyní bude vložen aktuální datetime, pokud buňka F1 zadala data nebo byla aktualizována.
Převést datum uložené jako text na datum v aplikaci Excel
Když zkopírujete nebo importujete data z jiných zdrojů dat do buňky aplikace Excel, může se stát, že se datum zformátuje a uloží jako text. A zde představuji triky, jak převést tato data uložená jako texty na standardní data v aplikaci Excel.
Přidejte / odečtěte půl roku / měsíce / hodiny k datu nebo času v aplikaci Excel
V naší každodenní práci s Excelem je obvyklé přidávat rok, měsíc nebo hodinu k datu nebo času. Zkoušeli jste někdy přidat k datu nebo času půl roku, měsíce nebo hodiny? Zde představuji triky, jak s touto prací zacházet.
Průměrné časové značky dne v aplikaci Excel
Například jste zaznamenali časová razítka pro přihlášení pokaždé, když konkrétní uživatel přistupoval na web v aplikaci Excel, a nyní chcete průměrovat tato časová razítka pro předpovídání nejpravděpodobnějšího času, kdy tito uživatelé na web v budoucnu vstoupí, jak byste to mohli udělat ?
Výpočet hodin mezi časy po půlnoci v aplikaci Excel
Předpokládejme, že máte časový rozvrh pro zaznamenávání svého pracovního času, čas ve sloupci A je počáteční čas dneška a čas ve sloupci B je čas konce následujícího dne. Normálně, pokud vypočítáte časový rozdíl mezi dvěma časy přímo mínus "= B2-A2", nezobrazí se správný výsledek
Nejlepší kancelářské nástroje produktivity
Kutools pro Excel řeší většinu vašich problémů a zvyšuje vaši produktivitu o 80%
- Super Formula Bar (snadno upravit více řádků textu a vzorce); Rozložení pro čtení (snadno číst a upravovat velké množství buněk); Vložit do filtrovaného rozsahu...
- Sloučit buňky / řádky / sloupce a uchovávání údajů; Rozdělit obsah buněk; Zkombinujte duplicitní řádky a součet / průměr... Zabraňte duplicitním buňkám; Porovnat rozsahy...
- Vyberte možnost Duplikovat nebo Jedinečný Řádky; Vyberte prázdné řádky (všechny buňky jsou prázdné); Super hledání a fuzzy hledání v mnoha sešitech; Náhodný výběr ...
- Přesná kopie Více buněk beze změny odkazu na vzorec; Automaticky vytvářet reference do více listů; Vložte odrážky, Zaškrtávací políčka a další ...
- Oblíbené a rychlé vkládání vzorců„Rozsahy, grafy a obrázky; Šifrovat buňky s heslem; Vytvořte seznam adresátů a posílat e-maily ...
- Extrahujte text, Přidat text, Odebrat podle pozice, Odebrat mezeru; Vytváření a tisk mezisoučtů stránkování; Převod mezi obsahem buněk a komentáři...
- Super filtr (uložit a použít schémata filtrů na jiné listy); Rozšířené řazení podle měsíce / týdne / dne, frekvence a dalších; Speciální filtr tučnou kurzívou ...
- Kombinujte sešity a pracovní listy; Sloučit tabulky na základě klíčových sloupců; Rozdělte data do více listů; Dávkový převod xls, xlsx a PDF...
- Seskupování kontingenčních tabulek podle číslo týdne, den v týdnu a další ... Zobrazit odemčené, zamčené buňky různými barvami; Zvýrazněte buňky, které mají vzorec / název...
- Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
- Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
- Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!