Thema Datum  Von Nutzer Rating
Antwort
10.06.2020 11:10:23 Gast1006
NotSolved
10.06.2020 11:20:54 Crazy Tom
NotSolved
Rot Erste freie Zeile finden und einfügen (strukturiert)
10.06.2020 11:21:14 Gast96174
NotSolved
10.06.2020 12:24:45 Gast1006
NotSolved
10.06.2020 12:44:59 Crazy Tom
NotSolved
10.06.2020 12:57:15 Gast1006
NotSolved
10.06.2020 13:00:56 Gast42457
NotSolved
10.06.2020 13:09:03 Crazy Tom
NotSolved
10.06.2020 13:09:31 Gast1006
NotSolved

Ansicht des Beitrags:
Von:
Gast96174
Datum:
10.06.2020 11:21:14
Views:
815
Rating: Antwort:
  Ja
Thema:
Erste freie Zeile finden und einfügen (strukturiert)
Guten Tag;
 
Ich habe einen Code gefunden der auch ganz gut funktioniert.
Leider überschreibt er mir aber immer die letzte Zeile anstatt darunter einzufügen.
 
"Private Sub Worksheet_Change(ByVal Target As Range)
 
 If Target.Column = 18 Then 'Änderung in Spalte R
    If Target.Value <> "" Then
    lrow = Sheets("Auf Areal").Range("A65536").End(xlUp).Row '1. freie Zeile wird ermittelt
    Range("A" & Target.Row & ":S" & Target.Row).Cut Sheets("Journal").Range("A" & lrow & ":S" & lrow)
    End If
 End If
 
 
End Sub"
 
Vielleicht kann jemand von euch den Fehler finden...
 
Danke im Voraus
Gruss

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
10.06.2020 11:10:23 Gast1006
NotSolved
10.06.2020 11:20:54 Crazy Tom
NotSolved
Rot Erste freie Zeile finden und einfügen (strukturiert)
10.06.2020 11:21:14 Gast96174
NotSolved
10.06.2020 12:24:45 Gast1006
NotSolved
10.06.2020 12:44:59 Crazy Tom
NotSolved
10.06.2020 12:57:15 Gast1006
NotSolved
10.06.2020 13:00:56 Gast42457
NotSolved
10.06.2020 13:09:03 Crazy Tom
NotSolved
10.06.2020 13:09:31 Gast1006
NotSolved