VBA koodauksella laskenta, kuinka monta kertaa solun arvoa on muutettu. Miten?

Anonyymi

Pitäisi saada laskettua, kuinka monta kertaa soluun on laitettu jokin arvo.
Aina kun arvoa muutetaan, luku muuttuisi tarkkailusolussa.

Esim. Solun A1 arvoa muutetaan ja vaikka soluun B1 tulee tieto, montako kertaa arvoa /tietoa on muutettu.
Muuttuva tieto voi olla numeroita tai tekstiä

Esim.:
A1 B1
100 1
150 2
200 3
250 4

1

280

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • ko taulukon moduuliin...

      Option Explicit

      Private Sub Worksheet_Change(ByVal Target As Range)
      If Not Intersect(Target, Range("A1")) Is Nothing Then
      If Target.ID = "" Then
      Target.ID = Target
      Target.Offset(0, 1) = 1
      Else
      If Not Target.ID = Target Then
      Target.Offset(0, 1) = Target.Offset(0, 1) 1
      Target.ID = Target
      End If
      End If
      End If
      End Sub

      Keep EXCELing
      @Kunde

    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Luetuimmat keskustelut

    1. Kaivatullesi viesti ensi vuoteen?

      Kerro meneekö naiselle vai miehelle ja vähintään yksi tunniste, esim. kirjain.
      Ikävä
      148
      6711
    2. Yritystuet pois ja työeläkevaroilla maksettava valtion velka pois

      Nyt on teille kerrottu keino kuinka Suomen velkaongelmasta päästää eroon kertalaakista. Älkää saatanat enää minulle tul
      Maailman menoa
      35
      3678
    3. Nyt Yle otti silmätikukseen sisäministeri Rantasen

      Aivan erinomaista työtä tehnyt sisäministeri Mari Rantanen on saanut paljon aikaiseksi. Maahanmuuttoon ja maahanmuuttaji
      Maailman menoa
      305
      3220
    4. Ylen juttu sisäministeristä oli selvän tarkoitushakuinen

      haluttiin vielä vuoden loppuun saada joku "kohu". (Olisiko Yle tehnyt jutun jos sisäministerinä olisi esim. RKP:n, jota
      Maailman menoa
      71
      2832
    5. Suomalaista yrittäjää ei kommunistista erota

      Muualla maailmassa yrittäjät elävät asiakkaiden rahoilla, Suomessa palkansaajien maksamilla veroilla. Palkansaajahan ma
      Maailman menoa
      5
      2282
    6. Milloin näit kaivattusi edellisen kerran?

      Olitteko juttusilla vai sivusta vain? Miten reagoit?
      Ikävä
      21
      1863
    7. Liikaa vauhtia

      Nuorukainen 17v. on ajanut 114 km/h 60 km:n alueella Nesteen kohdalla ja onneksi poliisi oli paikalla ja hurjastelu lopp
      Suomussalmi
      46
      1711
    8. 15
      1646
    9. Ulkoministeriön konsulipäällikkö arvostelee rajusti Haavistoa: "Täällä on pelon ilmapiiri"

      "– Täällä on ministerin toimien takia aivan selvästi pelon ilmapiiri. Jos sellaisen annetaan pesiytyä virkamieskulttuuri
      Maailman menoa
      5
      1624
    10. Kokoomuksen ja perussuomalaisten kannattaisi yhdistyä

      Näin saataisiin yksi yli 30 prosentin puolue, jolla olisi riittävästi voimaa jatkaa tarpeellisten rakennemuutosten läpi
      Maailman menoa
      8
      1388
    Aihe