Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 15:03:35
Unterschiedliche Dateien miteinander abgleichen lassen
25.04.2024 14:05:48
Makro in aktueller Zelle ausführen mit Doppelklick
25.04.2024 12:56:25
Werte von Kunden und Artikel stehen untereinander
25.04.2024 12:55:42
Funktionsparameter auslesen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1448to1452
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1448to1452
1448to1452
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Sehr komplizierte Aufgabe - 2

Sehr komplizierte Aufgabe - 2
04.10.2015 14:32:57
Peter
Hallo Zusammen, Hallo Daniel,
ich stelle die zweite Herausforderung ins Forum. Die Herausforderung ist wieder sehr komplex. Aus dem Worksheet "Alle Werte" soll eine Tabelle erzeugt werden in der wieder summiert wird.
Ich habe die Herausforderungen in dem Worksheet "Berechnete Daten2" eingetragen.
Ich denke, dass auch hier das CreateObject("Scripting.Dictionary")eingesetzt werden kann. Leider muss ich noch lernen wie man damit arbeiten kann.
https://www.herber.de/bbs/user/100578.xlsm
Für Eure Hilfe bedanke ich mich im voraus,
LG,
Peter

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

Betreff
Datum
Anwender
Anzeige
AW: Warum nicht als PivotTabelle?
05.10.2015 11:03:12
Michael
Hallo Peter!
Ich lasse die Frage offen, weil Du spezifisch nach einer VBA-Lösung gefragt hast - aber mir drängt sich eine Frage auf, deren Antwort evtl. den Arbeitsaufwand von HelferInnen und ggf. Dir verringern kann:
Warum nutzt Du für diese Abfrage keine PivotTabelle? Die Darstellung weicht zwar etwas von Deiner Wunsch-Darstellung ab, ist aber VBA-frei und problemlos umzusetzen und blitzschnell in der Auswertung. Siehe mein quick-and-dirty-Beispiel (Einrichtungsdauer: unter 60 Sekunden): https://www.herber.de/bbs/user/100588.xlsx (ist in der Tabelle1, bezogen auf "Alle Daten")
Nur so als Anregung!
LG
Michael

Anzeige
AW: Warum nicht als PivotTabelle?
05.10.2015 19:35:53
Peter
Hallo Michael,
danke für deine Antwort aber mein ganzes, ziemlich umfangreiches System ist auf VBA-Basis.
Deshalb möchte ich weitere Module mit VBA programmieren.
LG,
Petere

AW: Warum nicht als PivotTabelle?
08.10.2015 18:37:02
Peter
Hallo Peter,
ich verfüge ebenfalls nur über bescheidene VBA-Kenntnisse, verstehe mich aber ganz gut auf schwierige Konsolidierungen (per VBA, nicht als Pivot-Tabelle!). Hier meine Lösung:
https://www.herber.de/bbs/user/100666.xlsm
Ich habe das Programm unter "E:\Musterloesungen\Schwierige_Konsolidierung.xlsm" getestet. Du kannst die Datei genau so abspeichern oder ein anderes Laufwerk, einen anderen Pfad oder einen anderen Dateinamen benutzen. In letzteren Fall bitte zunächst den Button "Regieeinträge einblenden" betätigen und die Formeln in den Zellen "J14" und "E18" wie beschrieben ändern; dann die Datei auf Deinem System abspeichern und testen.
Wenn Du Dir einen Eindruck über den Programmablauf machen möchtest, kannst Du die Befehle

Application.DisplayAlerts = False
Sheets(Array("konsol1", "konsol2")).Select
Sheets("konsol2").Activate
ActiveWindow.SelectedSheets.Delete
Application.DisplayAlerts = True

im unteren Teil von Makro1 mit dem Hochkomma (') ausblenden. Die Blätter "konsol1" und "konsol2" bleiben dann erhalten und Du kannst sie betrachten. Vor einem erneuten Start müssen diese Bläter wieder (von Hand) gelöscht werden. Für den Echtbetrieb sollten die oben aufgeführten Befehle auf aktiv gesetzt werden.
FeedBack wäre schön.
Mit freundlichem Gruß
Peter Kloßek
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige