Home / Fachinfo / Excel-Tipps / Excel-Funktionen

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 16.08.2024

Zurück zur Übersicht
Literaturhinweise
Excel-Tools
Weitere Fachbeiträge zum Thema

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 Neuigkeiten für Controller und neu eingegangene Fachartikel, informieren wir Sie über interessante Literaturtipps, Tagungen , Seminarangebote und stellen Ihnen einzelne Software- Produkte im Detail vor.
Werden Sie jetzt monatlich über neue Fachbeiträge, Controlling-Tools und News informiert! Zur Newsletter-Anmeldung >>

Über 3.000 Artikel und Vorlagen

Community_Home.jpg






Werden Sie Mitglied in einer großen Controller-Community (fast 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 >>

Controller- Stellenmarkt

Controller (m/w/d), Deutsche Rentenversicherung Braunschweig-Hannover, Laatzen
Personalcontroller (w/m/d), Agentum Gruppe, Berlin
Controller im Funktionscontrolling (m/w/d), Kromberg & Schubert Automotive GmbH & Co. KG, Abensberg bei Regensburg
Referent (m/w/d) Buchhaltung / Kreditoren - Strategien und Prozesse, Hamburg Wasser, Hamburg
Controller (m/w/d), Klinikum Freising GmbH, Freising
Senior Controller (m/w/d), Werner Sobek AG, Stuttgart
Mitarbeiterin / Mitarbeiter Controlling und Prozessmanagement (w/m/d), Berliner Stadtreinigungsbetriebe AöR (BSR), Berlin, Homeoffice möglich
Manager Financial Closing & Reporting (w/m/d), PAUL HARTMANN AG, Heidenheim

Alle Einträge Neuer Eintrag

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.

Controlling-Software

BusinessPlanner* - Software für Finanzplanung
IDL CPM Suite
hmd.rewe - Die integrierte Software für Rechnungswesen
SWOT Controlling
LucaNet Konsolidierungssoftware
LucaNet Finanzplanungssoftware
Diamant/4 Rechnungswesen+Controlling
Serviceware Performance
Alle Einträge Neuer Eintrag

Riesen- Ressource

Auf Controlling-Portal.de sind bereits über 1.500 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 >>

Neueste Excel-Vorlagen

Flexi-Dienstplan Plus (Excel-Vorlage)
E-Autobatterie Ladeplaner
Excel- Tool zum Erstellen von KO-Turnieren
Arbeitshilfe Break Even Analyse auf Stundenbasis
Preiskalkulation speziell für Gala-Bau und Tiefbau
Organigrammerstellung in Excel
Projektplaner in Excel
Stammdatenverwaltung in Excel
Urlaubs- und Fehlzeitenplaner - 50 Mitarbeiter
Besprechungsplaner in Excel
Alle Einträge Neuer Eintrag

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.

Wie zufrieden sind Sie mit uns?

teamwork_pm_Dmitriy_Shironosov_400x300.jpg  
Über Ihre Meinung und auch ihre Anregungen für Veränderungen oder Erweiterungen würden wir uns sehr freuen. Nur 3 kurze Fragen, die schnell beantwortet sind. Vielen Dank im Voraus für Ihre Mithilfe! zur Umfrage >>

Controlling-Software gesucht?

controlling_Dashboard_pm_ml12nan_B9707546_400x300.jpg

Verschaffen Sie sich hier einen Überblick >>
Anzeige
Excel-Vorlagen für Controlling und Rechnungswesen

Stellenanzeigen

Fachkraft (m/w/d) im Projektcontrolling
ür die Zentralabteilung Forschungsreaktor am Standort Geesthacht suchen wir für den Abbau der kerntechnischen Einrichtungen zum nächstmöglichen Zeitpunkt – unbefristet – eine qualifizierte Kollegin (m/w/d), die bereits über einschlägige Berufserfahrung in diesem Aufgabenfeld verfügt. Di... Mehr Infos >>

Senior Controller (m/w/d)
Werner Sobek steht weltweit für Engineering, Design und Nachhaltig­keit. Mehr als 400 Kolleg:innen arbeiten in unserem Unter­nehmen, das auf mehreren Konti­nenten vertreten ist. Unsere Arbeiten zeichnen sich durch hochklassige Gestaltung auf der Basis von heraus­ragendem Engineering und integrale... Mehr Infos >>

Senior Controller/in (m/w/d)
Seit Generationen, für Generationen: Der nachhaltige Umgang mit Ressourcen und unserer Umwelt ist seit jeher der Grundgedanke unseres Familienunternehmens und unserer Dienstleistungen für die Immobilien­wirtschaft. Wir ermöglichen Millionen Menschen die effiziente und verantwortungsvolle Nutzung ... Mehr Infos >>

Controller (m/w/d)
Bijou Brigitte – das bedeutet mehr als 50 Jahre Leidenschaft für Modeschmuck und Accessoires. Mit rund 1.100 Filialen in über 20 Ländern ist Bijou Brigitte der Marktführer in Europa. Unsere Konzernzentrale mit allen strategischen Fachbereichen sitzt in Hamburg. Flache Hierarchien und kurze Entsch... Mehr Infos >>

Steuerfachangestellter (m/w/d) Finanz- und Rechnungswesen
Wir machen Erneuerbare aus Überzeugung: ABO Energy plant und errichtet weltweit Wind- und Solarparks sowie Batterie- und Wasserstoffprojekte. Seit fast 30 Jahren bieten die hausinternen Fachabteilungen von ABO Energy alles aus einer Hand: von der Standortbegutachtung, Planung, Genehmigung und Fin... Mehr Infos >>

Pricing Manager (m/w/d)
LITEF-Produkte sind weltweit in einer Vielzahl von Anwendungen im Einsatz. Unsere Lösungen und Erfahrungen bieten wir Kunden, die dynamische Vorgänge (Beschleunigungen und Drehungen) messen und regeln wollen, Lage und Kurs von Fahrzeugen ermitteln oder navigieren wollen – auf dem Land, in... Mehr Infos >>

Projektmanager (m/w/d) Projektfinanzierung / Vertrieb / M&A Erneuerbare Energien
Wir machen Erneuerbare aus Überzeugung: ABO Energy plant und errichtet weltweit Wind- und Solarparks sowie Batterie- und Wasserstoffprojekte. Seit fast 30 Jahren bieten die hausinternen Fachabteilungen von ABO Energy alles aus einer Hand: von der Standortbegutachtung, Planung, Genehmigung und Fin... Mehr Infos >>

Abteilungsleiter Betriebswirtschaft (w/m/d)
Als kommunaler Dienstleister und größtes Unternehmen der Wasserwirtschaft in Mecklenburg-Vorpommern kümmern wir uns für etwa 270.000 Menschen sowie Unternehmen um den gesamten Wasserkreislauf – von der Trinkwasserversorgung bis zur Abwasserreinigung. Dafür engagieren sich bei Nordwasser täglich r... Mehr Infos >>

Weitere Stellenanzeigen im Stellenmarkt >>

Folgen Sie uns!

panthermedia_B90564160_patronestaff_310px.jpg

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

Veranstaltungs-Tipp

Confex_Online-Banner_290px.jpg
Lernen Sie von unseren Experten alle Tricks zum Thema Power BI.
  • Erfahrene Trainer mit fundiertem Power BI Wissen
  • Praxisnahe Beispiele und Übungen für sofortige Anwendung
  • Kleine Gruppen für maximale Interaktion
Melden Sie sich jetzt an, es gibt noch freie Plätze.

JOB- Letter

 jobletter.jpg
Sie möchten über neu eingehende Stellenangebote automatisch informiert werden? Dann können Sie unseren kostenfreien Jobletter abonnieren. Mit diesem erhalten Sie alle 14 Tage die aktuellsten Stellenanzeigen und weitere Arbeitsmarkt-News.
 



aufgefallen ?!


Ihre Werbung hier !





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

Unbenannt.png
SWOT. Für bessere Entscheidungen. Ob Business 1.0 oder 4.0 - je dynamischer die Märkte werden, desto schneller muss auch das Controlling sein: Wo stehen wir tagesaktuell mit dem Umsatz, welche Produkte liefern aktuell welche Deckungsbeiträge oder wie sieht bei der heutigen Auftragslage der Cashflow im nächsten Quartal aus usw. 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 >>

Arbeitshilfe Krisenmanagement

Das neue Unternehmensstabilisierungs- und –restrukturierungsgesetz (StaRUG) ist Bestandteil des seit Anfang 2021 geltenden Gesetzes zur Fortentwicklung des Sanierungs- und Insolvenzrechts (SanInsFoG). Im StaRUG ist vor allem die Krisenfrüherkennung und das Krisenmanagement bei haftungsbeschränkten Unternehmensträgern, z.B. GmbHs, geregelt.
Mehr Informationen >>

Kosten-Nutzen-Analyse einer Photovoltaik-Investition

Mit diesem Excel-Tool lassen sich die Auswirkungen unterschiedlicher Parameter und Annahmen verdeutlichen, wie beispielsweise der Nutzen nach Steuern und Abgaben aus einer Photovoltaik-Investition. Die Kosten-Nutzen-Analyse berücksichtigt unter anderem Unterschiede bei Privat-Investoren und Unternehmen, 
Betriebskosten und Grenzsteuersatz.
Mehr Informationen >>

Aktienübersicht mit Trendanalyse

PantherMedia_Andres_Rodriguez.jpg
Behalten Sie alle Ihre Aktientitel auf einen Blick im Auge! Mit diesem Programm behalten Sie die Übersicht über Ihre Aktien und werden bei jeder Trendveränderung informiert. Wählen Sie beliebig aus über 80 Trendsignalen aus - die jederzeit automatisch überprüft werden. 
Mehr Informationen >>

Weitere über 400 Excel-Vorlagen finden Sie hier >>
Premium-Mitglied werden

Kosten- und Leistungsrechnung: Aus der Praxis für die Praxis von Jörgen Erichsen 

kosten-muenzen-geld-pm_Boris_Zerwann_240x180.jpg
Zur KLR gibt es zahllose Veröffentlichungen, die sich vor allem mit Definitionen und Theorien befassen. Im Unterschied dazu ist diese Serie aus 6 Teilen so konzipiert, dass sie sich vor allem mit der Anwendbarkeit im Tagesgeschäft befasst und so gerade für Unternehmer in kleinen Betrieben und Selbstständige einen hohen Nutzwert bieten. Weitere interessante Serien finden Sie hier >> 

Excel-Aktien-Depot 

4_0-Excel_Aktien_Depot.jpg
Mit dieser Excel-Vorlage können Sie Ihre Aktien in Excel verwalten. Das Excel-Tool besteht aus drei verschiedenen Tabellenblättern: Das Blatt "Depot" dient der Verwaltung der einzelnen Aktienbestände. Es ist in zwei Bereiche aufgeteilt: Das "aktuelle Depot" sowie verkaufte Aktien unter "Historie". Im Tabellenblatt "Übersicht" werden automatische Zusammenfassung der Aktien-Vorgänge nach Kalenderjahren und der wichtigsten Kennzahlen festgehalten. Im Blatt "Parameter" werden Spesensätze für Kauf und Verkauf, Freistellungsauftrag, Vorjahres-GV-Topf und sonstige persönliche Einstellungen hinterlegt.  Zum Shop >>