Die Sache mit dem Punkt (.) ?
Peter
Ich habe ein Verständnisproblem. Wenn ich im Workbook, in welchem dieser Code in einem Modul steht die Tabelle "Auswertung" aktiviert habe, läuft dieser Code problemlos. Wenn ich jedoch eine andere Tabelle ausgewählt habe, kommt "Anwendungs- oder objektdefinierter Fehler".
Ich vermute, dass dem Code nicht ganz klar ist, wo der Range definiert werden soll, blicke aber nicht durch, wie ich das konkret lösen kann.
Gruss, Peter
Sub test()
Dim Bereich As Range
Set Bereich = Worksheets("Auswertung").Range(Cells(Range("psaEnde").Row, 15), Cells(Range(" _
psaBeginn").Row, 15))
ActiveWorkbook.Names.Add _
Name:="UntenLinks", _
RefersTo:=Bereich, Visible:=True
End Sub