Thema Datum  Von Nutzer Rating
Antwort
12.02.2020 07:28:45 Lucy
NotSolved
12.02.2020 07:40:51 Mase
NotSolved
Rot Gefilterte Daten kopieren und einfügen
 12.02.2020 07:43:19 Torsten
Solved

Ansicht des Beitrags:
Von:
Torsten		 Datum:
12.02.2020 07:43:19		 Views:
656		 Rating:
     
Antwort:
 Nein
Thema:
Gefilterte Daten kopieren und einfügen

Hallo Lucy,

versuch mal die letzte Zeile deines codes durch diese 3 zu ersetzen:

wbStart.Sheets("Extern").Range("A2:M15000").SpecialCells(xlCellTypeVisible).Copy
wbZiel.Sheets("Tabelle1").Cells(x, 1).PasteSpecial xlPasteValues
Application.CutCopyMode = False

Damit werden nur ungefilterte (sichtbare) Zellen kopiert.

Gruss Torsten

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
12.02.2020 07:28:45 Lucy
NotSolved
12.02.2020 07:40:51 Mase
NotSolved
Rot Gefilterte Daten kopieren und einfügen
 12.02.2020 07:43:19 Torsten
Solved