folgender Code kopiert Daten von einem Sheet in ein anderes:
Sheets("Auftragsliste").Select
Rows("2:2").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Copy
Sheets("Aufträge letzten 4 Quartale").Select
Range("A1").Select
e1 = Letzte_Zeile_in_Spalte(1) + 1
zelle_spalte = "A" + Format(e1, "0000000")
Range(zelle_spalte).Select
ActiveSheet.Paste
Funktioniert alles prima. (Letzte_Zeile_in_Spalte) ermittelt die Letzte_Zeile in der Spalte.
Nach Durchführung bleibt jedoch die Meldung "Markieren Sie den Zielbereich und drücken Sie die Eingabetaste" in der Statuszeile stehen.
Wie bekomme ich diese Meldung innerhalb VBA entfernt?
Danke für Hilfe!
MfG
Heinz