Thema Datum  Von Nutzer Rating
Antwort
Rot Neue Spalte in Tabellenblatt einfügen, wenn Bedingung erfüllt
12.10.2020 14:12:11 Philip
NotSolved
12.10.2020 16:23:06 Gast7813
NotSolved
12.10.2020 16:27:38 Gast19749
NotSolved

Ansicht des Beitrags:
Von:
Philip
Datum:
12.10.2020 14:12:11
Views:
35
Rating: Antwort:
  Ja
Thema:
Neue Spalte in Tabellenblatt einfügen, wenn Bedingung erfüllt
Hallo, ich brauche bitte Hilfe. Ich habe leider keinerlei Erfahrungen in VBA. Ich soll ein Makro erstellen, welches in Tabellenblatt 1 die letzte gefüllte Zelle in Spalte J auf Erfüllung einer Bedingung untersucht (in diesem Fall Zelleninhalt = "Vollkonsolidierung"). Wenn diese Bedingung erfüllt ist, soll in Tabellenblatt 2 an einer bestimmten Stelle eine neue Spalte eingefügt werden. In Tabellenblatt 2 befindet sich in einer Zelle in Zeile 6 (derzeitig L6) der Wert "XXXX". Die neue Spalte soll immer vor der Spalte, in der sich die Zelle mit dem Wert "XXXX" befindet, eingefügt werden (in diesem Fall Spalte L, beim nächsten Mal Spalte M, das übernächste Mal Spalte N usw.), da sich die Tabelle ja bei Erfüllung der eingangs genannten Bedingung immer um eine Spalte nach rechts erweitern wird. Zusätzlich sollen in Tabellenblatt 2 sämtliche Formeln der Vorgängerspalte (Spalte links von der neu eingefügten Spalte) ab Zeile 8 bis Ende Tabellenblatt in die Zellen der neu eingefügten Spalte kopiert werden. Und obendrein soll der Spaltenkopf der neu eingefügten Spalte mit Daten aus Tabellenblatt 1 befüllt werden: Angenommen die oben genannte zu prüfende Bedingung befindet sich in Zelle J10 von Tabellenblatt 1, so soll (bei Erfüllung der Bedingung: Zelleninhalt der letzten gefüllten Zelle in Spalte J Tabelle 1 = "Vollkonsolidierung") in Zeile 3 der neu eingefügten Spalte in Tabellenblatt 2 der Wert aus C10 (Tabelle 1) übernommen werden, in Zeile 4 der neu eingefügten Spalte (Tabellenblatt 2) der Wert aus D10 (Tabelle 1), in Zeile 5 der neu eingefügten Spalte (Tabelle 2) der Wert aus F10 (Tabelle 1) und in Zeile 6 der neu eingefügten Spalte (Tabelle 2) der Wert aus E10 (Tabelle 1). Wird die Bedingung nicht erfüllt, soll gar nichts passieren (weder Einfügen einer neuen Spalte in Tabelle 2 noch Kopieren der Werte). Könnte mir evtl. jemand einen passenden Code schreiben? Vielen Dank im Voraus!!

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst genau und ausführlich
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
  • Bitte markieren Sie Ihre Anfrage als erledigt wenn Ihnen geholfen wurde
Thema: Name: Email:

 
 

Thema Datum  Von Nutzer Rating
Antwort
Rot Neue Spalte in Tabellenblatt einfügen, wenn Bedingung erfüllt
12.10.2020 14:12:11 Philip
NotSolved
12.10.2020 16:23:06 Gast7813
NotSolved
12.10.2020 16:27:38 Gast19749
NotSolved