Supportnet / Forum / Tabellenkalkulation
Control X zerstört Formel
Frage
Beispiel:
ich habe in A1 den Wert 100 und in B1 den Wert 200.
In A4 habe ich die Formel: =A1 (Inhalt = 100)
Wenn ich nun mit Control X B1 nach A1 schiebe, ist die
Formel in A4 zerstört (#REF!)
Was mache ich falsch ?
Antwort 1 von varginator
er bezieht sich dann auf die neue zelle:
mach einfach mal den Versuch:
gib in a1 und in b1 irgendwas ein
dann schreib in a4 "=a1" und in b4 "=b1"
wenn du jetz b1 mit ctrl + x und dann in a1 einfügst dann
steht in b4 "=a1"
wenn dann müsstest du es in zwei schritten machen:
b-spalte kopieren und in a einfügen
b-spalte löschen
mach einfach mal den Versuch:
gib in a1 und in b1 irgendwas ein
dann schreib in a4 "=a1" und in b4 "=b1"
wenn du jetz b1 mit ctrl + x und dann in a1 einfügst dann
steht in b4 "=a1"
wenn dann müsstest du es in zwei schritten machen:
b-spalte kopieren und in a einfügen
b-spalte löschen
Antwort 2 von rolandamann
Hallo varginator !
Danke für Deine Antwort. Das Problem ist, ich habe diese
Anwendung für grosse Hallenturniere geschrieben, bei denen
immer eine andere Person die Anwendung benutzt. Wenn nun
einer mit Control X arbeitet statt, wie Du auch gesagt hast,
zuerst kopiert und dann löscht, dann ist alles im Eimer.
Darum suche ich einen Weg das zu herhindern oder hast Du
eine Ahnung ob dann die Funktion Control X irgendwie sperren könnte ?
Gruss
Roland
Danke für Deine Antwort. Das Problem ist, ich habe diese
Anwendung für grosse Hallenturniere geschrieben, bei denen
immer eine andere Person die Anwendung benutzt. Wenn nun
einer mit Control X arbeitet statt, wie Du auch gesagt hast,
zuerst kopiert und dann löscht, dann ist alles im Eimer.
Darum suche ich einen Weg das zu herhindern oder hast Du
eine Ahnung ob dann die Funktion Control X irgendwie sperren könnte ?
Gruss
Roland
Antwort 3 von rainberg
Hallo Roland,
Vorschlag:
Verzichte auf die Formel in A4 und verwende dieses Makro(lein)
Gruß
Rainer
Vorschlag:
Verzichte auf die Formel in A4 und verwende dieses Makro(lein)
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$B$1" Then Exit Sub
Range("A4").Value = Range("A1").Value
End SubGruß
Rainer