Laufzeitfehler 91
17.06.2014 14:36:18
Andreas
ich bekomme beim folgenden Makro immer den "Laufzeitfehler 91 - Objektvariabel oder with-variable nicht festgelegt". Könnt ihr mir vielleicht helfen und sagen ob ein Fehler drin ist!?
Private Sub Workbook_Open()
Application.Run "allesschliessen"
Dim tabPath As String
ChDir "C:\Program Files\Ordner\"
tabPath = "C:\Program Files\Ordner\tab.xls"
If Dir(tabPath) "" Then
Workbooks.Open Filename:=tabPath
ActiveWindow.Visible = False
Application.DisplayAlerts = True
Application.AskToUpdateLinks = True
End If
ChDir "C:\Program Files\Ordner\"
Application.AskToUpdateLinks = False
Application.DisplayAlerts = False
Workbooks.Open Filename:="C:\Program Files\Ordner\tab.xls"
ActiveWindow.Visible = False
Application.DisplayAlerts = True
Application.AskToUpdateLinks = True
Range("B10").Select
Application.Run "sepp"
Workbooks.Open Filename:="C:\Program Files\Ordner\client.xls"
ActiveWindow.Visible = False
End Sub
Anzeige