Thema Datum  Von Nutzer Rating
Antwort
23.05.2016 11:28:26 Mario
NotSolved
Blau Zellinhalte aus einem Sheet in ein Anderes kopieren
 23.05.2016 11:38:47 Crazy Tom
Solved
23.05.2016 12:04:02 Gast66178
NotSolved
23.05.2016 12:08:28 Gast56200
NotSolved

Ansicht des Beitrags:
Von:
Crazy Tom		 Datum:
23.05.2016 11:38:47		 Views:
708		 Rating:
     
Antwort:
 Nein
Thema:
Zellinhalte aus einem Sheet in ein Anderes kopieren

Hi

wenn ich dich richtig verstanden habe dann geht das so

Sub test()
    Dim lngZiel As Long
    With Sheets("Tabelle2")
        lngZiel = .Cells(.Rows.Count, 1).End(xlUp).Row + 1
        .Cells(lngZiel, "A").Value = Cells(ActiveCell.Row, "A").Value
        .Cells(lngZiel, "B").Value = Cells(ActiveCell.Row, "B").Value
        .Cells(lngZiel, "C").Value = Cells(ActiveCell.Row, "C").Value
        .Cells(lngZiel, "D").Value = Cells(ActiveCell.Row, "E").Value
        .Cells(lngZiel, "E").Value = Cells(ActiveCell.Row, "F").Value
    End With
End Sub

 

MfG Tom

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
23.05.2016 11:28:26 Mario
NotSolved
Blau Zellinhalte aus einem Sheet in ein Anderes kopieren
 23.05.2016 11:38:47 Crazy Tom
Solved
23.05.2016 12:04:02 Gast66178
NotSolved
23.05.2016 12:08:28 Gast56200
NotSolved