Excel - bestimmte Daten per Makro auslesen?

Hallo zusammen, können Sie mir hier weiterhelfen?

Ich habe hier ein sehr großer Report (auf tägliche Basis) und ich möchte gerne die Posten die ich brauche per Makro in eine extra Tabelle haben.

Die Posten die man benötigt sind immer in unterschiedlichen Zellen vorhanden.

Beschreibung: suchen/Report ID 9999999 und alles was dazwischen ist bis zum END Report in extra Datei kopieren und so weiter/suchen Report ID 9999999 …...(siehe Bild) Vielen Dank im Voraus!!!

Bild zum Beitrag

1 Antwort

IchMalWiederXY

Von gutefrage auf Grund seines Wissens auf einem Fachgebiet ausgezeichneter Nutzer

VBA

07.03.2024, 17:25

Es ist eigentlich KEIN VBA nötig, wenn die Daten so organisiert wären, dass sie PIVOT Auswertungen unterstützen.
Also.
Zunächst die Zeile finden die die "erste" ID enthält.
Dies geht mit Bericht1Start=Application.Match(...)
Dann die Zeile finden in welcher das "erste" mal "End Report steht.
Dies geht auch mit Bericht1Ende = Application.Match(...)
Dann den Bereich auf die andere Seite bringen

Worksheets("ZielSeite").Range("A" & Bericht1Start& ":A" & Bericht1Ende).Value = _
Worksheets("QuellSeite").Range("A" & Bericht1Start& ":A" & Bericht1Ende).Value
Die weiteren Berichte finden sich dann in dem man wieder Start und Ende sucht ABER dieses mal AB der Zeile die noch NOCH nicht berichtet wurde.
Diese neue StartZeile für die Suche ist denn (Bericht1Ende + 1)
So kombinieren sich die Application.Match mehrfach bis alle Bereiche erkannt und auf die andere Seite gespiegelt wurden.
===
Wie immer. Es gäbe auch andere Lösungen. z.B.: Mit Schfeifen

Vikinteresse

Fragesteller

08.03.2024, 05:59

Guten Morgen IchMalWieder. Vielen Dank dir für deine ausführliche Antwort. Ich werde das dann diese Tage mit pivot ausprobieren. ( Report ist etwas kompliziert aufgebaut) . Ich wünsche dir einen schöns Wochenende! PS: 😃 Natürlich mit einem Makro wäre etwas einfacher....ein Klick und fertig.

IchMalWiederXY

09.03.2024, 16:44

@Vikinteresse

Nein, Pivot ist einfacher als eine programmierte Lösung.
Je nach dem wer alles die Datei verwendet ist alles in der Datei an Formaten und Struktur verändert, was dein Makro ggf neu berücksichtigen muss.
Bedeutet im Umkehrschluss, man muss die Datei gegen jede Anpassung 3ter schützen, was in Excel aber leider nicht möglich ist.

Hallo, ich habe verschiedene Tabellen, in denen sich durch Löschen einer Spalte Leerzeilen ergeben haben. Diese kann ich leider nicht per Makro löschen; es kommt eine Fehlermeldung wegen der vertikal verbundenen Zellen. Daher würde ich gerne die vertikal verbundenen Zellen trennen.

Etwas genauer vielleicht noch

Es bleiben zwei Spalten übrig.

Spalte 1 enthält keine verbundenen Zellen.

Spalte 2 enthält die verbundenen Zellen, die unterschiedlich vielen Zeilen in Spalte 1 entsprechen. Mal sind nur zwei Zeilen verbunden, mal 10.

Vielen tausend Dank für eure Hilfe!

...zur Frage

Excel Aktive Zelle auslesen VBA?

Ich habe eine Tabelle in Excel erstellt. Nun ist dort ein Button, der auf Knopfdruck ein Makro ausführt, das, wenn die aktuelle entweder B2 oder C6 oder D10 ist, in diese Zelle eine 5 einträgt. Wie kann ich das mit einer If-Anweisung umsetzen (mithilfe von Or-Operatoren)?

Also ich meine so in die Richtung

If ActiveCell = B2 Or C6 Or D10 Then

Active Cell.Value = 5

Else

MsgBox("Das Argument ("5") ist nicht mit der aktuellen Zelle kompatibel.")

End If

Nur dass das oben nie funktioniert, weil ich nicht weiß, wie ich mehrere Zellen als richtig ansehen lassen kann.

Kann mir jemand das richtige Makro zeigen?

...zur Frage

Excel Makro VBA Zellen vergleichen und bei Übereinstimmung Zeile löschen

