Skip to main content

Conas monatóireacht a dhéanamh ar athruithe cille in Excel?

Conas a d’fhéadfá monatóireacht a dhéanamh ar chealla bileog oibre má athraítear na sonraí in Excel? D’fhéadfadh sé seo cabhrú leat na cealla athraithe a aithint chomh tapa agus is féidir leat. An t-alt seo, labhróidh mé faoi roinnt modhanna suimiúla chun déileáil leis an tasc seo in Excel.

Monatóireacht a dhéanamh ar athruithe cille in Excel le feidhm Track Changes

Monatóireacht a dhéanamh ar athruithe cille in Excel le cód VBA


mboilgeog cheart gorm saighead Monatóireacht a dhéanamh ar athruithe cille in Excel le feidhm Track Changes

Tá úsáideach ag Excel Athruithe ar Rianta gné, is féidir leis cabhrú leat na cealla athraithe a mharcáil, déan mar a leanas le do thoil:

1. Cliceáil Athbhreithniú > Athruithe ar Rianta > Athruithe Aibhsigh, féach ar an scáileán:

monatóireacht ar athruithe doc 1

2. Sa an Athruithe Aibhsigh bosca dialóige, déan na hoibríochtaí seo a leanas:

(1.) Seiceáil Athruithe a rianú agus tú ag eagarthóireacht. Roinneann sé seo do leabhar oibre freisin.

(2.) Faoin Aibhsigh a athraíonn , sonraigh an mhír Cathain, Cé, agus Cá háit a theastaíonn uait.

(3.) Faoi dheireadh, seiceáil Aibhsigh athruithe ar an scáileán rogha.

monatóireacht ar athruithe doc 2

3. Tar éis na socruithe a chríochnú, cliceáil OK cnaipe, anois, nuair a athraíonn tú aon luachanna cille sna cealla sonraithe, tá teorainn le deilbhín triantánach thart ar na cealla athraithe, féach an scáileán:

monatóireacht ar athruithe doc 3

nótaí: Leis an modh seo, beidh do leabhar oibre ina leabhar oibre roinnte.


mboilgeog cheart gorm saighead Monatóireacht a dhéanamh ar athruithe cille in Excel le cód VBA

Is féidir leis an gcód VBA seo a leanas cabhrú leat monatóireacht a dhéanamh ar luachanna cille nuair a athraítear iad, déan mar seo le do thoil:

1. Cliceáil ar dheis ar an táb bileog ar mhaith leat monatóireacht a dhéanamh ar athruithe cille, agus roghnaigh Féach an cód ón roghchlár comhthéacs, san oscailt Microsoft Visual Basic d’Fheidhmchláir fuinneog, cóipeáil agus greamaigh an cód VBA seo a leanas sa Mhodúl:

Cód VBA: Monatóireacht a dhéanamh ar athruithe cille i mbileog oibre Excel:

Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice 20160728
    Dim xrng As Range
    Set xrng = Range("A1:E7")
    If Not Application.Intersect(xrng, Range(Target.Address)) _
           Is Nothing Then
        MsgBox "Cell " & Target.Address & " has changed.", vbInformation, "Kutools for Excel"
    End If
End Sub

monatóireacht ar athruithe doc 4

Nóta: Sa chód thuas, A1: E7 an raon sonraí ar mhaith leat monatóireacht a dhéanamh air má athraíonn cill, is féidir leat é a athrú de réir do riachtanas.

2. Ansin sábháil agus dún an fhuinneog cód seo, agus anois, nuair a athraíonn tú luach na cille sa raon sonraithe, tiocfaidh bosca teachtaireachta amach le cur i gcuimhne duit, féach an scáileán:

monatóireacht ar athruithe doc 5

Uirlisí Táirgiúlachta Oifige is Fearr

