Tartalomjegyzék
Ez a cikk bemutatja, hogyan lehet az excelben időbélyegezni, amikor egy cella megváltozik. Előfordulhat, hogy nyomon kell követnie egy adott oszlop celláiban lévő adatbevitelt. Például a B oszlopot lefoglalta adatbevitelre. Most azt szeretné, hogy a C oszlopban lévő szomszédos cellában lévő időbélyegzőt akkor kapja meg, amikor a B oszlopban lévő cella frissül. Ez a cikk 2 hatékony módon segít ebben.
Gyakorlati munkafüzet letöltése
A gyakorlati munkafüzetet az alábbi letöltés gombra kattintva töltheti le.
Időbélyegző Excel.xlsm-ben2 mód az időbélyegző beillesztésére az Excelben, amikor a cella megváltozik
1. Használja az IF, AND, NOW és egyéb funkciókat az időbélyegző beillesztéséhez az Excelben
Kövesse az alábbi lépéseket, hogy képletek segítségével kapjon időbélyeget, amikor egy cella megváltozik.
📌 Lépések
- Első sajtó ALT+F+T kinyitni Excel lehetőségek . Akkor menj a Képletek Ezután ellenőrizze a Iteratív számítás engedélyezése jelölőnégyzetet. Ezután állítsa be a Maximális ismétlések 1-re. Ezután kattintson az OK gombra.
- Most írja be a következő képletet a cellába C5 Ezután húzza a Töltse ki a fogantyút ikonnal másolja a képletet az alábbi cellákba.
=IF(AND(B5"",D5B5),NOW(),IF(B5="","",C5))
- Ezután írja be a következő képletet a cellába D5 . Ezután húzza a Töltse ki a fogantyút ikont az alábbi cellákhoz, mint korábban.
=IF(B5="","",IF(OR(C5="",AND(ISNUMBER(D5),B5=D5)),D5,B5))
- Most kezdje el beírni az értékeket a cellákba a B oszlop Ezután a következő eredményt kapja. Itt, D oszlop egy segédoszlop, amelyet az oszlop kijelölése után jobb gombbal kattintva elrejthet.
- Alternatívaként egyszerűen csak a következő képletet írja be a cellába C5 hogy ugyanazt az eredményt kapjuk.
=IF(B5"",IF(C5="",NOW(),C5),"")
- Előfordulhat, hogy meg kell változtatnia a cellák formázását a C oszlop Válassza ki az oszlopot a felső oszlopszámra kattintva. Ezután nyomja meg a CTRL+1 a Cellák formázása párbeszédpanel. Most kattintson a Custom szám formátum. Ezután írja be d-mmm-yyyy hh:mm:ss AM/PM a Típus Végül kattintson az OK gombra.
Formula bontás:
Képlet a C5 cellában:
➤ IF(B5="","",C5)))
A IF funkció nem ad vissza semmit, ha a cella B5 üres. Ellenkező esetben ugyanazt az értéket adja vissza, mint amit a C5 .
➤ NOW()
A NOW funkció az aktuális dátumot és időt adja vissza.
➤ AND(B5"",D5B5)
A AND funkció visszatér TRUE ha mindkét argumentum igaz, azaz a cella B5 nem üres és sejtek B5 és D5 nem azonos értékűek.
➤ IF(AND(B5"",D5B5),NOW(),IF(B5="","",C5))
Ha a AND funkció visszatér TRUE , akkor a IF funkció visszaadja az aktuális dátumot és időt, amelyet a NOW funkció Ellenkező esetben az eredményt adja vissza, amelyet a IF funkció .
Képlet a D5 cellában:
➤ ISNUMBER(D5)
A ISNUMBER funkció visszatér TRUE if cell D5 tartalmaz egy számot. Ellenkező esetben visszaadja a Hamis .
➤ AND(ISNUMBER(D5),B5=D5)
A AND funkció visszatér TRUE if cell D5 tartalmaz egy számot és cellákat B5 és D5 azonos értékkel rendelkezik. Visszaadja a FALSE egyébként.
➤ OR(C5="",AND(ISNUMBER(D5),B5=D5))
A VAGY funkció visszatér TRUE ha bármelyik argumentum igaz, azaz a cellák közül bármelyik igaz. C5 üres vagy a AND funkció visszatér TRUE . Visszatér FALSE ha az összes argumentum hamis.
➤ IF(OR(C5="",AND(ISNUMBER(D5),B5=D5))),D5,B5)
A IF funkció ugyanazt az értéket adja vissza, amit a cellában D5 ha a VAGY funkció visszatér TRUE Ellenkező esetben a cellák értékét adja vissza. B5 .
➤ IF(B5="","",IF(OR(C5="",AND(ISNUMBER(D5),B5=D5))),D5,B5)))
A IF funkció nem ad vissza semmit, ha a cella B5 üres, ellenkező esetben a következő argumentummal kapott eredményt adja vissza. IF funkció .
További információ: Hogyan illesszük be az Excel időbélyegzőt, amikor a cella VBA nélkül változik (3 mód)
Hasonló olvasmányok
- Statikus dátum beillesztése az Excelben (4 egyszerű módszer)
- Excel VBA: Időbélyeg beillesztése makró futtatásakor
- Hogyan kell beszúrni az Excel dátumbélyeget, amikor a sorban lévő cellákat módosítják
- Unix időbélyegző átalakítása dátumra Excelben (3 módszer)
2. Alkalmazza a VBA-kódot az időbélyegző beillesztésére az Excelben, amikor a cella megváltozik
Az Excelben is kaphat időbélyeget, amikor egy cella megváltozik a VBA segítségével. Kövesse az alábbi lépéseket, hogy ezt megtehesse.
📌 Lépések
- Először kattintson a jobb gombbal a célmunkalap lapjára. Ezután válassza a Kód megtekintése Ez megnyitja az adott munkalap kódmodulját.
- Ezután a jobb felső sarokban található másolás gomb segítségével másolja ki a következő kódot.
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 For.Each Rng In DpRng If Rng.Column = CellCol Then Cells(Rng.Row, TimeCol) = Timestamp End If Next End If End If End If End Sub
- Ezután illessze be a másolt kódot az üres modulba az alábbiakban látható módon.
- Ezután mentsük el a dokumentumot makroképes munkafüzet Most kezdje el az adatok bevitelét a B oszlop celláiba.
VBA kód magyarázat:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim CellCol, TimeCol, Row, Col As Integer
Dim DpRng, Rng As Range
A szükséges változók deklarálása.
CellCol = 2
Adatbeviteli oszlop.
TimeCol = 3
Időbélyeg oszlop.
Row = Target.Row
Col = Target.Column
A kijelölt cella sor- és oszlopszámának tárolása.
If Row <= 4 Then Exit Sub
A felső 4 soron belüli bármilyen változás nem hoz létre időbélyeget.
Időbélyeg = Format(Now, "DD-MM-YYYY HH:MM:SS AM/PM")
Az időbélyegző így lesz formázva. Módosítsa szükség szerint.
If Target.Text "" Then
If Col = CellCol Then
Cells(Row, TimeCol) = időbélyegző
Időbélyegző létrehozása, ha a kijelölt cella üres.
Hiba esetén Folytassa tovább
Figyelmen kívül hagy minden hibát, ha bekövetkezik.
Set DpRng = Target.Dependents
For Each Rng In DpRng
Ha Rng.Column = CellCol Then
Cells(Rng.Row, TimeCol) = időbélyegző
Időbélyegzők létrehozása egy cellatartományhoz, ha nem üres.
További információ: Hogyan lehet automatikusan beilleszteni az időbélyegző adatbevitelt az Excelben (5 módszer)
Emlékezetes dolgok
- Egyéni formátumot kell használnia a B oszlop celláihoz, hogy megfelelően formázott időbélyeget kapjon.
- Az alternatív képlet csak akkor működik, ha az adatokat üres cellákba írja be.
- Itt az adatbevitel és az időbélyeg oszlop a VBA kódban keményen kódolva van. A kódot az Ön adatállománya alapján kell módosítania.
Következtetés
Most már tudja, hogyan kell időbélyegezni az excelben, amikor egy cella megváltozik. Van további kérdése vagy javaslata? Kérjük, használja az alábbi megjegyzés rovatot. Ön is látogasson el a mi ExcelWIKI blog, hogy többet tudjon meg az excelről. Maradjon velünk és tanuljon tovább.