Hoppa till huvudinnehåll

Hur registrerar jag förändrade värden i en cell i Excel?

Författare: Siluvia Senast ändrad: 2024-11-21

Hur registrerar man varje ändrande värde för en cell som ändras ofta i Excel? Till exempel är det ursprungliga värdet i cell C2 100. När du ändrar nummer 100 till 200 kommer det ursprungliga värdet, 100, att visas i cell D2 automatiskt för inspelning. När du ändrar 200 till 300 kommer siffran 200 att infogas i cell D3, ändring 300 till 400 visar 300 till D4 och så vidare. Metoden i den här artikeln kan hjälpa dig att uppnå det.

Spela in förändrade värden i en cell med VBA-kod


Spela in förändrade värden i en cell med VBA-kod

Nedanstående VBA-kod kan hjälpa dig att registrera alla förändrade värden i en cell i Excel. Gör så här.

1. I kalkylbladet som innehåller cellen där du vill registrera ändrade värden, högerklicka på arkfliken och klicka sedan på Visa kod från snabbmenyn. Se skärmdump:

En skärmdump som visar snabbmenyn med alternativet Visa kod i Excel.

2. Sedan Microsoft Visual Basic för applikationer fönstret öppnas, vänligen kopiera nedan VBA-kod till kodfönstret.

VBA-kod: registrera förändrade värden i en cell

Dim xVal As String
'Update by Extendoffice 2018/8/22
Private Sub Worksheet_Change(ByVal Target As Range)
    Static xCount As Integer
    Application.EnableEvents = False
    If Target.Address = Range("C2").Address Then
        Range("D2").Offset(xCount, 0).Value = xVal
        xCount = xCount + 1
    Else
        If xVal <> Range("C2").Value Then
         Range("D2").Offset(xCount, 0).Value = xVal
        xCount = xCount + 1
        End If
    End If
    Application.EnableEvents = True
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    xVal = Range("C2").Value
End Sub

Anmärkningar: I koden är C2 cellen som du vill spela in alla dess förändrade värden. D2 är cellen som du fyller i det första värdet på C2.

3. tryck på andra + Q för att stänga Microsoft Visual Basic för applikationer fönster.

Från och med nu, varje gång du ändrar värden i cell C2, kommer de tidigare värdena att registreras i D2 och cellerna under den.

Bästa kontorsproduktivitetsverktyg

🤖 Kutools AI Aide: Revolutionera dataanalys baserat på: Intelligent utförande   |  Generera kod  |  Skapa anpassade formler  |  Analysera data och generera diagram  |  Anropa Kutools funktioner.
Populära funktioner: Hitta, markera eller identifiera dubbletter   |  Ta bort tomma rader   |  Kombinera kolumner eller celler utan att förlora data   |   Rund utan formel ...
Superuppslag: Flera kriterier VLookup    VLookup med flera värden  |   VSök över flera ark   |   Fuzzy Lookup ....
Avancerad rullgardinslista: Skapa snabbt en rullgardinslista   |  Beroende rullgardinslista   |  Flervals-rullgardinslista ....
Kolumnhanterare: Lägg till ett specifikt antal kolumner  |  Flytta kolumner  |  Växla synlighetsstatus för dolda kolumner  |  Jämför intervall och kolumner ...
Utvalda funktioner: Rutnätsfokus   |  Designvy   |   Stor formelbar    Arbetsbok & Bladhanterare   |  Resursbibliotek (Automatisk text)   |  Datumväljare   |  Kombinera arbetsblad   |  Kryptera/Dekryptera celler    Skicka e-postmeddelanden efter lista   |  Superfilter   |   Specialfilter (filtrera fet/kursiv/genomstruken...) ...
Topp 15 verktygssatser12 text verktyg (lägga till text, Ta bort tecken, ...)   |   50+ Diagram Typer (Gantt Chart, ...)   |   40+ Praktiskt Formler (Beräkna ålder baserat på födelsedag, ...)   |   19 Införande verktyg (Infoga QR-kod, Infoga bild från sökväg, ...)   |   12 Konvertering verktyg (Siffror till ord, Valutaväxling, ...)   |   7 Slå ihop och dela verktyg (Avancerade kombinera rader, Dela celler, ...)   |   ... och mer

Uppgradera dina Excel-färdigheter med Kutools för Excel och upplev effektivitet som aldrig förr. Kutools för Excel erbjuder över 300 avancerade funktioner för att öka produktiviteten och spara tid.  Klicka här för att få den funktion du behöver mest...


Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare

  • Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
  • Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
  • Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!