Makro zur Datenzusammenfassung

Ernst Fischer
Sub Auswertung() 

    Application.ScreenUpdating = False 

'Nummern aus Kostentabelle holen: 
    Sheets("Kosten").Select 
    Range("C11:C5010").Select 
    Selection.Copy 
    Sheets("Ueb").Select 
    Range("C11").Select 
    Selection.PasteSpecial Paste:=xlPasteValues 
    Application.CutCopyMode = False 

'Kostensätze holen: 
    Sheets("Kosten").Select 
    Range("E11:E5010").Select 
    Selection.Copy 
    Range("A1").Select 
    Sheets("Ueb").Select 
    Range("F11").Select 
    Selection.PasteSpecial Paste:=xlPasteValues 
    Application.CutCopyMode = False 

'Daten aus Mengentabelle holen: 
    Sheets("Mengen").Select 
    Range("D11:F50010").Select 
    Selection.Copy 
    Range("A1").Select 
    Sheets("Ueb").Select 
    Range("C5011").Select 
    Selection.PasteSpecial Paste:=xlPasteValues 
    Application.CutCopyMode = False 

'Gesamten Datenblock aufsteigend C11 sortieren: 
    Range("C11:F55010").Select 
    Selection.Sort Key1:=Range("C11"), Order1:=xlAscending, _ 
    Header:=xlNo, OrderCustom:=1, MatchCase:=False, _ 
    Orientation:=xlTopToBottom 
    Application.CutCopyMode = False 

'Einfügeblock für die Formeln herstellen:
    Range("C11:C55010").Select
    Selection.Copy
    Range("H11:K11").Select
    Selection.PasteSpecial Paste:=xlPasteValues
    Application.CutCopyMode = False

'Formeln einsetzen, Werte fixieren:
    Sheets("Fo").Select
    Range("H11:K11").Select
    Selection.Copy
    Sheets("Ueb").Select
    Range("H11").Select
    Selection.CurrentRegion.Select
    Selection.PasteSpecial Paste:=xlPasteFormulas
    Application.CutCopyMode = False
    Selection.Copy
    Selection.PasteSpecial Paste:=xlPasteValues
    Application.CutCopyMode = False

'Gesamten Datenblock aufsteigend I11 sortieren:
    Range("C11:K55010").Select
    Selection.Sort Key1:=Range("I11"), Order1:=xlAscending, _
    Header:=xlNo, OrderCustom:=1, MatchCase:=False, _
    Orientation:=xlTopToBottom
    Application.CutCopyMode = False

'Zusätzliche Textkennung zur Sicherheit:
    Range("I10").Select
    ActiveCell.FormulaR1C1 = "a"

'Textkonstanten entfernen:
    Range("I10:I55010").Select
    Selection.SpecialCells(xlCellTypeConstants, 2).Select
    Selection.ClearContents
    Application.CutCopyMode = False

'Unten 2 Zeilen einfügen:
    Range("I55110").Select
    Selection.End(xlUp).Select
    ActiveCell.Offset(1, 0).Select
    Selection.EntireRow.Insert
    Selection.EntireRow.Insert
    Application.CutCopyMode = False

'Untere Blöcke entfernen:
    ActiveCell.Offset(2, -6).Select
    Selection.CurrentRegion.Select
    Selection.ClearContents
    Application.CutCopyMode = False
    ActiveCell.Offset(0, 5).Select
    Selection.CurrentRegion.Select
    Selection.ClearContents
    Application.CutCopyMode = False
    ActiveCell.Offset(0, 2).Select
    Selection.CurrentRegion.Select
    Selection.ClearContents
    Application.CutCopyMode = False

'Datenblöcke aufschließen:
    Range("J11:J55012").Select
    Selection.Copy
    Range("E11").Select
    Selection.PasteSpecial Paste:=xlPasteValues
    Application.CutCopyMode = False
    Range("H11:H55012").Select
    Selection.Copy
    Range("F11").Select
    Selection.PasteSpecial Paste:=xlPasteValues
    Application.CutCopyMode = False
    Range("K11:K55012").Select
    Selection.Copy
    Range("G11").Select
    Selection.PasteSpecial Paste:=xlPasteValues
    Application.CutCopyMode = False