🤖 Kutools AI Aide: anailís sonraí a réabhlóidiú bunaithe ar: Forghníomhú Chliste   |  Gin Cód  |  Cruthaigh Foirmlí Saincheaptha  |  Anailís a dhéanamh ar Sonraí agus Cairteacha a Ghin  |  Feidhmeanna Kutools a agairt...
Gnéithe Coitianta: Faigh, Aibhsigh nó Aithnigh Dúblaigh   |  Scrios Sraitheanna Bána   |  Comhcheangail Colúin nó Cealla gan Sonraí a Chailleadh   |   Babhta gan Foirmle ...
Cuardaigh Super: Ilchritéir VLookup    VLookup Illuachanna  |   VLookup Trasna Ilbhileoga   |   Amharc doiléir ....
Liosta anuas Casta: Go tapa Cruthaigh Liosta Anuas   |  Liosta anuas Cleithiúnach   |  Liosta Buail Isteach Ilroghnacha ....
Bainisteoir Colún: Cuir Líon Sonrach Colún leis  |  Colúin Bog  |  Scoránaigh Stádas Infheictheachta na gColún Ceilte  |  Déan comparáid idir Raonta & Colúin ...
Gnéithe Réadmhaoin: Fócas Eangaí   |  Amharc Dearaidh   |   Barra Mór na Foirmle    Leabhar Oibre & Bainisteoir Bileog   |  Leabharlann Acmhainní (Uaththéacs)   |  Piocálaí Dáta   |  Comhcheangail Bileoga Oibre   |  Criptigh/Díchriptigh Cealla    Seol Ríomhphost trí Liosta   |  Scagaire Super   |   Scagaire Speisialta (scagaire trom/iodálach/stailc tríd...) ...
Barr 15 Uirlisí12 Téacs uirlisí (Cuir Téacs, Bain Carachtair,...)   |   50 + Cairt cineálacha (Cairt Gantt,...)   |   40+ Praiticiúil Foirmlí (Ríomh aois bunaithe ar lá breithe,...)   |   19 Insertion uirlisí (Cuir isteach Cód QR, Ionsáigh Pictiúr ón gCosán,...)   |   12 Tiontú uirlisí (Uimhreacha le Focail, Comhshó Airgeadra,...)   |   7 Cumaisc & Scoilt uirlisí (Sraitheanna Comhcheangail Casta, Cealla Scoilt,...)   |   ... agus eile

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

Tuairisc


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á!
Comments (7)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Merhaba. WhatsApp üzerinden bana gelen bir excell dosyası var. Bunu bilgisayar üstünden açıp. Bunda ki hareketleri ve değişiklikleri görme şansım var mı ?
This comment was minimized by the moderator on the site
I got "syntax error" with "Dim xrng As Range" when I inserted the below code in my worksheet_change event :-(
VBA code: Monitor cell changes in Excel worksheet:

Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice 20160728
    Dim xrng As Range
    Set xrng = Range("A1:E7")
    If Not Application.Intersect(xrng, Range(Target.Address)) _
           Is Nothing Then
        MsgBox "Cell " & Target.Address & " has changed.", vbInformation, "Kutools for Excel"
    End If
End Sub
This comment was minimized by the moderator on the site
if i have large amount of data in excel file, and i just want to know status in one different colum that if any cell gets change its value then it should indicate in from of that cell's row , tha status shoild be changed, how can i do this
This comment was minimized by the moderator on the site
hello how can we track by date and time in the change in the cell
This comment was minimized by the moderator on the site
Woooow this is nowhere else except here! Amazing!

Is there any way to insert a row right below the row of the cell where the cell was updated?

To make it more challenging, if I have list validation enabled or formula enabled can that as well be copied to the new row?
This comment was minimized by the moderator on the site
Hi, amar,
To insert a row below the changed value, the following VBA code can help you, please try it.

Private Sub Worksheet_Change(ByVal Target As Range)
Dim xRg As Range
Dim xStrPre, xStr As String
On Error Resume Next
Set xRg = Range("A1:E7")
If Intersect(xRg, Target) Is Nothing Then Exit Sub
Application.EnableEvents = False
xStr = Target.Value
Application.Undo
xStrPre = Target.Value
Target.Offset(1, 0).EntireRow.Insert xlShiftDown
Target.Offset(1, 0).Value = xStrPre
Target.Value = xStr
Application.EnableEvents = True
End Sub
This comment was minimized by the moderator on the site
Hello, I have it copying old number to new line - how do I have the new line go to a new tab instead?
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations