Hallo ins Forum,
Ich habe ein kleines Problem und erhoffe mir eine Lösung.
Und zwar folgendes. (Ich könnte mir den Ablauf des Makros so vorstellen und erkäre ihn mal auf deutsch!)
Wenn ein Bereich (Spalte 1 bis 18) markiert ist dann kopiere ihn, füge ihn in Tabelle3 Zeile 1 ein.
Wenn nichts markiert ist, dann gehe direkt auf Tabelle2
Meine bisherige Formel sieht so aus, nur das der Schritt (Wechsel auf Tab. "Ablage") bei Fehlender Markierung extrem lange dauert. Deshalb denke ich, dass über If Then else eine effektivere Lösung wäre.
Selection.Copy
ActiveWindow.ScrollWorkbookTabs Position:=xlLast
Sheets("Tabelle3").Select
Rows("1:1").Select
ActiveSheet.Paste
Sheets("Tabelle2").Select
Application.CutCopyMode = False
Ich danke im voraus für die Bemühungen.
Liebe Grüßen
Thomas Daamen