'Blöcke rechts entfernen:
    Range("H11:K55012").Select
    Selection.ClearContents
    Application.CutCopyMode = False

'Formate einsetzen:
    Sheets("Fo").Select
    Range("C25:G25").Select
    Selection.Copy
    Range("A1").Select
    Sheets("Ueb").Select
    Range("C11").Select
    Selection.CurrentRegion.Select
    Selection.PasteSpecial Paste:=xlPasteFormats
    Application.CutCopyMode = False

'Resultate umsetzen:
    Selection.Copy
    Sheets("Tab1").Select
    Range("C11").Select
    ActiveSheet.Paste

'Überleitung löschen:
    Sheets("Ueb").Select
    Range("C11:G5010").Select
    Selection.Clear
    Application.CutCopyMode = False
    Range("A1").Select
    Sheets("Tab1").Select
    Range("A1").Select
    Application.ScreenUpdating = True

End Sub




letzte Änderung Ernst Fischer am 11.01.2025

Excel-Tools

Bleiben Sie auf dem Laufenden mit unserem Newsletter

Tragen Sie sich für den kostenfreien und unverbindlichen Newsletter von Controlling-Portal.de ein und erhalten Sie jeden Monat aktuelle Neuigkeiten für Controller. Wir informieren Sie über neue Fachartikel, über wichtige News, aktuelle Stellenangebote, interessante Tagungen und Seminare. Wir empfehlen Ihnen spannende Bücher und geben Ihnen nützliche Excel-Tipps. Verpassen Sie nie mehr wichtige Diskussionen im Forum und stöbern Sie in Software-Angeboten, die Ihnen den Arbeitsalltag erleichtern. Beispiel-Newsletter >>

Jetzt Newsletter gratis erhalten

Premium-Stellenanzeigen



Eigenen Fachbeitrag veröffentlichen? 

Sie sind Autor einer Fachpublikation oder Entwickler einer Excel-Vorlage? Gern können Sie sich an der Gestaltung der Inhalte unserer Fachportale beteiligen! Wir bieten die Möglichkeit Ihre Fachpublikation (Fachbeitrag, eBook, Diplomarbeit, Checkliste, Studie, Berichtsvorlage ...) bzw. Excel-Vorlage auf unseren Fachportalen zu veröffentlichen bzw. ggf. auch zu vermarkten. Mehr Infos >>

Kommentar zum Fachbeitrag abgeben

Nur registrierte Benutzer können Kommentare posten!

Controlling- Newsletter

Neben aktuellen Fach- und Arbeitsmarkt-Trends für Controller und neu eingegangene Fachbeiträge, informieren wir Sie über interessante Veranstaltungen und stellen Ihnen einzelne Controlling-Tools im Detail vor.
Werden Sie jetzt monatlich über
neue Fachbeiträge, Jobs und Tools informiert! 
Zur Newsletter-Anmeldung >>

Über 3.000 Artikel und Vorlagen

Community_Home.jpg






Werden Sie Mitglied in einer großen Controller-Community (über 12.000 Mitglieder!) und erhalten Zugriff auf viele Inhalte und diskutieren ihre Fragen im Controlling-Forum.

Sehen Sie hier die neuesten Fachbeiträge >>

Eine neue Stelle?

Mit dem Studium fertig, Umzug in eine andere Region, Aufstiegschancen nutzen oder einfach nur ein Tapetenwechsel? Dann finden Sie hier viele aktuell offene Stellen im Controlling.
Zu den Stellenanzeigen >>

Zukunft_Aussicht_Menschen_Fernglas_pm_prometeus_315.jpg

Sie suchen einen Controller? Mit einer Stellenanzeige auf Controlling-Portal.de erreichen Sie viele Fachkräfte. weitere Informationen >>

KLR-Begriffe von A bis Z

A-C   D-F   G-I   J-L   M-R   S-U   V-Z 

Testen Sie ihr Wissen mit unseren Aufgaben und Lösungen im Bereich Kostenrechnung >>

Sie haben eine Frage?

Ratlos_Verwirrt_pm_RainerPlendl_400x275.jpg

Nutzen Sie kostenfrei das Forum für Controller und und diskutieren ihre Fragen zu Controlling-Themen.

Riesen- Ressource

Auf Controlling-Portal.de sind bereits über 1.800 Fachbeiträge veröffentlicht und ständig kommen neue dazu.

