Thema Datum  Von Nutzer Rating
Antwort
09.05.2014 14:48:04 Flo
NotSolved
09.05.2014 15:24:26 Gast20094
NotSolved
Rot Zeile kopieren wenn ein Wert in Zelle steht
 13.05.2014 07:59:53 Flo
NotSolved
09.05.2014 15:51:13 RVSG
NotSolved

Ansicht des Beitrags:
Von:
Flo		 Datum:
13.05.2014 07:59:53		 Views:
774		 Rating:
     
Antwort:
  Ja
Thema:
Zeile kopieren wenn ein Wert in Zelle steht

Hey, danke für die Idee, habe auch mal ausprobiert und es funktioniert.

Nur bekomme ich eine Endlosschleife ^^ , ich denke mal das ist normal, weil ich ja eine Zeile einfüge und die Funktion sieht das direkt wieder was geändert wurde usw.

Wahrscheinlich ist aber mein Code einfach Mist::

 

Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)

Dim Zaehler As Long

Sheets("Tab1").Select

Zaehler = Range("A10000").End(xlUp).Row        'lLetzteZeile = die letzte ausgefüllte Zelle von C10000 aufwärts



    If Cells(Zaehler, 1) <> 0 Then
 
    
    Zaehler = Zaehler + 1


    Sheets("Datenbank").Rows("4:4").Copy

    Sheets("Tab1").Rows(Zaehler).Select
    
    Selection.Insert
    
    End If
    

    
    
    
End Sub

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
09.05.2014 14:48:04 Flo
NotSolved
09.05.2014 15:24:26 Gast20094
NotSolved
Rot Zeile kopieren wenn ein Wert in Zelle steht
 13.05.2014 07:59:53 Flo
NotSolved
09.05.2014 15:51:13 RVSG
NotSolved