Thema Datum  Von Nutzer Rating
Antwort
Rot Zellenwerte kopieren und in Reihe auflisten
09.06.2022 17:45:55 X-Tase
NotSolved
09.06.2022 20:55:27 ralf_b
Solved
09.06.2022 21:12:56 X-Tase
NotSolved

Ansicht des Beitrags:
Von:
X-Tase
Datum:
09.06.2022 17:45:55
Views:
80
Rating: Antwort:
  Ja
Thema:
Zellenwerte kopieren und in Reihe auflisten

Guten Tag, 

ich verzweifle momentan an einer Funktion, wo ich denke das die Lösung relativ unkompliziert sein wird, nur ich ein Brett vorm Kopf habe.

Programm: Excel 

Ich möchte gerne in einer Zelle (A1) einen Wert eintragen (Zahl 1), nachdem ich den Wert mit Enter bestätige, möchte ich das dieser Wert (Zahl 1) auch in einer anderen Zelle (B2) auftaucht und der Cursor wieder zurück in die Ursprungs-Zelle (A1) springt.

Das klappt soweit auch mit folgendem Lösungsansatz:

 

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Range("B2").Value = Range("A1").Value
End Sub
-------------------------------------------------------------------
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then Range("A1").Select
End Sub

 

Jetzt zum Problem. Nachdem der Cursor wieder in der Ursprungs-Zelle ist, möchte ich einen weiteren Wert (Zahl 2) eingeben und nach der Bestätigung soll der neue Wert (Zahl 2) in Zelle B2 stehen und der vorherige Wert (Zahl 1) soll nun in eine Zelle (C2) direkt daneben eingetragen werden. Das soll dann immer weitergeführt, bis am Ende sechs eingegebene Zahlen nebeneinander aufgelistet sind. Beim Eintragen der siebten Zahl soll dieser Wert wieder in der Zelle B2 auftauchen und das "Array" wird wieder von neu befüllt.

 

Ich hoffe man kann mir zur Lösung helfen.

Beste Grüße

X-Tase

 

 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:

 
 

  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Zellenwerte kopieren und in Reihe auflisten
09.06.2022 17:45:55 X-Tase
NotSolved
09.06.2022 20:55:27 ralf_b
Solved
09.06.2022 21:12:56 X-Tase
NotSolved