Conas an stampa ama reatha a chur isteach nuair a athraíonn sonraí i gcill eile in Excel?
Má ghlactar leis go bhfaigheann tú bileog oibre a theastaíonn uait sonraí a mhodhnú i gcolún áirithe. Agus tar éis duit an bhileog oibre a mhodhnú, ní mór duit an stampa ama modhnaithe a chur isteach chun a chur in iúl do dhaoine eile cé na cealla a athraíodh. Conas déileáil leis? Taispeánfaidh an t-alt seo modh duit chun an stampa ama reatha a chur isteach nuair a athraíonn sonraí i gcill eile in Excel mar a thaispeántar thíos an pictiúr.
Cuir an stampa ama reatha isteach nuair a athraíonn sonraí i gcill eile le cód VBA
Cuir an stampa ama reatha isteach nuair a athraíonn sonraí i gcill eile le cód VBA
Mar a thaispeántar thíos an pictiúr, ní mór duit an stampa ama a chur i gcolún E má athraítear na cealla comhfhreagracha i gcolún C. Déan mar a leanas le do thoil.
1. Sa bhileog oibre is gá duit a mhodhnú agus a mharcáil le stampa ama, cliceáil ar dheis ar an táb bileog agus ansin cliceáil Féach an cód ón roghchlár cliceáil ar dheis.
2. Ansin cóipeáil agus greamaigh an cód VBA thíos sa cód fuinneog an Microsoft Visual Basic d’Fheidhmchláir fuinneog. Féach an pictiúr:
Cód VBA: Cuir isteach an stampa ama reatha nuair a athraíonn sonraí i gcill eile
Private Sub Worksheet_Change(ByVal Target As Range)
'Updated by Extendoffice 20180830
Dim xCellColumn As Integer
Dim xTimeColumn As Integer
Dim xRow, xCol As Integer
Dim xDPRg, xRg As Range
xCellColumn = 3
xTimeColumn = 5
xRow = Target.Row
xCol = Target.Column
If Target.Text <> "" Then
If xCol = xCellColumn Then
Cells(xRow, xTimeColumn) = Now()
Else
On Error Resume Next
Set xDPRg = Target.Dependents
For Each xRg In xDPRg
If xRg.Column = xCellColumn Then
Cells(xRg.Row, xTimeColumn) = Now()
End If
Next
End If
End If
End Sub
nótaí: Sa chód, ciallaíonn uimhir 3 go bhfuil tú chun sonraí i gcolún C a mhodhnú, agus léiríonn 5 go ndéanfar an stampa ama a dhaonra i gcolún E. Athraigh iad le do thoil bunaithe ar do chuid riachtanas.
3. Brúigh an Eile + Q eochracha chun an Microsoft Visual Basic d’Fheidhmchláir fhuinneog.
As seo amach, nuair a athrófar sonraí i gcolún C, déanfar an stampa ama a daonra i gcealla comhfhreagracha i gcolún E mar atá thíos an pictiúr a thaispeántar.
Leid. Piocálaí Dáta. An Dáta Ionsáigh fóntais de Kutools le haghaidh Excel cabhraíonn sé leat dáta le formáid dáta sonraithe a chur isteach i gcill roghnaithe go tapa.
Íoslódáil agus bain triail as anois! (trasáil saor in aisce 30 lá)
Earraí gaolmhara:
- Conas an stampa ama deireanach a sábháladh a chur isteach nó a thaispeáint ar an mbileog oibre in Excel?
- Conas an stampa ama a chur isteach i gcill ar leith nuair a reáchtáiltear macra in Excel?
Uirlisí Táirgiúlachta Oifige is Fearr
Supercharge Do Scileanna Excel le Kutools le haghaidh Excel, agus Éifeachtúlacht Taithí Cosúil Ná Roimhe. Kutools le haghaidh Excel Tairiscintí Níos mó ná 300 Ardghnéithe chun Táirgiúlacht a Treisiú agus Sábháil Am. Cliceáil anseo chun an ghné is mó a theastaíonn uait a fháil ...
Tugann Tab Oifige comhéadan Tabbed chuig Office, agus Déan Do Obair i bhfad Níos Éasca
- Cumasaigh eagarthóireacht agus léamh tabbed i Word, Excel, PowerPoint, Foilsitheoir, Rochtain, Visio agus Tionscadal.
- Oscail agus cruthaigh cáipéisí iolracha i gcluaisíní nua den fhuinneog chéanna, seachas i bhfuinneoga nua.
- Méadaíonn do tháirgiúlacht 50%, agus laghdaíonn sé na céadta cad a tharlaíonn nuair luch duit gach lá!