Taulukoiden vertailu

epätietoinen99

Miten verrataan kahta taulukkoa solu solulta toisiinsa, niin että kolmanteen taulukkoon tulee tieto erovaisuudesta (esim "virhe" ao. soluun)

Tämähän onnistuu jos-funktiolla, mutta miten soluviittaukset saisi absoluuttisen absoluuttiseksi, niin että vertailtavien taulukoiden rivejä voi lisätä, poistaa ja muutenkin korjata kesken vertailun. Taulukon suojaus tai absoluuttiset viittaukset eivät pure. Lisäksi kaava pitää saada helposti kopioitua tarpeeksi laajaksi

2

1903

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • moduuliin...
      liitä koodi nappiin
      muuta taulukoiden nimet sopiviksi

      Public Sub EtsiErot()
      Dim solu As Range
      On Error Resume Next
      Application.ScreenUpdating = False
      Worksheets("Sheet3").Cells.Clear
      For Each solu In Worksheets("Sheet1").UsedRange
      If Not solu = Worksheets("Sheet2").Cells(solu.Row, solu.Column) Then
      Worksheets("Sheet3").Cells(solu.Row, solu.Column) = "virhe"
      End If
      Next
      For Each solu In Worksheets("Sheet2").UsedRange
      If Not solu = Worksheets("Sheet1").Cells(solu.Row, solu.Column) Then
      Worksheets("Sheet3").Cells(solu.Row, solu.Column) = "virhe"
      End If
      Next
      Worksheets("Sheet3").Activate
      Range("A1").Select
      Application.ScreenUpdating = True
      End Sub

      • epätietoinen99

        ...kovasti!

        Jätin lopusta lukien rivit 3 ja 4 pois, joten kun taulukot ovat omissa ikkunoissaan, voidaan tutkittavaksi ottaa mikä tahansa alue!

        Hienoa että löytyy lahjakkaita ja avuliaita experttejä, jotka jaksavat vastailla tällaisiin harrastelijoiden pulmiin.

        (tällä kelpaa elvistellä töissä ainakin kesälomiin asti!)


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

    Luetuimmat keskustelut

    1. Virkamiehille tarvitaan tuntuvat palkankorotukset

      Naistenpäivänä on syytä muistuttaa, että virkamiehen euro on vain 80 senttiä. Palkat tulee saattaa samalle tasolle yksi
      Maailman menoa
      61
      4729
    2. Riikka Purran kaudella nousi bensan hinta yli 2 euron

      Muistatteko kuinka edellisen vasemmistohallituksen aikana, ns. Marinin aikakaudella, bensiiniä sai 1,3 euron litrahinnal
      Maailman menoa
      97
      4431
    3. Jäikö meidän välit

      Mielestäsi Kesken?
      Ikävä
      76
      3908
    4. Olisipa saanut sinuun

      Tutustua paremmin. Harmi että aloin lopulta jännittämään kun näytit tunteesi niin voimakkaasti ja lähestyit niin voimaak
      Ikävä
      96
      3817
    5. Mitäs nyt sijoittajat?

      Pörssit laskevat maailmalla Iranin sodan takia ja muutenkin ovat olleet Trumpin vallan alla epävarmat. Ainoa, mikä on no
      Maailman menoa
      119
      2855
    6. Miks tän meidän

      Rakkauden on pitänyt olla näin vaikeaa?
      Ikävä
      35
      2628
    7. Elän vastoin

      Kaikkia arvoja kun en pysy sinusta erossa.
      Ikävä
      37
      2532
    8. muista olla

      VAROVAINEN! m
      Ikävä
      24
      2509
    9. Onneksi on edes yksi kuva

      Susta mitä voin välillä ihastella ja kaipailla sua😔
      Ikävä
      38
      2499
    10. Olisitpa se hellä

      Ja herkkä minkä kuvan sain sinusta irl. Haluaisin että elämässäni olisi sellainen joka arvostaa minua juuri sellaisena k
      Ikävä
      23
      2374
    Aihe