Zu den neuesten Fachbeiträgen >>
Zu den derzeit meistgelesenen Fachbeiträgen >>
Zu den Premium-Beiträgen >>

Sie möchten auch einen Fachbeitrag hier veröffentlichen? Dann erhalten Sie hier weitere Informationen >>

Amüsante Glosse

Zweifel_Denken_Frau_Brille_pm_luckyraccoon_400x300.jpg

Erfolgreiche Unternehmer einer Kleinstadt treffen sich regelmäßig im örtlichen Golfclub und diskutieren mit Ihrer Lieblingskellnerin und BWL-Studentin Pauline betriebswirtschaftliche Probleme. Amüsant und mit aktuellem Bezug geschrieben von Prof. Peter Hoberg.

Zur Serie "Neulich im Golfclub" >>

Sie möchten sich weiterbilden?

mann-treppe-up-karriere_pm_pressmaster_B10716345_400x300.jpg

In unserer Seminar-Rubrik haben wir einige aktuelle Seminar- und Kurs-Angebote für Controller, u.a. auch Kurse zum Controller / IHK zusammengestellt.

Talentpool - Jobwechsel einfach!

HR-Bewerbung-Digital_pm_yupiramos_B123251108_400x300.jpg

Tragen Sie sich kostenfrei im Talentpool auf Controlling-Portal.de ein und erhalten Jobangebote und Unterstützung beim Jobwechsel durch qualifizierte Personalagenturen.
eBook Cover 290px geschnitten nur Hand.jpg

eBook: Controlling mit Chat GPT

Dieses Buch zeigt praxisnah, wie Sie ChatGPT effektiv in Ihren Controlling-Alltag integrieren können. Von der Erstellung intelligenter Prompts bis hin zur Automatisierung von Controlling-Prozessen – Sie erhalten das Wissen und die Werkzeuge, um Ihre Arbeit auf das nächste Level zu heben.

Jetzt hier für 9,99 EUR downloaden >>

Controlling-Software gesucht?

controlling_Dashboard_pm_ml12nan_B9707546_400x300.jpg

Verschaffen Sie sich hier einen Überblick >>
Facebook_Logo_Primary.png
Bleiben Sie auf dem Laufenden und informieren sich über neue Fachbeiträge, Excel-Tools und Jobangebote auf unserer Facebook-Seite >>

Stellenanzeigen

Referentin / Referent im Bereich Digitalisierung des Rechnungswesen (w/m/d)
Die Bundesanstalt für Immobilienaufgaben (BImA) ist das Immobilienunternehmen des Bundes, das die immobilienpolitischen Ziele der Bundesregierung unterstützt und für fast alle Bundesbehörden die notwendigen Flächen und Gebäude zur Verfügung stellt. Dementsprechend sind wir in ganz Deutsch... Mehr Infos >>

Betriebswirt / Volkswirt / Industriekaufmann als Controller / Referent Controlling Finance Medizintechnik (m/w/d)
RAUMEDIC entwickelt mit rund 1.200 Mitarbeitenden Lösungen für das Leben. Um die Diagnose und Therapie von Erkrankungen zu verbessern, konzentrieren wir uns auf kunststoffbasierte Lösungen für die medizinische und pharmazeutische Anwendung sowie auf Produkte zur intensivmedizinischen Versorgung. Mehr Infos >>

Payroll Manager (m/w/d)
Als einer der bedeutendsten Messeveranstalter der Welt steht die Messe München für faszinierende Erlebnisse und inspirierende Begegnungen. Auf unseren rund 90 Fachmessen im In- und Ausland bieten wir Begegnungsplattformen, auf denen man aus nächster Nähe Innovationen und die Welt von morgen erleb... Mehr Infos >>

Controller (w/m/d) in Voll- oder Teilzeit
Die Max-Planck-Stiftung engagiert sich für friedvollen Wandel, nachhaltige Entwicklung und die Stärkung von Rechtsstaatlichkeit. Durch Mediation, juristische Beratung sowie Aus- und Weiterbildungen unterstützt sie Staaten, die ihre Rechtssysteme grundlegend reformieren und ihre Institutionen stär... Mehr Infos >>

