Thema Datum  Von Nutzer Rating
Antwort
02.10.2019 20:41:59 Torsten
NotSolved
02.10.2019 21:08:33 Mase
NotSolved
Rot Wert in Zelle entfernen und in andere Zelle kopieren
 02.10.2019 21:28:18 xlKing
NotSolved
08.10.2019 22:15:20 Gast15231
NotSolved
20.10.2019 16:21:56 Gast50154
NotSolved
20.10.2019 20:35:20 Mase
NotSolved

Ansicht des Beitrags:
Von:
xlKing		 Datum:
02.10.2019 21:28:18		 Views:
621		 Rating:
     
Antwort:
  Ja
Thema:
Wert in Zelle entfernen und in andere Zelle kopieren

Hi Torsten, 

Ich kann Mase nur zustimmen. Learning by Doing ist das beste Prinzip wenn man mit Makros arbeiten will. Damit du aber nicht vollends verzweifestl hier für den Anfang mein Vorschlag:

Code für Tabellenmodul Tabelle1 (oder das Tabellenmodul wo du den Wert in B2 stehen hast)

Dim oldWert As Variant

Private Sub Worksheet_Change(ByVal Target As Range)
  If Not Intersect(Target, Range("B2")) Is Nothing Then
    If Target.Value = "" Then Range("A2") = oldWert Else oldWert = Target.Value
  End If
End Sub
Sub WertSetzen()
  oldWert = Range("B2")
End Sub

Code für Modul "Diese Arbeitsmappe"

Private Sub Workbook_Open()
  Tabelle1.WertSetzen
End Sub

Gruß Mr. K.

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
02.10.2019 20:41:59 Torsten
NotSolved
02.10.2019 21:08:33 Mase
NotSolved
Rot Wert in Zelle entfernen und in andere Zelle kopieren
 02.10.2019 21:28:18 xlKing
NotSolved
08.10.2019 22:15:20 Gast15231
NotSolved
20.10.2019 16:21:56 Gast50154
NotSolved
20.10.2019 20:35:20 Mase
NotSolved