Office: Pivot Tabelle VBA

Hallo Miteinander!

Ich habe folgendes Problem und bin auf diesem Gebiet noch etwas unbeholfen.

Ich möchte Daten aus dem Web in ein Excel Template importieren. Als Output bekomme ich dann eine Tabellenansicht.
Neben dieser angezeigten Tabelle soll ein Button generalisiert werden, bei dem sich durch einen Klick darauf, in einem neuen Arbeitsblatt automatisch eine PivotTabelle öffnet. Dies ist schon mein erstes Problem!

Nun muss aber der vba-Code so generiert sein, dass egal welches (in unserem Fall Projekt mit Aufgaben) man hinein improtieren möchte, sich die PivotTabelle für das jeweilige Projekt öffnen lässt.

Bei allen Projekten sind die Zeilen- und Spaltennamen immer gleich!
Zum Beispiel:
Spalten: Version Monate (Werte)
Zeilen: Ossue, Summary
Werte: Original Due Date, Due Date
Filter: Project

Ist dies möglich? Und wenn ja, was muss ich tun?


Ich hoffe ihr könnt mir helfen!

Danke!

Beste Grüße

:)

 

Hi,

http://www.vba-forum.de/Forum/View.a...isch_erstellen

Diesen Beitrag schon gelesen?

 

Hi Mase,

letztendlich soll es so aussehen wie ich dir es im Anhang geschickt habe.
Im Tabellenblatt "Summary" befinden sich meine importierten Daten aus dem Web.
Rechts neben der Tabelle ist ein Button namens "PivotTable".
Und wenn ich auf diesen klicke, möchte ich, dass es mir im neuen Tabellenblatt "PivotTable" genau diese dort aufgezeigte Pivot Tabelle erstellt. (momentan ist sie manuell eingegeben, was ich vermeiden möchte)

Optimal wäre es noch, wenn sich das Datum der einzelnen Felder in rot, orange und grün einfärben würde, je nachdem ob das Datum bereits vergangen ist oder nicht.
Auch dies sollte dann bei jedem Import funktionieren.

Und zu guter letzt soll es möglich sein, jeden Import in das Tabellenblatt "Summary" hineinzukopieren und per Button eine automatische Pivot Tabelle zu bekommen.

Vielen lieben Dank für deine Hilfe!

 

Werden alle Daten in Summary dann ersetzt oder ergänzt (also unten angehängt)?

 

Ersetzt werden alle Daten ja!
Ausschließlich die "Überschriften" der Zeilen und Spalten, d.h. "Project", "Issue", "Due Date" etc. bleibt ! Das Datum kann sich aber jederzeit verändern, genauso wie der Projektname, oder die einzelnen Issues (z.B. sind dann nicht mehr nur 15 Issues aufgelistet, sondern in einem anderen Projekt völlig neue und eine andere Anzahl)

 

Schau mal rein, ob wir da auf dem richtigen Weg sind:

Code:

 

Hi Mase,

dieser Code beinhaltet aber keine Einfärbung der Zellen oder?


Ich werde erst Montag dazukommen, mir das vernünftig anzusehen.

Danke dir auf jeden Fall schon mal!*Smilie

 

Shirley, richtig.
MakeUp machen wir drauf sobald die Haare sitzen *wink.gif*

Bitte mal folgendes prüfen und Feedback geben:
a) Erscheinungsbild der PivotTabelle
b) Import neuer Daten bzw Button klicken und wieder a) prüfen

 

Hallo Mase!

Ja, das funktioniert soweit!

Die Pivot Tabelle wird mir allerdings beim öffnen des Dokuments zunächst auf zwei Tabellenblättern angezeigt.

Die Darstellung der Pivot Tabelle ist so super! Auch das reinkopieren eines anderen Projekts funktioniert.

Allerdings zeigt es mir beim Öffnen der Datei zunächst zwei "Fehlmeldungen" an.
1) NormalEmail.dtom: hat ein ungültiges Dateiformat.
2) [Expression.Error] Die Spalte "Project" der Tabelle wurde nicht gefunden.

Können diese ignoriert werden?

Ist es möglich mit dem Button direkt zur erstellten Pivot Tabelle zu switchen?
Momentan erstellt es mir die Tabelle "nur". Der Klick auf das PivotTable-Arbeitsblatt muss dabei trotzdem noch getätigt werden.

Vielen lieben Dank für deine Unterstützung!

 

Eines muss ich noch hinzufügen.

Optimal wäre es natürlich, wenn es mir in meiner Pivot Tabelle die Versionen in chronologischer Reihenfolge anzeigen würde. (0.1/0.2/0.3 ...)

 

Was bedeutet zunächst; wie löst Du das Problem?

Kommt diese Fehlermeldung nur wenn Du diese Datei öffnest oder generell?

Wird eine VBA-Zeile gelb markiert?

Passiert bei mir nicht; welche Excelversion setzt Du denn ein?

 

Ich benutze Excel 16.

 

Das Blatt kann eigentlich wegbleiben - diente während der Entwicklungszeit als Vorlage. Also mal löschen speichern, schliessen, öffnen und Feedback geben *biggrin.gif*

 

*grins *grins *grins *grins
'Funktioniert natürlich *biggrin.gif*

 

Diese beiden Fehler noch da?