Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Pivot-Tabelle als 'bearbeitbare' Tablle ausgeben

Forumthread: Pivot-Tabelle als 'bearbeitbare' Tablle ausgeben

Pivot-Tabelle als 'bearbeitbare' Tablle ausgeben
23.02.2004 15:56:09
Gode
Hallo,
ich habe folgendes Problem:
ich lade mir via SQL aus einer Datenbank Sätze in ein tabellenblatt.
Daraus erstelle ich via Makro eine Pivot-Tabelle.
Gleichzeitig möchte ich die selbe Tabelle nochmal in einem anderen Tabellenblatt - aber nicht als Pivot, damit die Zahlen bearbeitbar sind - ausgeben.
Geht soweit auch rel. einfach, indem ich die Pivot Tabelle kopiere und als Wert in das andere Tabellenblatt einfüge (Paste:=xlValues).
Leider gehen mir hierbei sämtliche Formatierungen verloren.
Füge ich das ganz mit Formatierung (Paste:=xlFormats) ein habe ich wieder eine Pivot-Tabelle.
Gibt es eine Möglichkeit sämtliche Formatierungen, die in der Pivot-Tabelle gemacht wurden (Fett, Farben, ....) beizubehalten, das ganze aber als 'normale' Tabelle auszugeben, so dass die Werte in der Tabelle bearbeitbar sind.
Wäre toll wenn mir jemand weiterhelfen könnte!!
Dank im Voraus
Gode
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Pivot-Tabelle als 'bearbeitbare' Tablle ausgeben
23.02.2004 17:07:33
siebelt
Hallo,
bei mir hat es so funktioniert:

Sub TEST()
Range("W3:AA9").Select
Range("AA9").Activate
Selection.Copy
Sheets("Tabelle1").Select
Range("A1").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Selection.PasteSpecial Paste:=xlFormats, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
End Sub

Gruß
Siebelt
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige