xopslag i VBA

Hej Eksperter,

Jeg har fået lidt inspiration til en udfordring jeg står med gennem nedenstående link:

https://www.computerworld.dk/eksperten/spm/1036609

Og jeg bruger koden der er sat ind:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Range("n3")) Is Nothing Then
        Sheets("Spørgeskema").Range("N3").Value = Target.Value
    End If
End Sub
___________

Private Sub Worksheet_Change(ByVal Target As Range)

    If Not Intersect(Target, Range("n3")) Is Nothing Then
        Sheets("SamletOversigt").Range("N3").Value = Target.Value
    End If
End Sub
__________
Den del virker fint. Men for mig er det ikke den samme celle den skal tage indholdet fra.

Jeg har en stor tabel med en del oplysninger, og jeg vil gerne på en måde kunne lave et xopslag/lopslag, hvor den tager oplysningen for den celle, som gælder for det enkelte CVR nr.

I arket "Sprøgeskema" indtastes CVR-nummer, så skal den i en bestemt celle(R9) indhente kommentaren på kunden fra arket "SamletOversigt". Den del kan jeg godt (der havde jeg oprindeligt bare lavet et xopslag) - men når jeg så indsætter ovenstående, som er nødvendig, for når en kunde er i spørgeskemaet, skal det være muligt at se tidligere kommentarer, samt tilføje til den nuværende kommentar, og det skal jo så fremgå begge steder, så når jeg igen indtaste CVR-nummer, så får jeg alle kommentarer på kunden med om.

Jeg ved slet ikke om det er muligt, men håbede I måske havde en idé :)