Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
264to268
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
264to268
264to268
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Keine Formeln bei Tabellenkopie

Keine Formeln bei Tabellenkopie
03.06.2003 17:43:55
Tino
Hallo,

ich bin am verzweifeln,
habe mittels Makro zwei Tabellenblätter einer großen Datei in eine neue Datei kopiert

...
Windows(Datei_gross).Activate
Sheets(blatt1).Select
Sheets(blatt1).Copy After:=Workbooks(Datei_neu).Sheets(Workbooks(Datei_neu).Sheets.count)
Windows(Datei_neu).Activate
Worksheets(blatt1).Name = blatt_neu1
Windows(Datei_gross).Activate
Sheets(blatt2).Select
Sheets(blatt2).Copy After:=Workbooks(Datei_neu).Sheets(Workbooks(Datei_neu).Sheets.count)
Windows(Datei_neu).Activate
Worksheets(blatt2).Name = blatt_neu2
...

Mein Problem ist, dass alle Formeln in dem kopiertem Blatt auf meine große Datei verweisen. Diese Formeln brauch ich aber nicht, sondern nur die Werte. Ein Markieren+Copy der Ursprungstabelle und ein Inhalte einfügen (Werte) auf Zieltabelle scheitert an der Fehlermeldung "Für diese Aktion müssen alle verbundenen Zellen die gleiche Größe haben".
Obwohl das nicht stimmt, ist doch die gleiche Tabelle ??

Gibt es eine Möglichkeit, wie ich das lösen kann?

Danke,
Tino

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Keine Formeln bei Tabellenkopie
03.06.2003 17:49:15
Georg_Zi

Hallo Tino

ich habe mal vor einer eile ein Makro erstelle das eine Datenkopie von einer Datei erstellt.

Gruß Hajo

Der Code wurde getestet unter Betriebssystem XP Pro und Excel Version XP SBE.
Bitte kein Mail, Probleme sollen im Forum gelöst werden.

Microsoft MVP für Excel

Re: Keine Formeln bei Tabellenkopie
03.06.2003 17:50:29
Mike E.

Hallo Tino,

erst einma alles einfügen, dann die alle Zellen der neuen Datei kopieren; Inhlte einfügen Werte.
Die Fehlermeldung entfällt somit und du hast nur noch harte Werte stehen.
Andererseits könntest du auch dein Makro anpassen:

....Copy
Sheets(?).Range(?).Select
Selection.PasteSpecial Paste:=xlFormats, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False


Grüße
Mike

Anzeige
Danke, so geht's...
03.06.2003 18:23:39
Tino

Vielen Dank, manchmal ist der kürzeste Weg nicht der beste ...

Jetzt funzt alles!

Gruß
Tino

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige