Supportnet / Forum / Tabellenkalkulation
In Excel Abfrage bearbeiten aus Access
Frage
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 1 von RalfH
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
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
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
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
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
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
Hallo Ralf,
habe Dir meine Adresse per Pager mitgeteilt.
Gruß
Rainer
habe Dir meine Adresse per Pager mitgeteilt.
Gruß
Rainer
Antwort 5 von RalfH
Mail ist unterwegs
Antwort 6 von RalfH
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?
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
Ich nochmal,
Jetzt bin ich gerade dabei die Zuordnung über VBA zu gestalten, das mache ich so:
Das funktioniert auch aber, das müsste ich jetzt über 20 Zeilen mit jeweils 18 Varianten machen :(
Das geht doch bestimmt auch eleganter?
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").ValueDas funktioniert auch aber, das müsste ich jetzt über 20 Zeilen mit jeweils 18 Varianten machen :(
Das geht doch bestimmt auch eleganter?