Hallo, 

in unserer Abteilung gibt es ein Programm, dass die Durchlaufzeiten von Materialien zusammenfasst. Dafür werden Daten aus SAP in eine Acess-Datenbank exportiert und diese dann in Excel dargestellt. Bis gestern lief alles Problemlos. Nun steht aber in der Zelle in der bisher VFI 4TE (=Name des Materials) stand, #BEZUG! sobald ich die Makros aktiviere. 

Als Formel ist dann folgendes hinterlegt =WENN(Bereiche!#BEZUG!<>"";Bereiche!#BEZUG!;"") und als Fehlermeldung kommt "Laufzeitfehler 13 - Typen unverträglich"

Wenn ich die Makros nicht aktiviere steht folgendes drin =WENN(Bereiche!A12<>"";Bereiche!A12;"")

Der VBA code sieht folgendermaßen aus an der Stelle wo es nicht mehr weiter geht:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Count > 4 And ActiveSheet.Name <> Name Then
        ActiveSheet.bDLZ = True
        Call ActiveSheet.OnOpen //Hier bleibt der Code stehen
    End If
End Sub

In C,Java, PHP, SQL habe ich Programmiererfahrung, jedoch kenne ich mich mit Excel/VBA nicht besonders aus. 

Wäre nett, wenn ich mir ein paar Tipps geben könntet, was von gestern auf heute da plötzlich falsch läuft. 

Vielen Dank