Gruppen

Top Gruppen: Windows 7; Windows Vista; Windows XP; Textverarbeitung; Excel; DSL; Internet Browser; E-Mail/Outlook
Betriebsysteme: Windows classik; Linux; BS-Sonstige
Software: Datenbanken; Bildbearbeitung; Audio/mp3/Video; Security/Viren; SW-Sonstige
Hardware: Mainboard/CPU; Grafikkarten; Peripherie; Laptop/Notebook; HW-Sonstiges
Netzwerk: Telefon,ISDN,Modem; W-Lan; NW-Sonstiges
Programmierung: PHP,ASP,Perl...; Java,C++...; Webseiten/HTML
Sonstiges: PC-Sonstiges; Plauderecke; SN Intern; Test

/ Forum / Tabellenkalkulation

Tabellenkalkulation

Fragevon RalfH vom 04.06.2019, 07:14 Options

In Excel Abfrage bearbeiten aus Access

Hallo und guten Morgen,

Ich möchte eine Importierte Access Abfrage( wird bei jedem Start des Excel Blattes aktualisiert) sortieren.

Die Abfrage sieht ungefähr so aus:
KST Anfang ENDE Kategorie Verl Schicht
111 10:12 10:20 Manuel 9 Früh
111 12:00 13:10 Manuel 12 Früh
111 22:41 22:59 Peripherie 6 Spät

In einem anderen Tabellenblatt ist ein Stapeldiagramm mit Stapel für jede Kategorie.
Jetzt möchte ich gerne, das Excel mir die Kategorie, wenn Sie mehrfach vorkommt und in der gleichen Schicht ist, Summiert und in einer Zelle in dem Tabellenblatt mit dem Diagramm schreibt.
Wie geht das ?
Gruß Ralf

Antwort schreiben

Antwort 1 von RalfH vom 04.06.2019, 11:25 Options

Kann man das ganze mit SummeWenn erreichen?

Ich versuch das, indem ich die KST&Kategorie in einer neuen Zelle zusammenfüge, und dann müsste Excell das sortieren können, oder ?
Ralf

Antwort 2 von rainberg vom 04.06.2019, 12:26 Options

Hallo Ralf,

Du könntest in Deiner Ausgangstabelle eine Hilfsspalte einfügen in der Du die Bedingungen stetzt für die Datensätze, die ins Auswertungsblatt transferiert werden sollen.
Daraus kannst Du dann Dein Diagramm erstellen.

Um weitere Erklärungen zu sparen, hänge ich ein Beispiel an.

http://www.netupload.de/detail.php?img=f7325b39515b856820eaae36604a...

Gruß
Rainer

Antwort 3 von RalfH vom 05.06.2019, 06:27 Options

Hallo Rainer,
Ich habe mir Dein Beispiel angeguckt, und ich glaube es ist das was ich suche, allerdings macht er nicht alles so wie ich das möchte. Wie könnte ich Dir mal ne Kopie meiner Excel Tabelle zukommen lassen, damit du dir das mal genauer anschauen könntest, wenn Du so nett wärst.
Gruß Ralf

Antwort 4 von rainberg vom 05.06.2019, 06:53 Options

Hallo Ralf,

habe Dir meine Adresse per Pager mitgeteilt.

Gruß
Rainer

Antwort 5 von RalfH vom 05.06.2019, 07:06 Options

Mail ist unterwegs

Antwort 6 von RalfH vom 05.06.2019, 08:54 Options

Ich habe jetzt die Gruppierung und die Summierung für die Schicht;Kategorien und Verl über die Abfrage in Access erstellt.

Wie bekomme ich es hin das er mir jetzt die entsprechenden Daten der Kategorien in die richtigen Zellen des Diagramm setzt?

Antwort 7 von RalfH vom 05.06.2019, 09:58 Options

Ich nochmal,
Jetzt bin ich gerade dabei die Zuordnung über VBA zu gestalten, das mache ich so:

Worksheets("Abfrage").Select
If Range("L2").Value = "Umgebung Peripherie1" Then
Worksheets("Berechnungen").Select
Range("B12") = Worksheets("Abfrage").Range("M2").Value



ElseIf Range("L2").Value = "Umgebung Peripherie2" Then
Worksheets("Berechnungen").Select
Range("B13") = Worksheets("Abfrage").Range("M2").Value



ElseIf Range("L2").Value = "Umgebung Peripherie3" Then
Worksheets("Berechnungen").Select
Range("B14") = Worksheets("Abfrage").Range("M2").Value

End If



Worksheets("Abfrage").Select

If Range("L2").Value = "Anlagen bedingt1" Then
Worksheets("Berechnungen").Select
Range("C12") = Worksheets("Abfrage").Range("M3").Value

Worksheets("Abfrage").Select
ElseIf Range("L2").Value = "Anlagen bedingt2" Then
Worksheets("Berechnungen").Select
Range("C13") = Worksheets("Abfrage").Range("M3").Value

Worksheets("Abfrage").Select
ElseIf Range("L2").Value = "Anlagen bedingt3" Then
Worksheets("Berechnungen").Select
Range("C14") = Worksheets("Abfrage").Range("M3").Value




End If

Worksheets("Abfrage").Select

If Range("L2").Value = "Personenbedingt1" Then
Worksheets("Berechnungen").Select
Range("D12") = Worksheets("Abfrage").Range("M3").Value

Worksheets("Abfrage").Select
ElseIf Range("L2").Value = "Personenbedingt2" Then
Worksheets("Berechnungen").Select
Range("D13") = Worksheets("Abfrage").Range("M3").Value

Worksheets("Abfrage").Select
ElseIf Range("L2").Value = "Personenbedingt3" Then
Worksheets("Berechnungen").Select
Range("D14") = Worksheets("Abfrage").Range("M3").Value


End If

Worksheets("Abfrage").Select

If Range("L2").Value = "Karossenmangel Vorbereich1" Then
Worksheets("Berechnungen").Select
Range("C12") = Worksheets("Abfrage").Range("M3").Value

Worksheets("Abfrage").Select
ElseIf Range("L2").Value = "Karossenmangel Vorbereich2" Then
Worksheets("Berechnungen").Select
Range("C13") = Worksheets("Abfrage").Range("M3").Value

Worksheets("Abfrage").Select
ElseIf Range("L2").Value = "Karossenmangel Vorbereich3" Then
Worksheets("Berechnungen").Select
Range("C14") = Worksheets("Abfrage").Range("M3").Value

Das funktioniert auch aber, das müsste ich jetzt über 20 Zeilen mit jeweils 18 Varianten machen :(

Das geht doch bestimmt auch eleganter?

Hinweis

Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..

Neue Einträge

Tipp einschicken

News einschicken