Finanzbuchhaltung (m/w/d)
Die E&P Reisen und Events GmbH ist ein Reiseveranstalter mit den Schwerpunkten Wintersportreisen, Gruppenreisen, Events und Incentivereisen.  Mit uns verreisen jährlich mehr als 27.000 Kund:innen. Diese übernachten überwiegend in von uns geführten Sportclubs und Gruppenhäusern. Unter de... Mehr Infos >>

Expertin / Experte für SAP, Finanzen und Controlling (w/m/d)
Die Bundesanstalt für Immobilienaufgaben (BImA) ist das Immobilienunternehmen des Bundes, das die immobilienpolitischen Ziele der Bundesregierung unterstützt und für fast alle Bundesbehörden die notwendigen Flächen und Gebäude zur Verfügung stellt. Dementsprechend sind wir in ganz Deutsch... Mehr Infos >>

Kaufmännischer Risikomanager / Corporate Risk Manager*in
Willkommen bei der Universitätsmedizin Greifswald – dem Ort, an dem Innovation auf Tradition trifft und gemeinsam die Zukunft der Gesundheitsversorgung gestaltet wird. Wir sind stolz auf unser vielfältiges Team von Fachkräften, das sich leidenschaftlich für exzellente Patientenversorgung, Forschu... Mehr Infos >>

Mitarbeiter / Werkstudent im Controlling (m/w/d) – Power BI
Die Wurm-Gruppe gehört als Pionier der Automatisierung von Kälte- und Gebäudetechnik im Lebensmittelhandel zu den führenden Anbietern. Unsere Regel- und Überwachungssysteme werden von vielen bekannten Großunternehmen im In- und Ausland eingesetzt. Mit unseren energieeffizienten und zukunftsorient... Mehr Infos >>

Weitere Stellenanzeigen im Stellenmarkt >>

Folgen Sie uns!

panthermedia_B90564160_patronestaff_310px.jpg

Controlling-Portal auf:
Facebook >> und  Linkedin >>

Online-Seminar:
Storytelling mit Daten für Controller:innen und Datenprofis

20241008-07373_290x100.jpg
Mit diesem Online-Seminar lernst du Kernbotschaften und Handlungsempfehlungen wirksam zu vermitteln. Denn von Controller:innen und Business Analyst:innen wird heutzutage mehr verlangt als Reports und Dashboards. Sie sollen Daten in handlungsrelevante Empfehlungen übersetzen und Unternehmensleitung, sowie Fachbereiche mit ihrem datenbasierten Wissen beraten. Für diese anspruchsvolle Aufgabe braucht es eine Vielzahl an Fähigkeiten. Eine der Wichtigsten ist, datenbasierte Erkenntnisse und Ideen strukturiert, überzeugend und zielgruppengerecht zu kommunizieren.   

Erfahre mehr zum Online-Seminar >>  

JOB- TIPP

Karriere_290px.png
Sind Sie auf der Suche nach einer neuen Herausforderung? Interessante Stellenangebote für Controller finden Sie in der Controlling-Portal Stellenbörse. Immer auf dem Laufenden bleiben und neue Jobangebote mit dem Jobletter automatisch erhalten? Zur Jobletter-Anmeldung >>

Kostenverfolgung Bauprojekte

Kostenverfolgung-Bauprojekte.jpg
Mit diesem einfachen Excel-Tool lässt sich die Kostenverfolgung für Bauprojekte leicht gestalten. Sie pflegen separate Listen für das Budget, Hauptaufträge, Nachträge, erwartete Kosten und Rechnungen und bekommen diese Kosten in einer Übersicht auf einem separaten Blatt nach Vergabeeinheiten und Kostengruppen zusammengefasst.

Jetzt hier für 20,- EUR downloaden >>

Excel-Tools für Controller!

Diagramme_Charts_pm_chormail@hotmail-com_B347361660_400x300.jpg

Über 500 Vorlagen direkt zum Download. Verschaffen Sie sich einen Überblick >>

Software-Tipps

Jabatix_logo_200px.jpg
Jabatix NC ist eine Rechenmaschine, als add-on für Excel, für Controller in kleinen und mittleren Unternehmen. Sie führt komplexe Berechnungen durch und stellt die Ergebnisse in EXCEL bereit – ohne lange Einarbeitung. Mehr Informationen >>

