Hallo zusammen,
anschließend an eine bereits von diesem Forum gelöste Frage (https://www.herber.de/forum/archiv/1496to1500/t1497176.htm) habe ich eine weitere Problemstellung, die mir einiges Kopfzerbrechen bereitet. Über Lösungsansätze und Hilfestellung bei der Programmierung eines Makros würde ich mich sehr freuen... :)
Beispieldatei: https://www.herber.de/bbs/user/106080.xlsm
Folgende Situation: Der Button "Daten kopieren" kopiert die Datensätze von Tabelle1 nach Tabelle2 und löscht Leerzeilen, -spalten und Formeln. Soweit super. Tabelle2 soll später weitergenutzt werden, als Datengrundlage für eine Pivottabelle (ohne VBA zunächst).
Bei der zu bearbeitenden Datei geht es um eine Budgetdatei. Unter anderem gibt es die Spalte "Allokation", die anzeigt, wie ein Betrag auf die Kalendermonate verteilt werden soll. Der Nutzer kann entweder einen BEtrag in einen dezidierten Monat schreiben lassen (dann schreibt er in Spalte "Allokation" den Monatsnamen) oder er schreibt einen Gesamtbetrag in die Spalte "Betrag" und in die Spalte "Allokation" "12 Monate". Dann soll der Gesamtbetrag auf alle Monate gleichmäßig verteilt werden. Beispiel: Gesamtbetrag 1200€ - in jeden Monat sollen 100€ verteilt werden.
Dieser inhaltliche Zusammenhang führt zu meinem VBA-Problem (in Verbindung mit der späteren Pivot-Tabelle): derzeit steht nach Klick auf "Daten kopieren" in Tabelle2 die Kopie der Daten von Tabelle1. Also: bei einer Verteilung in einen bestimmten Monat wird der Monat und der Betrag in die Tabelle geschrieben und ist später per Pivot-Tabelle vernünftig auswertbar. Allerdings wird auch bei der Allokation "12 Monate" logischerweise nur dieser Text und der Gesamtbetrag (oder auch ein vorher berechneter Verrechnungsbetrag) übernommen. Dies kann ich jedoch später nicht wirklich nutzen.
Ich brauche quasi im Fall einer Allokation "12 Monate" ein Makro, das mir nach dem Kopieren diese eine Zeile in Tabelle2 umwandelt. Und zwar in 12 Zeilen, mit jeweils den gleichen Daten und Formeln (Betrag: 1.200€ / 12 = 100€ in diesem Fall), allerdings sollte für jeden Monat (also Januar, Februar, März,...) eine eigene Zeile angelegt werden (Zeile kopieren und zwölf mal unter der gewünschten Zeile einfügen?!). Am besten direkt unter der Zeile, die gezwölftelt wird. Anschließend könnte man die ursprüngliche Zeile löschen. Somit hätte ich dann jeweils einen Monat und einen zugeordneten Betrag, was ich für die weitere Auswertung nutzen könnte.
Ich hoffe, ich konnte mein Problem einigermaßen verständlich schildern... sorry für den langen Text und jetzt schonmal vielen, vielen Dank für Denkanstöße und Lösungsvorschläge.
Viele Grüße
Uli