Prøv at se på funktionen LOPSLAG. Hvis du indsætter denne funktion i Indkøb kolonne A og indtaster en eentydig indentifikation, vil funktionen returnere værdien fra Data.
Højreklik på fanen af Data, vælg vis programkode, sæt denne kode derind, og luk bagefter på det øverste højre X.
Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("A:A")) Is Nothing Then Sheets("Indkøb").Range(Target.Address) = Target Sheets("Forbrug").Range(Target.Address) = Target End If End Sub
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
