Makro: Auführung von aktiver Zelle aus
07.11.2014 12:43:07
aktiver
Ich würde gerne eine Zelle mit der Maus markieren können. Eine Tastenkombination soll dann folgendes liefern:
1. Inhalt der markierten Zelle kopieren und zwölf Zellen drüber einfügen
2. anschließend den Inhalt der Bezugszelle und der 11 dazwischenliegenden Zellen
löschen.
leider funktioniert folgendes Makro nur immer an der Stelle wo es erstellt wurde:
Sub jahresuebertrag()
' jahresuebertrag Makro
' Tastenkombination: Strg+i
Range("F25").Select
Selection.Copy
Range("F13").Select
ActiveSheet.Paste
Range("F14:F25").Select
Application.CutCopyMode = False
Selection.ClearContents
End Sub
Ich habe zum gleichen Thema hier im Forum schon einen Beitrag gefunden. Leider lässt sich die dort dargestellte Lösung nicht so ohne weiteres auf meine Situation Übertragen.
Hat hier jemand eine Idee?
Gruß Lars
Anzeige