meine frage ist kurz.ich habe fuer meine excelaufgabe einen code
geschrieben.es hat fast zwei tage gedauert bis ich alle fehlermeldungen beseitigt habe.nun meine frage- wie kann ich den
code verbessern oder besser gesagt was kann ich in zukunft besser machen.
ich danke euch im voraus fuer eure interesse.
markus :-)
Sub LetzteZelleAktivieren_FolmelnCopy()
Sheets("DatBank.193").Activate
Range("L65536").End(xlUp).Offset(1, 0).Select
ActiveCell.End(xlUp).Offset(0, 0).Select
Selection.Copy
ActiveCell.Offset(1, 0).Select
Selection.PasteSpecial Paste:=xlFormulas
Application.CutCopyMode = False
ActiveCell.Offset(0, 2).Activate
ActiveCell.Offset(-1, 0).Select
Selection.Copy
ActiveCell.Offset(1, 0).Select
Selection.PasteSpecial Paste:=xlFormulas
Application.CutCopyMode = False
ActiveCell.Offset(0, 2).Select
ActiveCell.Offset(-1, 0).Select
Selection.Copy
ActiveCell.Offset(1, 0).Select
Selection.PasteSpecial Paste:=xlFormulas
Application.CutCopyMode = False
ActiveCell.Offset(0, 2).Select
ActiveCell.Offset(-1, 0).Select
Selection.Copy
ActiveCell.Offset(1, 0).Select
Selection.PasteSpecial Paste:=xlFormulas
Application.CutCopyMode = False
ActiveCell.Offset(0, -7).Activate
End Sub