Diamant.PNG
Diamant/3 bietet Ihnen ein Rechnungswesen mit integriertem Controlling für Bilanz- / Finanz- und Kosten- / Erfolgs- Controlling sowie Forderungsmanagement und Personalcontrolling. Erweiterbar bis hin zum unternehmensweiten Controlling. Mehr Informationen >>


Weitere Controlling-Software-Lösungen im Marktplatz >>

Excel-Vorlage: Bilanzanalyse

Analysieren Sie die Bilanz Ihres Unternehmens oder Wettbewerbers ohne großen Aufwand aber transparent in Grafiken aufbereitet. Profitieren Sie von einer klaren Übersicht und Jahresvergleich der einzelnen Bilanzpositionen.
Mehr Informationen >>

Excel Vorlage Boston Matrix

Boston_Matrix_Excel_Vorlage.png
Mit der Excel-Vorlage "Boston Matrix" haben ein strategisches Tool für die Analyse von Marktteilnehmern. Nachdem Sie eine Kennzahl, zum Beispiel Umsatz, der Marktteilnehmer und dem Benchmark-Teilnehmer in einer Eingabemaske eingegeben haben, werden diese im 4 Felder-Portfolio visualisiert. Ideal für Unternehmensberater bzw. strategische Auswertungen.
Mehr Informationen >>

RS Toolpaket - Planung

Wir setzen für Sie den Rotstift an. Sparen Sie mit unsrem RS Toolpaket - Planung über 35% im Vergleich zum Einzelkauf. Das RS Toolpaket -Planung stellt Ihnen die wichtigsten Werkzeuge für Ihre Unternehmensplanung zur Verfügung. Das Planungspaket umfasst 4 Excel-Tools! 
Mehr Informationen >>

Weitere über 400 Excel-Vorlagen finden Sie hier >>
Prompt-KI-Beschreibung_290px.jpg

Prompt – KI Agenten Beschreibung

Erstellen Sie in wenigen Minuten Ihren eigenen KI-Agenten – präzise, professionell und individuell. Mit dieser Excel-Vorlage erstellen Sie mühelos eine vollständige Beschreibung für Ihren persönlichen KI-Agenten, die Sie direkt in Tools wie ChatGPT, Copilot, Google Gemini oder Claude einfügen können.

Jetzt hier für 4,99 EUR downloaden >>

Excel TOP-SellerRS Liquiditätsplanung L

PantherMedia_pannawat_B100513902_400x300.jpg
Die RS Liquiditätsplanung L ist ein in Excel erstelltes Werkzeug für die Liquiditätsplanung von Kleinunternehmen sowie Freiberuflern. Die Planung erfolgt auf Basis von veränderbaren Einnahmen- und Ausgabepositionen. Detailplanungen können auf extra Tabellenblättern für z.B. einzelne Projekte oder Produkte vorgenommen werden. 
Mehr Informationen >>

Rollierende Liquiditätsplanung auf Wochenbasis

Dieses Excel-Tool bietet Ihnen die Grundlage für ein Frühwarnsystem. Der erstellte Liquiditätsplan warnt Sie vor bevorstehenden Zahlungsengpässen, so dass Sie frühzeitig individuelle Maßnahmen zur Liquiditätssicherung einleiten können. Gerade in Krisensituationen ist eine kurzfristige Aktualisierung und damit schnelle Handlungsfähigkeit überlebenswichtig. Mehr Informationen >>

Strategie-Toolbox mit verschiedenen Excel-Vorlagen

Die Strategie-Toolbox enthält 10 nützliche Excel Vorlagen, die sich erfolgreich in der Strategie bewährt haben. Alle Tools sind sofort einsatzbereit und sind ohne Blattschutz. Damit können die Vorlagen individuell angepasst werden.
Ideal für Mitarbeiter aus dem strategischen ManagementMehr Informationen>>

Weitere über 400 Excel-Vorlagen finden Sie hier >>

Software-Tipp

Liquiditätsplanung_Fimovi.jpgRollierende Liquiditätsplanung auf Wochenbasis. Mit der Excel-Vorlage „Liquiditätstool“ erstellen Sie schnell und einfach ein Bild ihrer operativen Liquiditätslage für die nächsten (bis zu 52) Wochen. Mehr Infos und Download >>