Hallo miteinander, kenne mich leider gar nicht in VBA aus und brauche dringend Hilfe für ein Projekt. Ich beschreibe mal kurz mein Problem: Im Worksheet "Objekt löschen" in zeile C6 soll eine Objekt ID eingegeben werden. Diese muss dann mit den Objekt IDs im Worksheet "Objektdaten" in der Spalte B verglichen werden. Wenn sie dort existiert, dann soll die gesamte Zeile, in der sich die eingegebene ID befindet, gelöscht werden. Das ganze soll funktionieren, indem man auf eine Schaltfläche auf dem 1. Tabellenblatt klickt. Ich hoffe, das war jetzt einigermaßen verständlich erklärt. Freue mich sehr über eure Hilfe Danke :) Rosi

...zur Frage

Excel Makros: Wie Zellen mit definierter Farbe hinterlegen?

Ich habe eine Ferienliste mit diversen Absenz-Möglichkeiten, welche mit einer Farbe hinterlegt sind.

Per Makro möchte ich es einrichten, dass, wenn ich in der Arbeitsmappe die entsprechenden Tage auswähle und dann auf die Makro-Schaltfläche klicke, dass die entsprechende Zelle in der definierten Farbe erscheint.

Nur bin ich wohl zu doof, das Makro zu schreiben... Ich schaff es nicht...

Weiss jemand Rat wie ich das anstelle (den Makro-Text in den Visual Basics)

Danke euch! :-)

...zur Frage

Wie kann man in Excel eine bestimmte Spalte für bestimmte Benutzer ausblenden, ohne dass diese wieder eingeblendet werden kann?

Ich muss eine Excel-Tabelle erstellen, wobei einige Benutzer eine bestimmte Spalte sehen können und andere wiederum nicht.

Den Benutzern, die die Spalte nicht sehen dürfen, darf es auch nicht möglich sein, die Spalte einzublenden.

Ich bin leider völlig unerfahren mit VBA und habe auch nach langem Suchen im Internet keine passende Lösung gefunden.

Sollte eine Lösung per Makro möglich sein ist es ebenfalls ganz wichtig, dass die Benutzer nicht die Möglichkeit bekommen das Makro zu deaktivieren.

Ich bedanke mich schon mal ganz herzlich!!!

LG Hafenhilde

...zur Frage

Excel: Blatt schützen aber Makro die Formatierung einzelner Zellen erlauben

Hallo,

ich habe eine Excel-Datei - der Einfachheit halber eine große Tabelle.

Per Buttons kann man bestimmte Berechnungen mit den Werten in der Tabelle anstellen und die einzelnen Zellen entsprechend formatieren.

Meine Frage:

Wenn ich Blattschutz auswähle und vorher den Bereich innerhalb der Tabelle mit "Benutzer dürfen Bereiche bearbeiten" festlege und dann als Option beim Blattschutz "nicht gesperrte Zellen auswählen" und "zellen formatieren" erlaube, kann ich anschließend trotzdem nicht die Zellen im vorher definierten Bereich auswählen und/oder bearbeiten.

Was mache ich falsch?

vielen Dank,
Thomas

...zur Frage

Excel VBA: Bestellliste mit Buttons?

Hallo liebe Excel-Profis,

ich habe eine Bestell-Liste gebastelt, in der ich nacheinander Artikel und Hersteller und auch Besteller eintragen kann. Die Liste sortiert und summiert mir die einzelnen Posten, sodass ich verschiedene Aufträge nur noch "herunterschreiben" muss.

Nun möchte ich die Liste um ein paar Funktionen erweitern.

Ich lasse nun per VBA-Code pro Zeile drei Buttons einfügen und weise diesen jeweils ein Makro zu. Einen + Butten, einen - Button und einen Delete-Button. Funktion ist wahrscheinlich klar. Posten erhöhen, reduzieren und kompletten Posten löschen.

Problem 1 ist, dass ich beim Klicken auf einen Button in einer beliebigen Zeile über das gestartete Makro erkennen muss, in welcher Zeile sich der Button befindet, um genau diese Zeile der Liste bearbeiten zu können.
Wie ermittle ich die Zeile, in der sich der Button befindet, um genau diese Zeile mit dem Makro zu addressieren?

Problem 2 ist, dass die Liste über eine Sortierfunktion verfügt. Wie sortiere ich die Buttons gleichzeitig mit den Einträgen? Gibt es eine Möglichkeit, die Grafiken mit der gesamten Zeile zu "verknüpfen", sodass sie quasi mit zur Zelle gehören? Hintergrundgrafik oder soetwas? Und kann ich Ihnen dann noch ein Makro zuweisen?

Danke für Eure Antworten!

...zur Frage

VBA: Alle A1-Zellen in Arbeitsmappe kopieren und ausgeben?

Hallo zusammen,

ich möchte per Makro alle A1-Zellen in der Arbeitsmappe ( 8 Tabellenblätter) kopieren und über eine Messagebox ausgeben lassen.

