Hallo zusammen,
ich habe leider keine fundierten VBA-Kenntnisse und tüftle jetzt schon eine Weile an einem (vermutlich sehr simplen) Code. Für Hilfe wäre ich sehr dankbar.
Ich habe eine Exceldatei, die die Aufnahme verschiedener Tätigkeiten pro Tag ermöglichen soll. D.H. in der ersten Spalte sind die einzelnen Tage eines Monats (mittels Formel) eingetragen, z.B. "Mi, 01", "Do, 02", etc. Da nun aber pro Tag verschiedene Tätigkeiten eingetragen werden sollen, suche ich eine gute Möglichkeit die einzelnen Zeilen zu duplizieren, ohne, dass man das händisch tun und immer wieder Inhalte neu kopieren oder ständig wieder Zellen verbinden muss. Daher war mein erster Gedanke an jede Zeile einen "Plus"-Button zum duplizieren der Zeile anzubringen. Mit Klicken auf den Button soll dann folgendes passieren:
1. Es wird eine neue Zeile unterhalb der Zeile mit Button eingefügt
2. Die Formatierung ist identisch zur Zeile mit Button
2. Die erste Zelle, in der der Kalendertag steht, wird verbunden, sodass es dann zwei Zeilen für einen Kalendertag gibt
Das soll dann beliebig oft bei Klicken auf dem Button möglich sein.
Bisher habe ich Folgendes:
Sub Schaltfläche1_Klicken()
Rows(7).Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
End Sub
Damit wird bisher eine neue (leere) Zeile oberhalb der Zeile mit Button eingefügt.
Den Rest kriege ich einfach nicht gebacken. Könntet ihr mir hierbei helfen? Wenn es nicht verständlich war, kann ich auch gerne eine Datei hochladen.
Vielen herzlichen Dank schon mal vorab.
Stefanie