|
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
 Neue Spalte in Tabellenblatt einfügen, wenn Bedingung erfüllt |
12.10.2020 14:12:11 |
Philip |
|
|
|
12.10.2020 16:23:06 |
Gast7813 |
|
|
|
12.10.2020 16:27:38 |
Gast19749 |
|
|
Von:
Philip |
Datum:
12.10.2020 14:12:11 |
Views:
1048 |
Rating:
|
Antwort:
|
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!! |
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- 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 geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- 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
|
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
Neue Spalte in Tabellenblatt einfügen, wenn Bedingung erfüllt |
12.10.2020 14:12:11 |
Philip |
|
|
|
12.10.2020 16:23:06 |
Gast7813 |
|
|
|
12.10.2020 16:27:38 |
Gast19749 |
|
|