Clever-Excel-Forum

Normale Version: bestimmte Auswahl komplett mit bedingter Formatierung in neue Datei kopieren
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Hallo in die Runde 

ich würde gerne aus der angehängten Datei, Spalte A-AC und Zeile 1-37 komplett mit bedingter Formatierung, in eine neue Exceldatei übernehmen wollen.

scheiter aber gerade daran  Undecided 

falls jemand eine Lösung hat bedanke ich mich jetzt schon mal !!!

Gruß Ron
Hallo Ron, 19 

du könntest doch auch das Tabellenblatt kopieren? 21 

Code:
Tabelle1.Copy
in dem alten Blatt sind aber zu viele Zeilen und Spalten noch aktiv die ich nicht brauche
Hallo, 19 

du könntest anschließend die überflüssigen Spalten/Zeilen löschen: 21 

Code:
Option Explicit
Public Sub Main()
    Tabelle1.Copy
    With ActiveSheet
        .Range(.Rows(38), .Rows(.Rows.Count)).Delete
        .Range(.Columns(30), .Columns(.Columns.Count)).Delete
    End With
End Sub