Supportnet / Forum / Tabellenkalkulation
Formel kopieren
Frage
Hallo,
ich habe eine Tabelle zum Controlling erstellt. In Zukunft sollen andere Kollegen auch damit arbeiten. Die Tabelle beinhaltet mehrere Wenn-Funktionen, wie zählenwenn, dateif, etc.
Nun möchte ich, dass sobald ein Kollege eine neue Zeile in die Tabelle einfügt, dass die Formeln der darüberliegenden Zeile übernommen wird, (Bsp.: In A1 steht wenn(b1="hallo";"A";"B") dies soll jetzt auch in A2 möglich sein, sobald man eine neue Zeile eingefügt hat) Ich weiß, dass man mit nach "untenziehen" die Formel kopieren kann, da aber jeder, auch Kollegen ohne irgendwelche Excellkenntnisse, damit arbeiten sollen, habe ich gehofft, dass es mit VBA funktioniert. Hat da jemand nen Tipp wie das Makro aussehen soll?
Danke im Voraus!
Antwort 1 von Hajo_Zi
Hallo Phillip,
sobald jemand die Makros deaktiviert läuft es auch wieder nicht.
Es ist über VBA lösbar, aber leider habe ich jetzt keine Zeit.
Gruß Hajo
sobald jemand die Makros deaktiviert läuft es auch wieder nicht.
Es ist über VBA lösbar, aber leider habe ich jetzt keine Zeit.
Gruß Hajo
Antwort 2 von philipp123
Hallo,
hat keiner eine Idee? Wäre echt cool, wenn mir jemand weiterhelfen könnte...
hat keiner eine Idee? Wäre echt cool, wenn mir jemand weiterhelfen könnte...
Antwort 3 von fedjo
Hallo,
den Code in ein Modul einfügen.
Sub Zeile_einfügen()
Range(ActiveCell.Offset(0, 0), ActiveCell.Offset(0, 10)).Copy
ActiveCell.Insert Shift:=xlDown
End Sub
Von der aktiven Zelle (Spalte A ) wird die Zeile bis (Spalte K) kopiert, eine neue Zeile nach unten eingefügt mit dem Inhalt der oberen Zeile.
Gruß
fedjo
den Code in ein Modul einfügen.
Sub Zeile_einfügen()
Range(ActiveCell.Offset(0, 0), ActiveCell.Offset(0, 10)).Copy
ActiveCell.Insert Shift:=xlDown
End Sub
Von der aktiven Zelle (Spalte A ) wird die Zeile bis (Spalte K) kopiert, eine neue Zeile nach unten eingefügt mit dem Inhalt der oberen Zeile.
Gruß
fedjo