In jeder A1 Zelle steht ein Wort. Die MSG Box soll alle Strings hintereinander ausgeben, sodass ein Satz entsteht.

Habt ihr Ideen ? Bisher scheitern meine Ansätze alle..

Danke euch

...zur Frage

Gibt es eine Möglichkeit per Makro und Passwort ein Blatt zu schützen?

Ich habe eine umfangreiche Tabelle entworfen um die Nebenkosten für die Mieter abzurechnen. Nun habe ich einen Button mit hinterlegtem Makro um das Blatt vor Änderungen zu sperren. Dabei werden alle fest vorgegebenen Zellen gesperrt. Mit einem weiteren Button wird es wieder frei geschaltet. Ich habe diese Makros mit dem Generator erstellt. Wenn ich aber dabei eine Passwortabfrage mit einbinde bleibt es hängen und läuft nicht mehr weiter. Kennt jemand eine andere Möglichkeit?

...zur Frage

Wie kann ich unter Windows 10 per Hotkey auf der Tastatur, die Lautstärke einer Anwendung/Spiel regeln?

Hallo Community.

Ich möchte gerne per Hotkey/Makro ( Eine Taste auf der Tastatur ), die Lautstärke für eine separate Anwendung ( Spiel ) steuern, ohne die Master-Lautstärke zu verringern oder extra in den Lautstärkenmixer bzw. Soundeinstellungen im inGame einstellen zu müssen.

Wie mache ich das, ohne eine extra Software herunterzuladen?

Grüße

...zur Frage

Excel/VBA Datum (Wochentage) automatisch erzeugen?

Hallo zusammen,

ich gebe zu, ich bin etwas zu faul es zu googeln und zu suchen.

Normal kenne ich mich mit Excel recht gut aus, aber mit "Datum" arbeite ich da so gut wie nie...

Meine Wunsch:

Ich benötigt in der Zelle "G2" immer den ersten Arbeitstag(Mo-Fr) des Monats.

In den Zellen rechts davon wird dieses weiter gezählt. (Also immer in Zeile 2)

Dabei soll Samstag und Sonntag nicht vorkommen.

Hat jemand eine Idee? Da ich in der Datei eh schon einige Makros habe, darf es gern ein Marko sein.

Bedingungen:

Da ich mit einem anderen Makro diese Zeile auf ein spezielles Datum absuche, sollte dieses im Format sein, wie im Angefügten Bild.

https://images.gutefrage.net/media/fragen/bilder/excelvba-datum-wochentage-automatisch-erzeugen/0_big.jpg?v=1516696753345"/>

...zur Frage

Problem mit VBA Excel: Wert Finden und Zeilen daneben ersetzen.

Hallo zusammen,

Ich versuch mich grade mit VBA und stoß so langsam an meine Grenzen.

Ich möchte mit mit einem Formular einen Wert aus Tabelle1 nehmen, diesen in Tabelle2 suchen und markieren. Außerdem soll zusätzlich in den Zeilen daneben Werte aus Tabelle1 eingetragen werden.

Das switchen zwischen den Tabellen, das Finden und Markieren klappt soweit, nur funktioniert das Kopieren aus den Zellen in Tabelle1 in die neben den gefundenen Wert aus Tabelle2 befindlichen Zellen nicht. Anscheinend selektiert mein Makro die Markierte Zelle nicht, weshalb ich mit "ActiveCell" nicht weiter komme.

Wäre cool wenn jemand mir da weiterhelfen könnte :)

Sheets("Tabelle2").Select
Cells.Find(What:=Worksheets("Tabelle1").Cells(1, 1), LookIn:=xlFormulas, LookAt:= _
    xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False).Interior.Color = vbRed                 

    If ActiveSheet.Name = "Tabelle2" Then                             Sheets("Tabelle1").Select                                           Else                                                                Sheets("Tabelle2").Select                                             End If

...zur Frage

In Excel per Dateiname andere Exceldatei öffnen?

Hallo Ich habe ein Problem. Ich möchte per Makro oder vba im Excel eine andere Exceldatei öffnen. Aber so: Wenn A1= xyz (xyz ist der dateiname) dann öffne datei xyz. Das mnatürlich mit einem Button der Suchen drauf steht. Den habe ich schon erstellt.

...zur Frage

Wie kann ich Excel-Zellen für Word auslesen?

Ich muss den Inhalt einer speziellen Zelle in einem Excel-Sheet als String auslesen und in einem Word-Dokument einfügen. Das ganze soll per VBA funktionieren. Dabei sollte die Excel-Datei bestenfalls geschlossen bleiben. Kann jemand helfen? Nutze MS-Office 2013.

...zur Frage

Was möchtest Du wissen?

Deine Frage stellen