Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1952to1956
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Eingabe in Zelle dem alten Zellinhalt hinzufügen

Eingabe in Zelle dem alten Zellinhalt hinzufügen
15.11.2023 18:15:58
mich.l
Hallo,
ich habe schon im Netz gesucht, aber leider keine Antwort für folgendes Problem gefunden:

Ich möchte beim Eingeben in eine Zelle den Zellinhalt nicht überschreiben, sondern meine Eingabe anhängen. Die Eingabe soll ohne Eingabemaske erfolgen, also einfach die Zelle markieren und losschreiben.

Meine Idee haut aber nicht hin:



Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Target.Copy
End Sub

Private Sub Worksheet_Change(ByVal Target As Range)
Target.Value = Target.Paste & Target.Value
End Sub


Es wäre nett, wenn mir jemand einen Tipp geben kann.

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Eingabe in Zelle dem alten Zellinhalt hinzufügen
15.11.2023 18:25:03
daniel
HI
Option Explicit

Dim WertBestand

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
WertBestand = Target.Value
End Sub

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.CountLarge = 1 then
Application.EnableEvents = False
Target.Value = Target.Value & WertBestand
Application.EnableEvents = True
end if
End Sub


1. du musst dir den alten Wert in einer Variable, die von beiden Markos verwendet werden kann, merken.
die Idee, den Wert in die Zwischenablage zu schieben (.copy) ist zwar nicht schlecht, aber aus dem Zwischenspeicher bekommt man den Wert so wie man ihn hier braucht, nicht so einfach wieder raus.
2. Eventmarkos können sich selbst aufrufen, wenn sie sie entsprechende Aktion ausführen. Dann landet man schnell in einer Endlosschleife. Das wird durch das Application.EnableEvents verhindert.
3. das ganze funktioniert so einfach nur dann, wenn man nur eine Zelle gleichzeitig ändert. Ändert man mehrere Zellen gleichzeitig, wird es komplizierter.
daher die Abfrage, um hier den Fehler zu vermeiden.

Gruß Daniel
Anzeige
AW: Eingabe in Zelle dem alten Zellinhalt hinzufügen
15.11.2023 18:35:49
mich.l
Super! Danke auch für die ausführliche Erklärung.

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige