Excel 2000 - 1x kop. Daten anschl. nicht mehr änd

Guten Tag,

vielleicht weiß ja jemand Rat.

Ich habe in A1 den Wert 5.
Dieser Wert soll auch in A2 erscheinen. Aber dann soll er in A2 anschließend UNVERÄNDERT bleiben, auch wenn sich in A1 wieder etwas ändert.
Geht das nur manuell über INHALTE EINFÜGEN?

Danke
Ludwig

hallo ludwig

ich würde das über eine schleife lösen:
'das muss in >diese arbeitsmappe stehen
dim i as integer, n as integer, s as boolean 'variablen deklaration

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range) 'wird jedesmal ausgeführt wenn du eine andere zelle anklickst

'jetzt die schleife:
n = Range(„A1“)
if s = true then
Range(„B1“) = n
s = false
End Sub

dies aktion wird also nur einmal ausgeführt.
du kannst aber s jederzeit wieder auf true setzten und dann wird B2 wieder verändert…

viel spass

gruß
herpes

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]