Alle Formate auf neues Tabellenblatt übertragen



Excel-Version: 97 / 2000
nach unten

Betrifft: Alle Formate auf neues Tabellenblatt übertragen
von: Christian
Geschrieben am: 29.04.2002 - 11:41:12

Wie kann ich alle Formate eines Tabellenblattes in ein neues Workbook übernehmen. (Auch verbundene Zellen)? Zur Zeit werden die Werte aus einer "Formular-Datei" in eine Musterarbeitsmappe übernommen. Ändert man nun ein Format in der Formulardatei, wird diese Änderung natürlich nicht in der Musterarbeitsmappe übernommen. Kann ich mit Hilfe eines Befehles nicht nur die values, sondern auch die Formate übernehmen?

Workbooks.Open strExportfile, Password:="sokrates"
With Sheets("Report" & strSysString)
.Unprotect Password:="sokrates"
.Range("A:P").Value = Workbooks("Report.xls").Sheets("Report" & strSysString).Range("B:Q").Value
'wie übernehme ich hier die Formate aus der Orginal-Arbeitsmappe?
.Cells(1, 1).Activate
End With

Vielen Dank
Christian

nach oben   nach unten

Re: Alle Formate auf neues Tabellenblatt übertragen
von: Mike
Geschrieben am: 29.04.2002 - 14:04:53

Zeichne einfach ein Makro auf, und geh auf "Bearbeiten/Inhalte Einfügen" - dann hast du den Befehl.

 nach oben

Beiträge aus den Excel-Beispielen zum Thema "Alle Formate auf neues Tabellenblatt übertragen"