Thema Datum  Von Nutzer Rating
Antwort
27.12.2020 07:12:47 Adrian
NotSolved
27.12.2020 09:25:51 volti
NotSolved
Rot Excel Zeile in anderes Tabellenblatt kopieren wenn in Spalte dieser Zeile bestimmter Wert
 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:
Werner		 Datum:
27.12.2020 11:39:12		 Views:
458		 Rating:
     
Antwort:
 Nein
Thema:
Excel Zeile in anderes Tabellenblatt kopieren wenn in Spalte dieser Zeile bestimmter Wert

Hallo,

da würde ich das Workbook Sheet_Change Ereignis nehmen.

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
Dim loLetzte As Long

If Sh.Name Like "Projekt*" Then
    If Target.Column = 6 Then
        If UCase(Target) = "YES" Then
            With Worksheets("master")
                loLetzte = .Cells(.Rows.Count, "A").End(xlUp).Offset(1).Row
                .Range("A" & loLetzte) = Date
                .Range("B" & loLetzte) = Format(Time, "HH:MM:SS")
                Target.Offset(, -3).Resize(1, 5).Copy
                .Range("C" & loLetzte).PasteSpecial Paste:=xlPasteValuesAndNumberFormats
            End With
        End If
    End If
End If

Application.CutCopyMode = False
End Sub

Der Code gehört ins Codemodul von "DieseArbeitsmappe"

 

Gruß Werner

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
27.12.2020 09:25:51 volti
NotSolved
Rot Excel Zeile in anderes Tabellenblatt kopieren wenn in Spalte dieser Zeile bestimmter Wert
 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