Thema Datum  Von Nutzer Rating
Antwort
27.12.2020 07:12:47 Adrian
NotSolved
Blau Excel Zeile in anderes Tabellenblatt kopieren wenn in Spalte dieser Zeile bestimmter Wert
 27.12.2020 09:25:51 volti
NotSolved
27.12.2020 11:39:12 Werner
Solved
27.12.2020 22:40:09 Adrian
NotSolved
27.12.2020 22:44:15 Adrian
NotSolved
27.12.2020 22:55:47 Gast31847
NotSolved
28.12.2020 08:59:58 Werner
NotSolved

Ansicht des Beitrags:
Von:
volti		 Datum:
27.12.2020 09:25:51		 Views:
473		 Rating:
     
Antwort:
  Ja
Thema:
Excel Zeile in anderes Tabellenblatt kopieren wenn in Spalte dieser Zeile bestimmter Wert

Hallo Adrian,

hier mal eine Idee zu Deinem Anliegen:

Code:
 
01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25		  
' In ein Modul
Option Explicit
Option Compare Text

Sub Daten_Uebertragen(Target As Range)
  Dim iZeile As Long
  
  If Target.Column <> 6 Then Exit Sub           ' Nicht Spalte "F" =>raus
  If Not Target.Value Like "yes" Then Exit Sub  ' kein yes => raus
  
  With Sheets("master")                         ' Zielblatt referenzieren
     iZeile = .Cells(Rows.Count, "A").End(xlUp).Row + 1 ' Erste freie Zeile
     .Cells(iZeile, "A").Value = Date
     .Cells(iZeile, "B").Value = Time
     .Cells(iZeile, "C").Resize(1, 5).Value _
     = Target.Parent.Range("C" & Target.Row & ":G" & Target.Row).Value
  End With
  
End Sub


' In das Klassenmodul der Tabelle
Private Sub Worksheet_Change(ByVal Target As Range)
  Call Daten_Uebertragen(Target)
End Sub
 
_________
viele Grüße
Karl-Heinz

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
27.12.2020 07:12:47 Adrian
NotSolved
Blau Excel Zeile in anderes Tabellenblatt kopieren wenn in Spalte dieser Zeile bestimmter Wert
 27.12.2020 09:25:51 volti
NotSolved
27.12.2020 11:39:12 Werner
Solved
27.12.2020 22:40:09 Adrian
NotSolved
27.12.2020 22:44:15 Adrian
NotSolved
27.12.2020 22:55:47 Gast31847
NotSolved
28.12.2020 08:59:58 Werner
NotSolved