|
Hallo zusammen,
habe mehrere Arbeitsmappen die mit einander verknüpft sind. Excel wurde auf 2016 geupgraded und die Mappen Konvertiert seit dem habe ich Probleme mit dem VBA Code.
Laufzeitfehler 9 Index außerhalb des Gültigen bereichs. Vorher lief alles. Hier mal die Codezeilen.
Private Sub UserForm_Activate()
Set wksDat = Workbooks("Daten.xlsm").Worksheets(Daten) //Hier tritt der Fehler auf. Datei aber vorhanden.
Set wksAbr = Worksheets(ActiveSheet.Name)
Flag2 = 0
cboFuellen
StuSa_EKO
Me.txtAuftr.Value = ""
Me.txtAuftrL.SetFocus
End Sub
Laufzeitfehler 1004 Wir konnten ***.xlsm nicht finden, wurde das objekt vielleicht verschoben, umbenannt oder gelöscht?
Private Sub StndNw_oeffnen()
Dim File As String
File = ThisWorkbook.Name
On Error GoTo Errhandler
Workbooks("Stundennachweise_" & Right(File, 8)).Sheets("Übersicht").Activate //Hier tritt der Fehler auf.
Exit Sub
Errhandler:
If (Err = 9) Then
Workbooks.Open Filename:=ThisWorkbook.Path & "\Stundennachweise_" & Right(File, 8), UpdateLinks:=0
Resume
End If
MsgBox "Error " & Err, , "Fehler !"
End Sub
Die Daten sind alle vorhanden und wurden auch Konvertiert.
Mit der Vorgänger Version im kompatibilitäts Modus lief alles.
Hoffe ihr habt Ideen, mir fällt nix mehr ein.
LG
|